Ignore:
Timestamp:
Mar 19, 2018 8:56:40 AM (4 years ago)
Author:
Giersch
Message:

new procedure for reading/writing svf data, initialization of local variable ids

File:
1 edited

Legend:

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

    r2894 r2906  
    2525! -----------------
    2626! $Id$
     27! Module control_parameters has been extended with ENVIRONMENT variables
     28! read/write_svf
     29!
     30! 2894 2018-03-15 09:17:58Z Giersch
    2731! _prerun flags were removed, Control paramters restart_string and length have
    2832! been added
     
    12981302    LOGICAL ::  rans_tke_e = .FALSE.                             !< use TKE-e turbulence closure for RANS mode
    12991303    LOGICAL ::  rans_tke_l = .FALSE.                             !< use TKE-l turbulence closure for RANS mode
     1304    LOGICAL ::  read_svf = .FALSE.                               !< ENVPAR namelist parameter to steer input of svf (ENVPAR is created by palmrun)
    13001305    LOGICAL ::  recycling_yshift = .FALSE.                       !< namelist parameter
    13011306    LOGICAL ::  run_control_header = .FALSE.                     !< onetime output of RUN_CONTROL header
     
    13271332    LOGICAL ::  wall_adjustment = .TRUE.                         !< namelist parameter
    13281333    LOGICAL ::  wind_turbine = .FALSE.                           !< flag for use of wind turbine model
    1329     LOGICAL ::  write_binary = .FALSE.                           !< ENVPAR namelist parameter to steer restart I/O (ENVPAR is created by mrun)
     1334    LOGICAL ::  write_binary = .FALSE.                           !< ENVPAR namelist parameter to steer restart I/O (ENVPAR is created by palmrun)
     1335    LOGICAL ::  write_svf = .FALSE.                              !< ENVPAR namelist parameter to steer output of svf (ENVPAR is created by palmrun)
    13301336    LOGICAL ::  ws_scheme_sca = .FALSE.                          !< use Wicker-Skamarock scheme (scalar advection)?
    13311337    LOGICAL ::  ws_scheme_mom = .FALSE.                          !< use Wicker-Skamarock scheme (momentum advection)?
Note: See TracChangeset for help on using the changeset viewer.