/[lmdze]/trunk/phylmd/ini_histins.f
ViewVC logotype

Diff of /trunk/phylmd/ini_histins.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 309 by guez, Thu Sep 27 14:58:10 2018 UTC revision 326 by guez, Mon Jun 10 00:29:10 2019 UTC
# Line 15  contains Line 15  contains
15      use comconst, only: dtphys      use comconst, only: dtphys
16      use dimensions, only: iim, jjm, llm, nqmx      use dimensions, only: iim, jjm, llm, nqmx
17      use disvert_m, only: presnivs      use disvert_m, only: presnivs
18      use dynetat0_m, only: day_ref, annee_ref, rlatu, rlonv      use dynetat0_m, only: rlatu, rlonv
19        use dynetat0_chosen_m, only: day_ref, annee_ref
20      USE histbeg_totreg_m, ONLY : histbeg_totreg      USE histbeg_totreg_m, ONLY : histbeg_totreg
21      USE histdef_m, ONLY : histdef      USE histdef_m, ONLY : histdef
22      USE histend_m, ONLY : histend      USE histend_m, ONLY : histend
23      USE histvert_m, ONLY : histvert      USE histvert_m, ONLY : histvert
24      use indicesol, only: nbsrf, clnsurf      use indicesol, only: nbsrf, clnsurf
25      use iniadvtrac_m, only: tname, ttext      use infotrac_init_m, only: tname, ttext
26      use nr_util, only: pi      use nr_util, only: pi
27      use phyetat0_m, only: itau_phy      use phyetat0_m, only: itau_phy
28      USE ymds2ju_m, only: ymds2ju      USE ymds2ju_m, only: ymds2ju
# Line 264  contains Line 265  contains
265         CALL histdef(nid_ins, "dtlw0", "CS LW radiation dT", &         CALL histdef(nid_ins, "dtlw0", "CS LW radiation dT", &
266              "K/s", iim, jjm + 1, nhori, llm, 1, llm, nvert, "inst(X)", &              "K/s", iim, jjm + 1, nhori, llm, 1, llm, nvert, "inst(X)", &
267              zsto, zout)              zsto, zout)
268           CALL histdef(nid_ins, "pmflxr", "convective precipitation liquid", "", &
269                iim, jjm + 1, nhori, llm, 1, llm, nvert, "inst(X)", zsto, zout)
270    
271         if (ok_newmicro) then         if (ok_newmicro) then
272            CALL histdef(nid_ins, "re", "cloud droplet effective radius", &            CALL histdef(nid_ins, "re", "cloud droplet effective radius", &
Legend:
Removed from v.309  
changed lines
  Added in v.326
  ViewVC Help
Powered by ViewVC 1.1.21