Changeset 2910 for LMDZ5/trunk


Ignore:
Timestamp:
Jun 13, 2017, 6:08:30 PM (7 years ago)
Author:
jbmadeleine
Message:

Added THREADPRIVATE for firstcall and alpha_vert in cloudth_vert_v3 as well.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/trunk/libf/phylmd/cloudth_mod.F90

    r2909 r2910  
    861861      ! (J Jouhaud, JL Dufresne, JB Madeleine)
    862862      REAL,SAVE :: vert_alpha
     863      !$OMP THREADPRIVATE(vert_alpha)
    863864      LOGICAL, SAVE :: firstcall = .TRUE.
     865      !$OMP THREADPRIVATE(firstcall)
    864866
    865867      REAL zpdf_sig(ngrid),zpdf_k(ngrid),zpdf_delta(ngrid)
Note: See TracChangeset for help on using the changeset viewer.