Changeset 3245 for palm


Ignore:
Timestamp:
Sep 13, 2018 2:08:16 PM (6 years ago)
Author:
knoop
Message:

Bugfix: wrong use of surf_lsm_h changed to surf_usm_h

File:
1 edited

Legend:

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

    r3241 r3245  
    32153215                   surf_e = surf_usm_h%end_index(j,i)
    32163216                   DO  m = surf_s, surf_e
    3217                       k = surf_lsm_h%k(m)
     3217                      k = surf_usm_h%k(m)
    32183218
    32193219                      IF ( .NOT. cloud_physics .AND. .NOT. cloud_droplets ) THEN
Note: See TracChangeset for help on using the changeset viewer.