Ignore:
Timestamp:
Dec 15, 2003, 6:50:41 PM (20 years ago)
Author:
lmdzadmin
Message:

Phasage avec la version de Ionela
IM/LF

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ.3.3/branches/rel-LF/libf/phylmd/ini_histmth.h

    r471 r486  
    116116     .                iim,jjmp1,nhori, 1,1,1, -99, 32,
    117117     .                "ave(X)", zsto,zout)
    118 c
    119          CALL histdef(nid_mth, "solldown", "Down. IR rad. at surface",
     118cIM: 071003
     119         CALL histdef(nid_mth,"LWdnSFC","Down. IR rad. at surface",
     120     .                "W/m2", iim,jjmp1,nhori, 1,1,1, -99, 32,
     121     .                "ave(X)", zsto,zout)
     122cIM: 071003
     123         CALL histdef(nid_mth,"LWupSFC","Upwd. IR rad. at surface",
    120124     .                "W/m2", iim,jjmp1,nhori, 1,1,1, -99, 32,
    121125     .                "ave(X)", zsto,zout)
     
    263267     .                "ave(X)", zsto,zout)
    264268c
    265          CALL histdef(nid_mth, "cldq", "Cloud liquid water path", "-",
    266      .                iim,jjmp1,nhori, 1,1,1, -99, 32,
     269         CALL histdef(nid_mth,"cldq","Cloud liquid water path","Kg/m2",
     270     .                iim,jjmp1,nhori, 1,1,1, -99, 32,
     271     .                "ave(X)", zsto,zout)
     272cIM: 071003
     273         CALL histdef(nid_mth,"lwp","Cloud water path","Kg/m2",
     274     .                iim,jjmp1,nhori, 1,1,1, -99, 32,
     275     .                "ave(X)", zsto,zout)
     276c
     277         CALL histdef(nid_mth,"iwp","Cloud ice water path","Kg/m2",
     278     .                iim,jjmp1,nhori, 1,1,1, -99, 32,
     279     .                "ave(X)", zsto,zout)
     280cIM: 071003
     281         CALL histdef(nid_mth,"lwcon","Cloud water content","Kg/Kg",
     282     .                iim,jjmp1,nhori, klev,1,klev, nvert, 32,
     283     .                "ave(X)", zsto,zout)
     284c
     285         CALL histdef(nid_mth,"iwcon","Cloud ice water content","Kg/Kg",
     286     .                iim,jjmp1,nhori, klev,1,klev, nvert, 32,
    267287     .                "ave(X)", zsto,zout)
    268288c
     
    334354     .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
    335355     .                "ave(X)", zsto,zout)
     356cIM: 071003
     357         CALL histdef(nid_mth,"wvap","Water vapor mixing ratio","Kg/Kg",
     358     .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
     359     .                "ave(X)", zsto,zout)
    336360c
    337361         CALL histdef(nid_mth, "geop", "Geopotential height", "m",
     
    374398c
    375399         CALL histdef(nid_mth, "oliq", "Liquid water content", "kg/kg",
     400     .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
     401     .                "ave(X)", zsto,zout)
     402c
     403         CALL histdef(nid_mth, "dtphy", "Physics dT", "K/s",
    376404     .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
    377405     .                "ave(X)", zsto,zout)
     
    400428     .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
    401429     .                "ave(X)", zsto,zout)
     430cIM: 071003
     431         CALL histdef(nid_mth, "dtlschr",
     432     $       "Large-scale condensational heating rate", "K/s",iim,jjmp1
     433     $       ,nhori, klev,1,klev,nvert, 32,"ave(X)", zsto,zout)
    402434c
    403435         CALL histdef(nid_mth, "dqlsc", "Condensation dQ", "Kg/Kg/s",
     
    442474     .                "ave(X)", zsto,zout)
    443475c
    444          CALL histdef(nid_mth, "dtsw0", "SW radiation dT", "K/s",
     476         CALL histdef(nid_mth, "dtsw0", "CS SW radiation dT", "K/s",
    445477     .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
    446478     .                "ave(X)", zsto,zout)
     
    450482     .                "ave(X)", zsto,zout)
    451483c
    452          CALL histdef(nid_mth, "dtlw0", "LW radiation dT", "K/s",
     484         CALL histdef(nid_mth,"dtlw0","CS LW radiation dT","K/s",
    453485     .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
    454486     .                "ave(X)", zsto,zout)
Note: See TracChangeset for help on using the changeset viewer.