Changeset 4853 for LMDZ6/trunk/libf/phylmd/ecrad/radiation/radiation_cloud.F90

Timestamp:

Mar 19, 2024, 3:34:21 PM (2 months ago)

Author:

idelkadi

Message:

Ecrad update in LMDZ / Implementation of Ecrad double call in LMDZ

• version 1.6.1 (commit 210d7911380f53a788c3cad73b3cf9b4e022ef87)
• interface routines between lmdz and ecrad grouped in a new "lmdz" directory
• double call method redesigned so as to go through the Ecrad initialization and configuration part only once for the entire simulation
• clean-up in the read.F routine: delete unitules arguments
• modification of default gas model in namelist (default: ECCKD)

File:

• LMDZ6/trunk/libf/phylmd/ecrad/radiation/radiation_cloud.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmd/ecrad/radiation/radiation_cloud.F90

@@ -64 +64 @@
     ! gridbox area for use in representing 3D effects. This variable
     ! is dimensioned (ncol,nlev).
-    real(jprb), allocatable,  dimension(:,:) :: inv_cloud_effective_size ! m-1
+    real(jprb), allocatable, dimension(:,:) :: inv_cloud_effective_size ! m-1
 
     ! Similarly for the in-cloud heterogeneities, used to compute the
@@ -606 +606 @@
 
     use yomhook,                  only : lhook, dr_hook, jphook
-!    USE mod_phys_lmdz_para
 
     class(cloud_type), intent(inout) :: this