Ignore:
Timestamp:
Jul 22, 2010, 5:19:06 PM (14 years ago)
Author:
musat
Message:

Modify levels for some outputs to diminsh the CMIP5 storage (JLD)
Add Hines GWD tendencies duhin, dvhin (F.Lott)
IM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/branches/LMDZ4_AR5/libf/phylmd/phys_output_write.h

    r1405 r1419  
    15091509        ENDIF
    15101510
     1511       IF (ok_hines) THEN
     1512       IF (o_duhin%flag(iff)<=lev_files(iff)) THEN
     1513      zx_tmp_fi3d(1:klon,1:klev)=d_u_hin(1:klon,1:klev)/pdtphys
     1514      CALL histwrite_phy(nid_files(iff),o_duhin%name,itau_w,zx_tmp_fi3d)
     1515       ENDIF
     1516
     1517        IF (o_dvhin%flag(iff)<=lev_files(iff)) THEN
     1518      zx_tmp_fi3d(1:klon,1:klev)=d_v_hin(1:klon,1:klev)/pdtphys
     1519      CALL histwrite_phy(nid_files(iff),o_dvhin%name,itau_w,zx_tmp_fi3d)
     1520       ENDIF
     1521        ENDIF
    15111522
    15121523        IF (nqtot.GE.3 .AND. o_trac(1)%flag(iff)<=lev_files(iff)) THEN
Note: See TracChangeset for help on using the changeset viewer.