Changeset 2010 for LMDZ5/trunk/libf/phylmd/rrtm/yoecld.F90

Timestamp:

Apr 10, 2014, 11:06:10 AM (10 years ago)

Author:

Laurent Fairhead

Message:

Modifications pour OpenMP

---

OpenMP modifications

File:

• LMDZ5/trunk/libf/phylmd/rrtm/yoecld.F90 (modified) (1 diff)

LMDZ5/trunk/libf/phylmd/rrtm/yoecld.F90

@@ -70 +70 @@
 !  LOMEGA:  LOGICAL  SWITCH FOR OMEGA-FILTER ON MIDDLE CLOUD
 !     ------------------------------------------------------------------
+
+!$OMP THREADPRIVATE(lomega,ranva,ranvb,ranvh,rcca,rccb,rccc,rcfct)
+!$OMP THREADPRIVATE(rclwmr,rcscal,repscr,repsec,retahb,retamb,rgammas)
+!$OMP THREADPRIVATE(rloia,rloib,rloic,rloid,rlonia,rlonib,rrhh,rrhl,rrhm)
+
+!$OMP THREADPRIVATE(ceta)
+
 END MODULE YOECLD