Changeset 2258 for LMDZ5/branches/testing/libf/dyn3d/ce0l.F90
- Timestamp:
- Apr 13, 2015, 10:21:09 AM (10 years ago)
- Location:
- LMDZ5/branches/testing
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/branches/testing
- Property svn:mergeinfo changed
/LMDZ5/trunk merged: 2218,2221-2237
- Property svn:mergeinfo changed
-
LMDZ5/branches/testing/libf/dyn3d/ce0l.F90
r1999 r2258 41 41 #include "temps.h" 42 42 #include "logic.h" 43 INTEGER, PARAMETER :: longcles=2044 REAL, DIMENSION(longcles) :: clesphy045 43 REAL, DIMENSION(iip1,jjp1) :: masque 46 44 CHARACTER(LEN=15) :: calnd 47 45 REAL, DIMENSION(iip1,jjp1) :: phis ! geopotentiel au sol 48 46 !------------------------------------------------------------------------------- 49 CALL conf_gcm( 99, .TRUE. , clesphy0)47 CALL conf_gcm( 99, .TRUE. ) 50 48 51 49 CALL Init_Phys_lmdz(iim,jjp1,llm,1,(/(jjm-1)*iim+2/))
Note: See TracChangeset
for help on using the changeset viewer.