Ignore:
Timestamp:
Aug 16, 2019 1:50:17 PM (2 years ago)
Author:
suehring
Message:

Replace get_topography_top_index functions by pre-calculated arrays in order to save computational resources

File:
1 edited

Legend:

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

    r4131 r4168  
    2525! -----------------
    2626! $Id$
     27! +topo_top_ind
     28!
     29! 4131 2019-08-02 11:06:18Z monakurppa
    2730! Add max_pr_salsa to control_parameters. Used in creating profile output for
    2831! salsa.
     
    17551758    INTEGER(iwp), DIMENSION(:,:,:), ALLOCATABLE ::  advc_flags_m            !< flags used to degrade order of advection scheme for momentum
    17561759    INTEGER(iwp), DIMENSION(:,:,:), ALLOCATABLE ::  advc_flags_s            !< flags used to degrade order of advection scheme for scalar quantities
     1760    INTEGER(iwp), DIMENSION(:,:,:), ALLOCATABLE ::  topo_top_ind            !< precalculated topography top indices
    17571761    INTEGER(iwp), DIMENSION(:,:,:), ALLOCATABLE ::  wall_flags_0            !< flags to mask topography and surface-bounded grid points
    17581762
Note: See TracChangeset for help on using the changeset viewer.