Changeset 2010 for LMDZ5/trunk/libf/phylmd/rrtm/yomphy3.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/yomphy3.F90 (modified) (1 diff)

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

@@ -192 +192 @@
 REAL(KIND=JPRB) :: REXP_NEB
 !     ------------------------------------------------------------------
+!$OMP THREADPRIVATE(bsfsa,bsfsi,bsfsn,bsfta,bsfti,bsftn,earrt,eoasa,eoasi,eoasn,eoata,eoati,eoatn,eodsa,eodsi)
+!$OMP THREADPRIVATE(eodsn,eodta,eodti,eodtn,eoray,fcm_del_a,fcm_del_d,fcm_mu_a,fcm_mu_d,fcm_n_i,fcm_n_l,fcm_p_ai)
+!$OMP THREADPRIVATE(fcm_p_al,fcm_p_di,fcm_p_dl,fcm_p_gi,fcm_p_gl,fcm_q_ai,fcm_q_al,fcm_q_di,fcm_q_dl,fcm_q_gi)
+!$OMP THREADPRIVATE(fcm_q_gl,gca,gcb,gcc,gcd4,gce4,girec1,girec2,girec3,girec4,qco2,qlimi,qlip0,rexp_neb,rii0)
+!$OMP THREADPRIVATE(usaa,usai,usan,usba,usbi,usbn,vdp,vnp)
 END MODULE YOMPHY3