Changeset 1585 for palm/trunk/SOURCE/package_parin.f90

Timestamp:

Apr 30, 2015 7:05:52 AM (9 years ago)

Author:

maronga

Message:

Added support for RRTMG radiation code

File:

• palm/trunk/SOURCE/package_parin.f90 (modified) (3 diffs)

palm/trunk/SOURCE/package_parin.f90

@@ -20 +20 @@
 ! Current revisions:
 ! -----------------
-! 
+! Added several radiation_par parameters
 !
 ! Former revisions:
@@ -144 +144 @@
 
     USE radiation_model_mod,                                                   &
-        ONLY: albedo, day_init, dt_radiation, lambda, net_radiation, radiation,&
-              radiation_scheme, time_radiation, time_utc_init 
+        ONLY: albedo, albedo_type, albedo_lw_dif, albedo_lw_dir, albedo_sw_dif,&
+              albedo_sw_dir, day_init, constant_albedo, dt_radiation, lambda,  &
+              lw_radiation, net_radiation, radiation, radiation_scheme,        &
+              sw_radiation, time_utc_init
                 
 
@@ -221 +223 @@
                                   write_particle_statistics
 
-    NAMELIST /radiation_par/      albedo, day_init, dt_radiation, lambda,      &
-                                  net_radiation, radiation_scheme, time_utc_init 
+    NAMELIST /radiation_par/      albedo, albedo_type, albedo_lw_dir,          &
+                                  albedo_lw_dif, albedo_sw_dir, albedo_sw_dif, &
+                                  constant_albedo, day_init, dt_radiation,     &
+                                  lambda, lw_radiation, net_radiation,         &
+                                  radiation_scheme, sw_radiation, time_utc_init 
 
     NAMELIST /spectra_par/        averaging_interval_sp, comp_spectra_level,   &