Changeset 48 for LMDZ.3.3/trunk/libf
- Timestamp:
- Feb 9, 2000, 11:58:45 AM (25 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ.3.3/trunk/libf/phylmd/physiq.F
r47 r48 2310 2310 . iim*(jjm+1)*klev,ndex3d) 2311 2311 c 2312 CALL gr_fi_ecrit(klev,klon,iim,jjm+1, d_q_dyn(1,1,ivap), 2313 . zx_tmp_3d) 2312 CALL gr_fi_ecrit(klev,klon,iim,jjm+1, d_q_dyn, zx_tmp_3d) 2314 2313 CALL histwrite(nid_mth,"dqdyn",itap,zx_tmp_3d, 2315 2314 . iim*(jjm+1)*klev,ndex3d)
Note: See TracChangeset
for help on using the changeset viewer.