Ignore:
Timestamp:
May 12, 2021, 11:34:46 AM (4 years ago)
Author:
jyg
Message:

bug fix in wx_pbl_var_mod.F90

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/wx_pbl_var_mod.F90

    r3888 r3896  
    2020!$OMP THREADPRIVATE(Ts0_x, Ts0_w)
    2121  REAL, ALLOCATABLE, PROTECTED, DIMENSION(:), SAVE  :: qsat0, dqsatdT0
    22 !$OMP THREADPRIVATE(qsat, dqsat_dT)
     22!$OMP THREADPRIVATE(qsat0, dqsat_dT0)
    2323  REAL, ALLOCATABLE, PROTECTED, DIMENSION(:), SAVE  :: qsat0_x, dqsatdT0_x
    2424!$OMP THREADPRIVATE(qsat0_x, dqsatdT0_x)
Note: See TracChangeset for help on using the changeset viewer.