Changeset 1691 for trunk/LMDZ.VENUS/libf/phyvenus/dyn1d
- Timestamp:
- Apr 10, 2017, 11:14:59 AM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.VENUS/libf/phyvenus/dyn1d/rcm1d.F
r1621 r1691 194 194 READ(unit,*) lati(1) 195 195 PRINT *,lati(1) 196 lati(1)=lati(1)*pi/180. ! must be in radians. 196 197 long(1)=0.E+0 197 198 … … 206 207 cufi(1)=1.E+0 207 208 cvfi(1)=1.E+0 209 210 call ini_cpdet 208 211 209 212 c Ehouarn: iniphysiq requires arrays related to (3D) dynamics grid, … … 220 223 & rad,g,r,cpp,1) 221 224 222 call ini_cpdet223 224 225 c le geopotentiel au sol est inutile en 1D car tout est controle 225 226 c par la pression de surface ---> … … 348 349 solsw(1) = 0. 349 350 sollw(1) = 0. 350 fder(1) 351 fder(1) = 0. 351 352 radsol(1) = 0. 352 353
Note: See TracChangeset
for help on using the changeset viewer.