Ignore:
Timestamp:
Oct 15, 2018 6:40:42 PM (3 years ago)
Author:
suehring
Message:

Do not overwrite values of albedo in radiation_init in case albedo has been already initialized in the urban-surface model via ASCII input

File:
1 edited

Legend:

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

    r3298 r3351  
    2626! -----------------
    2727! $Id$
     28! New flag indication that albedo at urban surfaces is initialized via ASCII
     29! file
     30!
     31! 3298 2018-10-02 12:21:11Z kanani
    2832! - Minor formatting/clean-up (kanani)
    2933! - Removed initialization of cssws with surface_csflux values. Only the value 0
     
    260264    TYPE surf_type
    261265
     266       LOGICAL ::  albedo_from_ascii = .FALSE. !< flag indicating that albedo for urban surfaces is input via ASCII format (just for a workaround)
     267   
    262268       INTEGER(iwp) :: ioff                                !< offset value in x-direction, used to determine index of surface element
    263269       INTEGER(iwp) :: joff                                !< offset value in y-direction, used to determine index of surface element
Note: See TracChangeset for help on using the changeset viewer.