Changeset 3522 for trunk/LMDZ.PLUTO/libf


Ignore:
Timestamp:
Nov 15, 2024, 6:57:22 PM (5 weeks ago)
Author:
afalco
Message:

Generic PCM: imported write_output() subroutine from Mars PCM to write both diagfi and XIOS.

Still some bug on a few variables from generic condensation, to be checked.

AF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.PLUTO/libf/phypluto/physiq_mod.F90

    r3508 r3522  
    23902390         call write_output("w","Vertical wind","m.s-1",pw)
    23912391         call write_output("p","Pressure","Pa",pplay)
     2392         call write_output("omega","omega","Pa/s",omega)
    23922393      endif
    23932394
    … …  
    24502451            ! call write_output(trim(noms(iq))//'_surf',trim(noms(iq))//'_surf',  &
    24512452         !                    'kg m^-2',qsurf_hist(1,iq) )
    2452            call write_output(trim(noms(iq))//'_col',trim(noms(iq))//'_col',    &
     2453            call write_output(trim(noms(iq))//'_col',trim(noms(iq))//'_col',    &
    24532454                           'kg m^-2',qcol(:,iq) )
    24542455            call write_output(trim(noms(iq))//'_surf',trim(noms(iq))//'_surf',  &
Note: See TracChangeset for help on using the changeset viewer.