Changeset 2481 for trunk/LMDZ.MARS/libf/phymars
- Timestamp:
- Mar 18, 2021, 10:40:53 AM (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/libf/phymars/physiq_mod.F
r2467 r2481 2681 2681 & (1000*mmol(iq)) 2682 2682 2683 call wstats(ngrid," rho_"//trim(noms(iq)),2683 call wstats(ngrid,"num_"//trim(noms(iq)), 2684 2684 $ "Number density","cm-3",3,rhopart) 2685 call writediagfi(ngrid," rho_"//trim(noms(iq)),2685 call writediagfi(ngrid,"num_"//trim(noms(iq)), 2686 2686 $ "Number density","cm-3",3,rhopart) 2687 2687 … … 2813 2813 & ,"kg.m-2",2,watercap) 2814 2814 2815 call WRITEDIAGFI(ngrid,"temp_layer1","temperature in layer 1", 2816 & "K",2,zt(1,1)) 2815 2817 call WRITEDIAGFI(ngrid,"temp7","temperature in layer 7", 2816 2818 & "K",2,zt(1,7))
Note: See TracChangeset
for help on using the changeset viewer.