Changeset 3429 for trunk/LMDZ.GENERIC


Ignore:
Timestamp:
Sep 18, 2024, 9:01:24 AM (3 months ago)
Author:
emillour
Message:

Generic PCM:
Minor fix following last updates, only fetch slab ocean variables to put
in the restart file if using the slab ocean.
EM

Location:
trunk/LMDZ.GENERIC
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.GENERIC/changelog.txt

    r3423 r3429  
    19731973== 02/09/2024 == SB
    19741974Including variable "tice" in startarchive and newstart
     1975
     1976== 18/09/2024 == EM
     1977Minor fix following last updates, only fetch slab ocean variables to put
     1978in the restart file if using the slab ocean.
  • trunk/LMDZ.GENERIC/libf/phystd/physiq_mod.F90

    r3397 r3429  
    23942394            write(*,*)'PHYSIQ: for physdem ztime_fin =',ztime_fin
    23952395           
    2396             ! fetch "ocean variables" to ensure they are stored
    2397             call ocean_slab_get_vars(ngrid, tslab, tice, sea_ice, flux_g, &
    2398                                      dt_hdiff, dt_ekman, dt_gm)
     2396            if (ok_slab_ocean) then
     2397              ! fetch "ocean variables" to ensure they are stored
     2398              call ocean_slab_get_vars(ngrid, tslab, tice, sea_ice, flux_g, &
     2399                                       dt_hdiff, dt_ekman, dt_gm)
     2400            endif
    23992401
    24002402            call physdem1("restartfi.nc",nsoilmx,ngrid,nlayer,nq, &
Note: See TracChangeset for help on using the changeset viewer.