Changeset 1380 for LMDZ4/branches/LMDZ4V5.0-dev/libf/dyn3d/iniconst.F
- Timestamp:
- May 6, 2010, 2:24:59 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4V5.0-dev/libf/dyn3d/iniconst.F
r1299 r1380 19 19 #include "temps.h" 20 20 #include "comvert.h" 21 #include "iniprint.h" 21 22 22 23 … … 48 49 r = cpp * kappa 49 50 50 PRINT*,'R CP Kappa ', r , cpp, kappa51 write(lunout,*)'iniconst: R CP Kappa ', r , cpp, kappa 51 52 c 52 53 c-----------------------------------------------------------------------
Note: See TracChangeset
for help on using the changeset viewer.