Changeset 1583


Ignore:
Timestamp:
Apr 15, 2015 12:16:27 PM (7 years ago)
Author:
suehring
Message:

Bugfix: particle advection within Prandtl-layer in case of Galilei transformation

File:
1 edited

Legend:

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

    r1370 r1583  
    2020! Current revisions:
    2121! ------------------
    22 !
     22! Bugfix: particle advection within Prandtl-layer in case of Galilei
     23! transformation.
    2324!
    2425! Former revisions:
     
    242243
    243244                u_int  = -usws(j,i) / ( us_int * kappa + 1E-10_wp )           &
    244                          * log_z_z0_int(n)
     245                         * log_z_z0_int(n) - u_gtrans
    245246
    246247             ENDIF
     
    299300
    300301                v_int  = -vsws(j,i) / ( us_int * kappa + 1E-10_wp )             &
    301                          * log_z_z0_int(n)
     302                         * log_z_z0_int(n) - v_gtrans
    302303             ENDIF
    303304          ELSE
Note: See TracChangeset for help on using the changeset viewer.