Changeset 2406 for trunk


Ignore:
Timestamp:
Aug 31, 2020, 9:49:37 AM (4 years ago)
Author:
emillour
Message:

Mars GCM:
Uncomment output of SW and LW heating rates via writediagfi in physiq
(since diagfi.def controls what ends up in diagfi.nc)
EM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/physiq_mod.F

    r2385 r2406  
    28392839c        call WRITEDIAGFI(ngrid,"ssurf","Surface stress","N.m-2",2,
    28402840c    &                  zstress)
    2841 c        call WRITEDIAGFI(ngrid,'sw_htrt','sw heat. rate',
    2842 c    &                   'w.m-2',3,zdtsw)
    2843 c        call WRITEDIAGFI(ngrid,'lw_htrt','lw heat. rate',
    2844 c    &                   'w.m-2',3,zdtlw)
     2841        call WRITEDIAGFI(ngrid,'sw_htrt','sw heat. rate',
     2842     &                   'w.m-2',3,zdtsw)
     2843        call WRITEDIAGFI(ngrid,'lw_htrt','lw heat. rate',
     2844     &                   'w.m-2',3,zdtlw)
    28452845 
    28462846            if (.not.activice) then
Note: See TracChangeset for help on using the changeset viewer.