Changeset 2056 for LMDZ5/branches/testing/libf/phylmd/rrtm/gfl_subs.F90
- Timestamp:
- Jun 11, 2014, 3:46:46 PM (10 years ago)
- Location:
- LMDZ5/branches/testing
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/branches/testing
- Property svn:mergeinfo changed
/LMDZ5/trunk merged: 1998,2000-2023,2025-2029,2032,2034,2036-2049,2051-2055
- Property svn:mergeinfo changed
-
LMDZ5/branches/testing/libf/phylmd/rrtm/gfl_subs.F90
r1999 r2056 53 53 TYPE(TYPE_GFL_COMP) :: YCPF_SAVE ! For saving status of cloud fields 54 54 LOGICAL :: L_CLD_DEACT=.FALSE. 55 56 !$OMP THREADPRIVATE(l_cld_deact,ya_save,ycpf_save,yi_save,yl_save,ylastgflc,yptrc,yr_save,ys_save) 55 57 56 58 #include "abor1.intfb.h" … … 115 117 LOGICAL,SAVE :: LLFIRSTCALL = .TRUE. 116 118 REAL(KIND=JPRB) :: ZHOOK_HANDLE 119 !$OMP THREADPRIVATE(llfirstcall) 120 117 121 118 122 !-------------------------------------------------------------------------
Note: See TracChangeset
for help on using the changeset viewer.