Ignore:
Timestamp:
Mar 22, 2018 11:22:01 AM (6 years ago)
Author:
kanani
Message:

Optimize SVF calculation, clean-up, bugfixes

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/plant_canopy_model_mod.f90

    r2892 r2920  
    2525! -----------------
    2626! $Id$
     27! Move usm_lad_rma and prototype_lad to radiation_model (moh.hefny)
     28!
     29! 2892 2018-03-14 15:06:29Z suehring
    2730! Bugfix, read separate ASCII LAD files for parent and child model.
    2831!
     
    190193
    191194    LOGICAL ::  calc_beta_lad_profile = .FALSE. !< switch for calc. of lad from beta func.
    192     LOGICAL ::  usm_lad_rma = .TRUE.            !< use MPI RMA to access LAD for raytracing (instead of global array)
    193195
    194196    REAL(wp) ::  alpha_lad = 9999999.9_wp         !< coefficient for lad calculation
     
    205207    REAL(wp) ::  lsc = 0.0_wp                     !< leaf surface concentration
    206208    REAL(wp) ::  lsec = 0.0_wp                    !< leaf scalar exchange coeff.
    207     REAL(wp) ::  prototype_lad                    !< prototype leaf area density for computing effective optical depth
    208209
    209210    REAL(wp) ::  lad_vertical_gradient(10) = 0.0_wp              !< lad gradient
     
    230231!-- Public variables and constants
    231232    PUBLIC pc_heating_rate, canopy_mode, cthf, dt_plant_canopy, lad, lad_s,   &
    232            pch_index, prototype_lad, usm_lad_rma
     233           pch_index
    233234           
    234235
Note: See TracChangeset for help on using the changeset viewer.