Ignore:
Timestamp:
Jun 7, 2017 1:58:08 PM (7 years ago)
Author:
suehring
Message:

change default value of zeta_min; enable scalar/heat/water-fluxes at downward-facing surfaces, bugfix Makefile

File:
1 edited

Legend:

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

    r2233 r2256  
    2525! -----------------
    2626! $Id$
     27! Change default value of zeta_min to -20
     28! Increase dimension for wall_heatflux, etc.
     29!
     30! 2233 2017-05-30 18:08:54Z suehring
    2731!
    2832! 2232 2017-05-30 17:47:52Z suehring
     
    13311335    REAL(wp) ::  wall_adjustment_factor = 1.8_wp               !<
    13321336    REAL(wp) ::  zeta_max = 20.0_wp                            !< Maximum value of zeta = z/L
    1333     REAL(wp) ::  zeta_min = -9990.0_wp                         !< Minimum value of zeta = z/L
     1337    REAL(wp) ::  zeta_min = -20.0_wp                           !< Minimum value of zeta = z/L
    13341338    REAL(wp) ::  z_max_do2d = -1.0_wp                          !<
    13351339    REAL(wp) ::  z0h_factor = 1.0_wp                           !<
     
    13641368    REAL(wp) ::  volume_flow_area(1:3) = 0.0_wp                    !<
    13651369    REAL(wp) ::  volume_flow_initial(1:3) = 0.0_wp                 !<
    1366     REAL(wp) ::  wall_heatflux(0:4) = 0.0_wp                       !<
    1367     REAL(wp) ::  wall_humidityflux(0:4) = 0.0_wp                   !<
    1368     REAL(wp) ::  wall_salinityflux(0:4) = 0.0_wp                   !<
    1369     REAL(wp) ::  wall_scalarflux(0:4) = 0.0_wp                     !<
     1370    REAL(wp) ::  wall_heatflux(0:5) = 0.0_wp                       !<
     1371    REAL(wp) ::  wall_humidityflux(0:5) = 0.0_wp                   !<
     1372    REAL(wp) ::  wall_salinityflux(0:5) = 0.0_wp                   !<
     1373    REAL(wp) ::  wall_scalarflux(0:5) = 0.0_wp                     !<
    13701374    REAL(wp) ::  subs_vertical_gradient(10) = 0.0_wp               !<
    13711375    REAL(wp) ::  subs_vertical_gradient_level(10) = -9999999.9_wp  !<
Note: See TracChangeset for help on using the changeset viewer.