Changeset 5758 for LMDZ6/trunk/libf/phylmd

Timestamp:

Jul 4, 2025, 12:14:01 PM (5 days ago)

Author:

lguez

Message:

Polish

File:

• LMDZ6/trunk/libf/phylmd/ecrad/lmdz/radiation_setup.f90 (modified) (3 diffs)

LMDZ6/trunk/libf/phylmd/ecrad/lmdz/radiation_setup.f90

@@ -53 +53 @@
   ! no).
   ! AI At the end of the routine, the parameters are read in namelist
-  !    
+  !
   SUBROUTINE SETUP_RADIATION_SCHEME(LOUTPUT,file_name,rad_config,driver_config)
 
@@ -109 +109 @@
     ! results...
     ! Note that NMPSRTM(:)=(/  6, 6, 5, 5, 5, 5, 5, 4, 4, 3, 2, 2, 1, 6 /)
-    ! AI (6 albedo SW bands) 
+    ! AI (6 albedo SW bands)
     call rad_config%define_sw_albedo_intervals(6, &
          &  [0.25e-6_jprb, 0.44e-6_jprb, 0.69e-6_jprb, &
@@ -129 +129 @@
 
     rad_config%i_aerosol_type_map(1:13) = (/ &
-         &  -1, & 
-         &  -2, & 
-         &  -3, & 
-         &  -4, & 
-         &  -5, & 
+         &  -1, &
+         &  -2, &
+         &  -3, &
+         &  -4, &
+         &  -5, &
          &  -6, &
          &  -7, &