Changeset 6056 for LMDZ6/trunk/libf/phylmd/cospv2/lmdz/lmdz_cosp_interface.F90

Timestamp:

Jan 27, 2026, 9:29:11 AM (8 days ago)

Author:

idelkadi

Message:

Cospv2 implementation in LMDZ (continued, corrections)

File:

• LMDZ6/trunk/libf/phylmd/cospv2/lmdz/lmdz_cosp_interface.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/cospv2/lmdz/lmdz_cosp_interface.F90

@@ -410 +410 @@
 ! note: reff_cosp dimensions should be same as cosp (reff_cosp has 9 hydrometeor dimension)
      Reff(1:Npoints,1:Nlevels,1:N_HYDRO) = 0.
-     !Reff(:,:,I_LSCLIQ) = ref_liq*1e-6
-     !Reff(:,:,I_LSCICE) = ref_ice*1e-6
-     Reff(:,:,I_LSCLIQ) = ref_liq
-     Reff(:,:,I_LSCICE) = ref_ice
+     Reff(:,:,I_LSCLIQ) = ref_liq*1e-6
+     Reff(:,:,I_LSCICE) = ref_ice*1e-6
      !IF (is_master) print*,'Reff(:,:,I_LSCLIQ) = ',Reff(:,:,I_LSCLIQ)
      !IF (is_master) print*,'Reff(:,:,I_LSCICE) = ',Reff(:,:,I_LSCICE)