Changeset 3042 for trunk/LMDZ.MARS/libf


Ignore:
Timestamp:
Sep 13, 2023, 2:33:49 PM (22 months ago)
Author:
jbclement
Message:

Mars PEM:
The date and time are redefined at the end of PEM to write the file "restarfi_evol.nc". Like so, the next GCM runs can restart at the date and time given at the beginning of the simulation since the PEM is only progressing by step of one Martian year.
JBC

Location:
trunk/LMDZ.MARS/libf/phymars
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.F

    r3036 r3042  
    9797      REAL day            ! date during the run
    9898      REAL time           ! time (0<time<1 ; time=0.5 a midi)
    99       REAL dttestphys         ! testphys1d timestep
     99      REAL dttestphys     ! testphys1d timestep
    100100      REAL play(nlayer)   ! Pressure at the middle of the layers (Pa)
    101101      REAL plev(nlayer+1) ! intermediate pressure levels (pa)

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

    r3037 r3042  
    258258c ----------------------
    259259      INTEGER,SAVE :: day_ini ! Initial date of the run (sol since Ls=0)
    260       INTEGER,SAVE :: icount     ! counter of calls to physiq during the run.
     260      INTEGER,SAVE :: icount  ! Counter of calls to physiq during the run.
    261261      REAL,SAVE :: time_phys
    262262
Note: See TracChangeset for help on using the changeset viewer.