Changeset 3122


Ignore:
Timestamp:
Jul 11, 2018 9:46:41 PM (6 years ago)
Author:
maronga
Message:

bugfix in radiation model that inhibited surface reflections

File:
1 edited

Legend:

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

    r3117 r3122  
    2828! -----------------
    2929! $Id$
     30! Bugfix: maximum distance for raytracing was set to  -999 m by default,
     31! effectively switching off all surface reflections when max_raytracing_dist
     32! was not explicitly set in namelist
     33!
     34! 3117 2018-07-11 09:59:11Z maronga
    3035! Bugfix: water vapor was not transfered to RRTMG when cloud_physics = .F.
    3136! Bugfix: changed the calculation of RRTMG boundary conditions (Mohamed Salim)
     
    51665171!
    51675172!--    check max_raytracing_dist relative to urban surface layer height
    5168 !        mrl = 2.0_wp * nzu * dz
     5173       mrl = 2.0_wp * nzu * dz(1)
     5174       IF ( max_raytracing_dist == -999.0_wp ) THEN
     5175          max_raytracing_dist = mrl
     5176       ENDIF
    51695177!        IF ( max_raytracing_dist <= mrl ) THEN
    51705178!           IF ( max_raytracing_dist /= -999.0_wp ) THEN
Note: See TracChangeset for help on using the changeset viewer.