Changeset 1294 for LMDZ4/branches/LMDZ4V5.0-dev/libf/phylmd/thermcell_out3d.h

Timestamp:

Jan 14, 2010, 3:35:30 PM (14 years ago)

Author:

Laurent Fairhead

Message:

Modifications pour la nouvelle version des thermiques (2009/2010) CR et FH

File:

• LMDZ4/branches/LMDZ4V5.0-dev/libf/phylmd/thermcell_out3d.h (modified) (2 diffs)

LMDZ4/branches/LMDZ4V5.0-dev/libf/phylmd/thermcell_out3d.h

@@ -27 +27 @@
          call wrgradsfi(1,nlay,q2(igout,1:klev),'q2       ','q2       ')
 !
+!
+         call wrgradsfi(1,nlay,wthl(igout,1:klev),'wthl       ','wthl       ')
+         call wrgradsfi(1,nlay,wthv(igout,1:klev),'wthv       ','wthv       ')
+         call wrgradsfi(1,nlay,wq(igout,1:klev),'wq       ','wq       ')
+         
          call wrgradsfi(1,nlay,ztva(igout,1:klev),'ztva      ','ztva      ')
          call wrgradsfi(1,nlay,ztv(igout,1:klev),'ztv       ','ztv       ')
@@ -53 +58 @@
       call wrgradsfi(1,1,f(igout),'f      ','f      ')
       call wrgradsfi(1,1,alim_star_tot(igout),'a_s_t      ','a_s_t      ')
-      call wrgradsfi(1,1,alim_star2(igout),'a_2      ','a_2      ')
       call wrgradsfi(1,1,zmax(igout),'zmax      ','zmax      ')
       call wrgradsfi(1,1,zmax_sec(igout),'z_sec      ','z_sec      ')