Changeset 2087 for LMDZ5/trunk/libf
- Timestamp:
- Jul 10, 2014, 9:18:06 AM (10 years ago)
- Location:
- LMDZ5/trunk/libf
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/dyn3d/iniacademic.F90
r2083 r2087 79 79 80 80 ! Sanity check: verify that options selected by user are not incompatible 81 if ((iflag_phys==1).and. (read_start==.false.)) then81 if ((iflag_phys==1).and. .not. read_start) then 82 82 write(lunout,*) trim(modname)," error: if read_start is set to ", & 83 83 " false then iflag_phys should not be 1" -
LMDZ5/trunk/libf/dyn3dmem/iniacademic_loc.F90
r2083 r2087 82 82 83 83 ! Sanity check: verify that options selected by user are not incompatible 84 if ((iflag_phys==1).and. (read_start==.false.)) then84 if ((iflag_phys==1).and. .not. read_start) then 85 85 write(lunout,*) trim(modname)," error: if read_start is set to ", & 86 86 " false then iflag_phys should not be 1" -
LMDZ5/trunk/libf/dyn3dpar/iniacademic.F90
r2083 r2087 79 79 80 80 ! Sanity check: verify that options selected by user are not incompatible 81 if ((iflag_phys==1).and. (read_start==.false.)) then81 if ((iflag_phys==1).and. .not. read_start) then 82 82 write(lunout,*) trim(modname)," error: if read_start is set to ", & 83 83 " false then iflag_phys should not be 1"
Note: See TracChangeset
for help on using the changeset viewer.