Ignore:
Timestamp:
Jul 1, 2020 4:16:43 PM (7 months ago)
Author:
gronemeier
Message:

renamed Richardson flux number into gradient Richardson number (model_1d_mod.f90, turbulence_closure_mod.f90, header.f90, surface_mod.f90) and zeta (header.f90);
do not add whitespaces at current-revision section (document_changes)

File:
1 edited

Legend:

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

    r4559 r4586  
    2020! Current revisions:
    2121! -----------------
    22 ! 
    23 ! 
     22!
     23!
    2424! Former revisions:
    2525! -----------------
    2626! $Id$
     27! renamed Richardson flux number into gradient Richardson number (1D model)
     28!
     29! 4559 2020-06-11 08:51:48Z raasch
    2730! File re-formatted to follow the PALM coding standard
    2831!
     
    166169
    167170    USE model_1d_mod,                                                                              &
    168         ONLY:  rif1d,                                                                              &
     171        ONLY:  ri1d,                                                                               &
    169172               us1d,                                                                               &
    170173               usws1d,                                                                             &
     
    25352538       IF ( .NOT. constant_diffusion )  THEN
    25362539          IF ( constant_flux_layer )  THEN
    2537              surf%ol(num_h)   = surf%z_mo(num_h) / ( rif1d(nzb+1) + 1.0E-20_wp )
     2540             surf%ol(num_h)   = surf%z_mo(num_h) / ( ri1d(nzb+1) + 1.0E-20_wp )
    25382541             surf%us(num_h)   = us1d
    25392542             surf%usws(num_h) = usws1d
Note: See TracChangeset for help on using the changeset viewer.