Changeset 4165 for LMDZ6/trunk/libf/phylmd/rrtm

Timestamp:

May 26, 2022, 9:56:53 PM (3 years ago)

Author:

oboucher

Message:

Correction of single scattering albedo and asymetry factor for insoluble BC and POM
these were swapped in previous version

File:

• LMDZ6/trunk/libf/phylmd/rrtm/aeropt_6bands_rrtm.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/rrtm/aeropt_6bands_rrtm.F90

@@ -318 +318 @@
    ! Dust insoluble
   0.894, 0.902, 0.937, 0.980, 0.993, 0.967, &
-   ! BC insoluble 
+   ! BC insoluble
+  0.480, 0.469, 0.456, 0.427, 0.349, 0.196, &
+   ! POM insoluble
+  0.956, 0.965, 0.969, 0.953, 0.892, 0.826, &
+   ! Nitrate insoluble
+  1.000, 1.000, 1.000, 1.000, 0.999, 0.707 /
+
+  DATA cg_aeri_6bands/ &
+   ! Dust insoluble
+  0.756, 0.737, 0.713, 0.701, 0.696, 0.672, &
+   ! BC insoluble
   0.820, 0.760, 0.695, 0.603, 0.469, 0.276, &
    ! POM insoluble
   0.687, 0.685, 0.673, 0.637, 0.553, 0.340, &
-   ! Nitrate insoluble
-  1.000, 1.000, 1.000, 1.000, 0.999, 0.707 /
-
-  DATA cg_aeri_6bands/ &
-   ! Dust insoluble
-  0.756, 0.737, 0.713, 0.701, 0.696, 0.672, &
-   ! BC insoluble 
-  0.480, 0.469, 0.456, 0.427, 0.349, 0.196, &
-   ! POM insoluble
-  0.956, 0.965, 0.969, 0.953, 0.892, 0.826, &
    ! Nitrate insoluble
   0.765, 0.754, 0.743, 0.737, 0.739, 0.651 /