Skip to content

Commit 9e09a10

Browse files
committed
Adaptions for changes from master
1 parent d1f3aad commit 9e09a10

File tree

1 file changed

+6
-4
lines changed

1 file changed

+6
-4
lines changed

src/extpar_consistency_check.f90

Lines changed: 6 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1008,11 +1008,13 @@ PROGRAM extpar_consistency_check
10081008
ENDIF
10091009

10101010
CALL allocate_topo_target_fields(tg,nhori,l_use_sgsl, l_use_array_cache)
1011-
IF (status_GLOBE .eqv. .TRUE.) THEN
1011+
1012+
IF (status_GLOBE .eqv. .TRUE.) THEN
10121013
CALL allocate_topo_target_fields_globe(tg,nhori_globe,l_use_sgsl_globe, l_use_array_cache)
1013-
END IF
1014-
CALL allocate_aot_target_fields(tg, iaot_type, ntime_aot, ntype_aot, nspb_aot, &
1015-
nlevel_cams, ntype_cams, l_use_array_cache)
1014+
END IF
1015+
1016+
CALL allocate_aot_target_fields(tg, ntime_aot, ntype_aot, l_use_array_cache)
1017+
10161018
CALL allocate_cru_target_fields(tg, l_use_array_cache)
10171019

10181020
CALL allocate_flake_target_fields(tg, l_use_array_cache)

0 commit comments

Comments
 (0)