Changeset 5401 for LMDZ6


Ignore:
Timestamp:
Dec 10, 2024, 11:37:55 AM (6 days ago)
Author:
evignon
Message:

meme chose dans phylmdiso

Location:
LMDZ6/trunk/libf/phylmdiso
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmdiso/climb_hq_mod.F90

    r5296 r5401  
    539539!****************************************************************************************
    540540    LOGICAL, SAVE                            :: last=.FALSE.
     541!$OMP THREADPRIVATE(last)
    541542    REAL, DIMENSION(klon,klev)               :: h_new, q_new
    542543    REAL, DIMENSION(klon)                    :: psref         

  • LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90

    r5397 r5401  
    12751275    REAL, ALLOCATABLE, SAVE :: press_edg_climoz(:) ! Edges of pressure intervals
    12761276    REAL, ALLOCATABLE, SAVE :: time_climoz(:)      ! Time vector
     1277!$OMP THREADPRIVATE(ncid_climoz,press_cen_climoz,press_edg_climoz,time_climoz)
    12771278    CHARACTER(LEN=13), PARAMETER :: vars_climoz(2) &
    12781279                                  = ["tro3         ","tro3_daylight"]
Note: See TracChangeset for help on using the changeset viewer.