Changeset 4155


Ignore:
Timestamp:
May 18, 2022, 4:36:03 PM (2 years ago)
Author:
Sebastien Nguyen
Message:

remove thread_private for ridicule parameters

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r4153 r4155  
    119119      ridicule_snow = ridicule_qsol         ! For snow                        in kg <-> 1e-8 kg
    120120   REAL, PARAMETER :: expb_max = 30.0
    121 !$OMP THREADPRIVATE(ridicule, ridicule_rain, ridicule_evap, ridicule_qsol, ridicule_snow, expb_max)
    122121
    123122   !--- Specific to HTO:
Note: See TracChangeset for help on using the changeset viewer.