Changeset 2960 for trunk/LMDZ.GENERIC

Timestamp:

May 8, 2023, 5:34:05 PM (20 months ago)

Author:

emillour

Message:

Generic PCM:
Minor follow-up to r2957, since H2O aerosol variance is uniform in space
and time, no need to compute or print its min/max at each radiative time step.
EM

Location:

trunk/LMDZ.GENERIC

Files:

• README (modified) (1 diff)
• libf/phystd/callcorrk.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/README

@@ -1813 +1813 @@
 wstats will be in the stats.nc file (which matches the behaviour prior to
 this improvement).
+
+== 08/05/2023 == EM
+Minor follow-up to r2957, since H2O aerosol variance is uniform in space
+and time, no need to compute or print its min/max at each radiative time step.

trunk/LMDZ.GENERIC/libf/phystd/callcorrk.F90

@@ -472 +472 @@
             end if
 
-            call planetwide_maxval(nueffrad(:,:,iaero_h2o),maxvalue)
-            call planetwide_minval(nueffrad(:,:,iaero_h2o),minvalue)
-            if (is_master) then
-               print*,'Max. H2O cloud particle variance = ',maxvalue
-               print*,'Min. H2O cloud particle variance = ',minvalue
-            end if
+! Currently the variance is constant everywhere (see h2o_reffrad),
+! so no need to compute and print min/max
+!            call planetwide_maxval(nueffrad(:,:,iaero_h2o),maxvalue)
+!            call planetwide_minval(nueffrad(:,:,iaero_h2o),minvalue)
+!            if (is_master) then
+!               print*,'Max. H2O cloud particle variance = ',maxvalue
+!               print*,'Min. H2O cloud particle variance = ',minvalue
+!            end if
          endif