Changeset 3851 for LMDZ6/branches/LMDZ-tracers/libf/dyn3dmem/conf_gcm.F90
- Timestamp:
- Feb 22, 2021, 12:44:07 PM (4 years ago)
- Location:
- LMDZ6/branches/LMDZ-tracers
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/LMDZ-tracers
- Property svn:mergeinfo changed
-
LMDZ6/branches/LMDZ-tracers/libf/dyn3dmem/conf_gcm.F90
r3579 r3851 345 345 ngroup=3 346 346 CALL getin('ngroup',ngroup) 347 if (mod(iim, 2**ngroup) /= 0) & 348 call abort_gcm("conf_gcm", 'iim must be multiple of 2**ngroup', 1) 349 if (2**ngroup > jjm + 1) & 350 call abort_gcm("conf_gcm", '2**ngroup must be <= jjm + 1', 1) 347 351 348 352 ! mode_top_bound : fields towards which sponge relaxation will be done:
Note: See TracChangeset
for help on using the changeset viewer.