Changeset 1378
- Timestamp:
- May 6, 2010, 12:57:26 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4V5.0-dev/libf/phylmd/physiq.F
r1373 r1378 218 218 REAL d_ps(klon) 219 219 real da(klon,klev),phi(klon,klev,klev),mp(klon,klev) 220 !IM definition dynamique o_trac dans phys_output_open 221 type(ctrl_out) :: o_trac(nqtot) 220 222 c 221 223 cIM Amip2 PV a theta constante … … 1506 1508 & type_ocean,iflag_pbl,ok_mensuel,ok_journe, 1507 1509 & ok_hf,ok_instan,ok_LES,ok_ade,ok_aie, 1508 & read_climoz, new_aod, aerosol_couple) 1510 & read_climoz, new_aod, aerosol_couple, 1511 & o_trac) 1509 1512 c$OMP END MASTER 1510 1513 c$OMP BARRIER
Note: See TracChangeset
for help on using the changeset viewer.