Changeset 1112 for trunk/LMDZ.MARS/libf/phymars/testphys1d.F
- Timestamp:
- Nov 20, 2013, 10:26:12 AM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/libf/phymars/testphys1d.F
r1047 r1112 663 663 c It is needed to transfert physics variables to "physiq"... 664 664 665 call physdem0("startfi.nc",long,lati,nsoilmx,ngrid mx,llm,nq,665 call physdem0("startfi.nc",long,lati,nsoilmx,ngrid,llm,nq, 666 666 . dtphys,float(day0),time,area, 667 667 . albedodat,inertiedat,zmea,zstd,zsig,zgam,zthe) 668 call physdem1("startfi.nc",nsoilmx,ngrid mx,llm,nq,668 call physdem1("startfi.nc",nsoilmx,ngrid,llm,nq, 669 669 . dtphys,time, 670 670 . tsurf,tsoil,co2ice,emis,q2,qsurf)
Note: See TracChangeset
for help on using the changeset viewer.