Changeset 841 for trunk/LMDZ.TITAN/libf
- Timestamp:
- Nov 13, 2012, 9:21:32 AM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.TITAN/libf/phytitan/iniphysiq.F
r102 r841 8 8 $ pdayref,ptimestep, 9 9 $ plat,plon,parea,pcu,pcv, 10 $ prad,pg,pr,pcpp )10 $ prad,pg,pr,pcpp,iflag_phys) 11 11 12 12 c … … 49 49 50 50 REAL prad,pg,pr,pcpp,punjours 51 51 INTEGER,INTENT(IN) :: iflag_phys ! type of physics to be called 52 52 INTEGER ngrid,nlayer 53 53 REAL plat(ngrid),plon(ngrid),parea(klon),pcu(klon),pcv(klon)
Note: See TracChangeset
for help on using the changeset viewer.