Ignore:
Timestamp:
Aug 20, 2019 12:04:06 PM (2 years ago)
Author:
gronemeier
Message:

add vdi_internal_controls

File:
1 edited

Legend:

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

    r4172 r4173  
    2525! -----------------
    2626! $Id$
     27! add vdi_internal_controls
     28!
     29! 4172 2019-08-20 11:55:33Z oliver.maas
    2730! added recycle_absolute_quantities and raq
    2831!
     
    12001203    CHARACTER (LEN=varnamelength), DIMENSION(0:1,500) ::  do2d = ' '  !< label array for 2d output quantities
    12011204    CHARACTER (LEN=varnamelength), DIMENSION(0:1,500) ::  do3d = ' '  !< label array for 3d output quantities
    1202      
     1205
    12031206    CHARACTER (LEN=varnamelength), DIMENSION(7) :: recycle_absolute_quantities = ' '    !< namelist parameter
    12041207   
     
    13181321
    13191322    INTEGER(iwp), DIMENSION(max_masks,mask_xyz_dimension) ::  mask_k_over_surface = -1  !< namelist parameter, k index of height over surface
    1320    
     1323
    13211324    LOGICAL ::  agent_time_unlimited = .FALSE.                   !< namelist parameter
    13221325    LOGICAL ::  air_chemistry = .FALSE.                          !< chemistry model switch
     
    14231426    LOGICAL ::  use_ug_for_galilei_tr = .TRUE.                   !< namelist parameter
    14241427    LOGICAL ::  use_upstream_for_tke = .FALSE.                   !< namelist parameter
     1428    LOGICAL ::  vdi_checks = .FALSE.                             !< do internal controls after VDI 3783 Part 9
    14251429    LOGICAL ::  virtual_flight = .FALSE.                         !< use virtual flight model
    14261430    LOGICAL ::  virtual_measurement = .FALSE.                    !< control parameter to switch-on virtual measurements
Note: See TracChangeset for help on using the changeset viewer.