Ignore:
Timestamp:
Apr 16, 2020, 4:59:06 PM (5 years ago)
Author:
oboucher
Message:

adding some missing OMP THREADPRIVATE in StratAer? code

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/StratAer/interp_sulf_input.F90

    r3526 r3663  
    3434  INTEGER n_lon   ! number of longitudes in the input data
    3535  INTEGER, SAVE :: n_lev   ! number of levels in the input data
     36!$OMP THREADPRIVATE(n_lev)
    3637  INTEGER n_mth   ! number of months in the input data
    3738  INTEGER, SAVE :: mth_pre
Note: See TracChangeset for help on using the changeset viewer.