Changeset 6154 for LMDZ6/trunk/libf/phylmd/phys_output_var_mod.f90

Timestamp:

Apr 3, 2026, 4:44:15 PM (10 days ago)

Author:

asima

Message:

Adding variables cdnc and cdnc_pi in output

File:

• LMDZ6/trunk/libf/phylmd/phys_output_var_mod.f90 (modified) (3 diffs)

LMDZ6/trunk/libf/phylmd/phys_output_var_mod.f90

@@ -71 +71 @@
   REAL, SAVE, ALLOCATABLE :: scdnc(:,:)
   !$OMP THREADPRIVATE(scdnc)
+  REAL, SAVE, ALLOCATABLE :: cdnc(:,:)
+  !$OMP THREADPRIVATE(cdnc)
+  REAL, SAVE, ALLOCATABLE :: cdnc_pi(:,:)
+  !$OMP THREADPRIVATE(cdnc_pi)
   REAL, SAVE, ALLOCATABLE :: cldncl(:)
   !$OMP THREADPRIVATE(cldncl)
@@ -248 +252 @@
 ! Sorties de lmdz_cloud_optics_pro
     ALLOCATE(scdnc(klon, klev))
+    ALLOCATE(cdnc(klon, klev))
+    ALLOCATE(cdnc_pi(klon, klev))
     ALLOCATE(cldncl(klon))
     ALLOCATE(reffclwtop(klon))
@@ -314 +320 @@
 
     DEALLOCATE(scdnc)
+    DEALLOCATE(cdnc)
+    DEALLOCATE(cdnc_pi)
     DEALLOCATE(cldncl)
     DEALLOCATE(reffclwtop)