Changeset 2518 for LMDZ5/trunk/libf/phylmd

Timestamp:

May 20, 2016, 4:38:46 PM (9 years ago)

Author:

jbmadeleine

Message:

Declaration de la variable zxrunofflic qui manquait suite au commit 2517

File:

• LMDZ5/trunk/libf/phylmd/phys_local_var_mod.F90 (modified) (3 diffs)

LMDZ5/trunk/libf/phylmd/phys_local_var_mod.F90

@@ -281 +281 @@
       REAL,ALLOCATABLE,SAVE,DIMENSION(:) :: zxfluxlat, zxtsol, snow_lsc, zxfqfonte
 !$OMP THREADPRIVATE(zxfluxlat, zxtsol, snow_lsc, zxfqfonte)
+      REAL,ALLOCATABLE,SAVE,DIMENSION(:) :: zxrunofflic
+!$OMP THREADPRIVATE(zxrunofflic)
       REAL,ALLOCATABLE,SAVE,DIMENSION(:) :: zxqsurf, rain_lsc, rain_num
 !$OMP THREADPRIVATE(zxqsurf, rain_lsc, rain_num)
@@ -540 +542 @@
       ALLOCATE(zxfqcalving(klon), zxfluxlat(klon))
       ALLOCATE(zxtsol(klon), snow_lsc(klon), zxfqfonte(klon), zxqsurf(klon))
+      ALLOCATE(zxrunofflic(klon))
       ALLOCATE(rain_lsc(klon))
       ALLOCATE(rain_num(klon))
@@ -745 +748 @@
       DEALLOCATE(uq, ve, vq, zxffonte)
       DEALLOCATE(zxfqcalving, zxfluxlat)
+      DEALLOCATE(zxrunofflic)
       DEALLOCATE(zxtsol, snow_lsc, zxfqfonte, zxqsurf)
       DEALLOCATE(rain_lsc)