Changeset 1142 for LMDZ4/branches/LMDZ4-dev/libf/phylmd/thermcell_main.F90
- Timestamp:
- Apr 7, 2009, 5:53:39 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4-dev/libf/phylmd/thermcell_main.F90
r1134 r1142 484 484 ! Test valable seulement en 1D mais pas genant 485 485 if (.not. (f0(1).ge.0.) ) then 486 stop 'Dans thermcell_main'486 stop 'Dans thermcell_main' 487 487 endif 488 488
Note: See TracChangeset
for help on using the changeset viewer.
