Changeset 7468 for branches/ORCHIDEE_2_2

Timestamp:

2022-02-04T17:59:29+01:00 (3 years ago)

Author:

josefine.ghattas

Message:

Bug correction. Added missing OMP THREADPRIVATE needed to run in coupled mode.

File:

• branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/slowproc.f90 (modified) (1 diff)

branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/slowproc.f90

@@ -71 +71 @@
 !$OMP THREADPRIVATE(siltfraction)  
   REAL(r_std), ALLOCATABLE, SAVE, DIMENSION (:,:,:)  :: laimap              !! LAI map when the LAI is prescribed and not calculated by STOMATE
+!$OMP THREADPRIVATE(laimap)
   REAL(r_std), ALLOCATABLE, SAVE, DIMENSION (:,:)    :: veget_max_new       !! New year fraction of vegetation type (0-1, unitless)
 !$OMP THREADPRIVATE(veget_max_new)