Changeset 2920 for palm/trunk/SOURCE/plant_canopy_model_mod.f90

Timestamp:

Mar 22, 2018 11:22:01 AM (7 years ago)

Author:

kanani

Message:

Optimize SVF calculation, clean-up, bugfixes

File:

• palm/trunk/SOURCE/plant_canopy_model_mod.f90 (modified) (4 diffs)

palm/trunk/SOURCE/plant_canopy_model_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Move usm_lad_rma and prototype_lad to radiation_model (moh.hefny)
+! 
+! 2892 2018-03-14 15:06:29Z suehring
 ! Bugfix, read separate ASCII LAD files for parent and child model. 
 ! 
@@ -190 +193 @@
 
     LOGICAL ::  calc_beta_lad_profile = .FALSE. !< switch for calc. of lad from beta func.
-    LOGICAL ::  usm_lad_rma = .TRUE.            !< use MPI RMA to access LAD for raytracing (instead of global array)
 
     REAL(wp) ::  alpha_lad = 9999999.9_wp         !< coefficient for lad calculation
@@ -205 +207 @@
     REAL(wp) ::  lsc = 0.0_wp                     !< leaf surface concentration
     REAL(wp) ::  lsec = 0.0_wp                    !< leaf scalar exchange coeff.
-    REAL(wp) ::  prototype_lad                    !< prototype leaf area density for computing effective optical depth
 
     REAL(wp) ::  lad_vertical_gradient(10) = 0.0_wp              !< lad gradient
@@ -230 +231 @@
 !-- Public variables and constants
     PUBLIC pc_heating_rate, canopy_mode, cthf, dt_plant_canopy, lad, lad_s,   &
-           pch_index, prototype_lad, usm_lad_rma
+           pch_index