Changeset 532 for LMDZ4/trunk/libf/phylmd

Timestamp:

Jun 1, 2004, 11:27:10 AM (21 years ago)

Author:

lmdzadmin

Message:

Erreur sur t2mter PL
LF

File:

• LMDZ4/trunk/libf/phylmd/write_histday.h (modified) (1 diff)

LMDZ4/trunk/libf/phylmd/write_histday.h

@@ -326 +326 @@
       CALL histwrite(nid_day,"tsic",itau_w,zx_tmp_2d,iim*jjmp1,ndex2d)
 c
+      zx_tmp_fi2d(1 : klon) = t2m(1 : klon, is_ter)
       CALL gr_fi_ecrit(1, klon,iim,jjmp1, zx_tmp_fi2d, zx_tmp_2d)
       CALL histwrite(nid_day,"t2mter",itau_w,zx_tmp_2d,iim*jjmp1,