Ignore:
Timestamp:
Aug 21, 2019 2:37:54 PM (22 months ago)
Author:
scharf
Message:

removed comments in 'Former revisions' section that are older than 01.01.2019

File:
1 edited

Legend:

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

    r4168 r4180  
    6767! Comment added
    6868!
    69 ! 3294 2018-10-01 02:37:10Z raasch
    70 ! ocean renamed ocean_mode
    71 !
    72 ! 3241 2018-09-12 15:02:00Z raasch
    73 ! unused variables removed
    74 !
    75 ! 3200 2018-08-17 14:46:36Z suehring
    76 ! Bugfix, missing pre-processor directive
    77 !
    78 ! 3183 2018-07-27 14:25:55Z suehring
    79 ! Rename variables in mesoscale-offline nesting mode
    80 !
    81 ! 3182 2018-07-27 13:36:03Z suehring
    82 ! Bugfix in referencing buildings on orography top
    83 !
    84 ! 3139 2018-07-17 11:30:10Z Giersch
    85 ! Bugfix in case of restarts and grid stretching
    86 !
    87 ! 3115 2018-07-10 12:49:26Z suehring
    88 ! Referencing of buildings onto top of terrain - special treatment for bridges.
    89 !
    90 ! 3103 2018-07-04 17:30:52Z suehring
    91 ! Reference lowest terrain height to zero level
    92 !
    93 ! 3068 2018-06-12 14:49:41Z Giersch
    94 ! New warning message concerning grid stretching has been introduced
    95 !
    96 ! 3066 2018-06-12 08:55:55Z Giersch
    97 ! Bugfix in IF statement before error message
    98 !
    99 ! 3065 2018-06-12 07:03:02Z Giersch
    100 ! New vertical stretching mechanism introduced
    101 !
    102 ! 3051 2018-05-30 17:43:55Z suehring
    103 ! Minor bugfix concerning mapping 3D buildings on top of terrain
    104 !
    105 ! 3045 2018-05-28 07:55:41Z Giersch
    106 ! Error messages revised
    107 !
    108 ! 3045 2018-05-28 07:55:41Z Giersch
    109 ! Error messages revised
    110 !
    111 ! 2968 2018-04-13 11:52:24Z suehring
    112 ! Bugfix in initialization in case of elevated model surface. Introduce
    113 ! index for minimum topography-top.
    114 !
    115 ! 2955 2018-04-09 15:14:01Z suehring
    116 ! Improve topography filter routine and add ghost-point exchange for building
    117 ! ID and building type.
    118 !
    119 ! 2927 2018-03-23 15:13:00Z suehring
    120 ! Bugfix, setting boundary conditions for topography index array.
    121 !
    122 ! 2918 2018-03-21 15:52:14Z gronemeier
    123 ! Moved init_mixing_length to turbulence_closure_mod.f90
    124 !
    125 ! 2897 2018-03-15 11:47:16Z suehring
    126 ! Relax restrictions for topography input, terrain and building heights can be
    127 ! input separately and are not mandatory any more.
    128 !
    129 ! 2893 2018-03-14 16:20:52Z suehring
    130 ! Revise informative message concerning filtered topography (1 grid-point
    131 ! holes).
    132 !
    133 ! 2892 2018-03-14 15:06:29Z suehring
    134 ! Bugfix, uninitialized array in case of single_building.
    135 !
    136 ! 2867 2018-03-09 09:40:23Z suehring
    137 ! Revise mapping of 3D buildings onto onto orography.
    138 !
    139 ! 2823 2018-02-20 15:31:45Z Giersch
    140 ! Set boundary conditions for 3D topography in case of non-cyclic boundary
    141 ! conditions
    142 !
    143 ! 2796 2018-02-08 12:25:39Z suehring
    144 ! Bugfix in 3D building initialization
    145 !
    146 ! 2747 2018-01-15 12:44:17Z suehring
    147 ! Bugfix, topography height is rounded to the nearest discrete grid level
    148 !
    149 ! 2718 2018-01-02 08:49:38Z maronga
    150 ! Corrected "Former revisions" section
    151 !
    152 ! 2701 2017-12-15 15:40:50Z suehring
    153 ! Changes from last commit documented
    154 !
    155 ! 2698 2017-12-14 18:46:24Z suehring
    156 ! Bugfix in get_topography_top_index
    157 !
    158 ! 2696 2017-12-14 17:12:51Z kanani
    159 ! Change in file header (GPL part)
    160 ! Revised topography input
    161 ! Set nzb_max not for the entire nest domain, only for boundary PEs
    162 ! Re-organize routine, split-up into several subroutines
    163 ! Modularize poismg_noopt
    164 ! Remove setting bit 26, 27, 28 in wall_flags_0, indicating former '_outer'
    165 ! arrays (not required any more). 
    166 ! Bugfix in generic tunnel setup (MS)
    167 !
    168 ! 2550 2017-10-16 17:12:01Z boeske
    169 ! Set lateral boundary conditions for topography on all three ghost layers
    170 !
    171 ! 2478 2017-09-18 13:37:24Z suehring
    172 ! Bugfix, correct flag for use_top
    173 !
    174 ! 2365 2017-08-21 14:59:59Z kanani
    175 ! Vertical nesting implemented (SadiqHuq)
    176 !
    177 ! 2319 2017-07-20 17:33:17Z suehring
    178 ! Remove print statements
    179 !
    180 ! 2318 2017-07-20 17:27:44Z suehring
    181 ! Get topography top index via Function call
    182 !
    183 ! 2317 2017-07-20 17:27:19Z suehring
    184 ! Bugfixes in reading 3D topography from file
    185 !
    186 ! 2274 2017-06-09 13:27:48Z Giersch
    187 ! Changed error messages
    188 !
    189 ! 2233 2017-05-30 18:08:54Z suehring
    190 !
    191 ! 2232 2017-05-30 17:47:52Z suehring
    192 ! - Adjustments according to new topography representation
    193 ! - Bugfix: Move determination of nzb_max behind topography modification in
    194 !   cell-edge case
    195 ! - Get rid off global arrays required for topography output
    196 ! - Enable topography input via netcdf
    197 ! - Generic tunnel set-up added
    198 !
    199 ! 2200 2017-04-11 11:37:51Z suehring
    200 ! monotonic_adjustment removed
    201 !
    202 ! 2169 2017-03-06 18:16:35Z suehring
    203 ! Bugfix, move setting for topography grid convention to init_grid, else, if no
    204 ! value is set, the simulation may abort in case of restarts
    205 !
    206 ! 2128 2017-01-23 15:00:03Z suehring
    207 ! Bugfix in setting topography from file in case of ocean simulations
    208 !
    209 ! 2088 2016-12-19 16:30:25Z suehring
    210 ! Bugfix in generic topography in case of ocean simulations
    211 !
    212 ! 2037 2016-10-26 11:15:40Z knoop
    213 ! Anelastic approximation implemented
    214 !
    215 ! 2021 2016-10-07 14:08:57Z suehring
    216 ! Bugfix: setting Neumann boundary conditions for topography required for
    217 ! topography flags in multigrid_noopt solver
    218 !
    219 ! 2000 2016-08-20 18:09:15Z knoop
    220 ! Forced header and separation lines into 80 columns
    221 !
    222 ! 1994 2016-08-15 09:52:21Z suehring
    223 ! Bugfix in definition of generic topography
    224 !
    225 ! 1982 2016-08-01 11:04:48Z suehring
    226 ! Bugfix concering consistency check for topography
    227 !
    228 ! 1968 2016-07-18 12:01:49Z suehring
    229 ! Changed: PE-wise reading of topography file in order to avoid global definition
    230 ! of arrays nzb_local and nzb_tmp. Thereby, topography definition for single
    231 ! buildings and street canyons has changed, as well as flag setting for
    232 ! multigrid scheme.
    233 !
    234 ! Bugfix in checking l_grid anisotropy.
    235 ! Simplify initial computation of lwall and vertical_influence, i.e. remove
    236 ! nzb_s_inner as it is still zero at this point.
    237 !
    238 ! 1942 2016-06-14 12:18:18Z suehring
    239 ! Topography filter implemented to fill holes resolved by only one grid point.
    240 ! Initialization of flags for ws-scheme moved to advec_ws. 
    241 !
    242 ! 1931 2016-06-10 12:06:59Z suehring
    243 ! Rename multigrid into multigrid_noopt and multigrid_fast into multigrid
    244 !
    245 ! 1910 2016-05-26 06:49:46Z raasch
    246 ! Bugfix: if topography is read from file, Neumann conditions are used for the
    247 ! nzb_local array (instead of cyclic conditions) in case that non-cyclic
    248 ! boundary conditions are switched on for the run
    249 !
    250 ! 1902 2016-05-09 11:18:56Z suehring
    251 ! Set topography flags for multigrid solver only (not for multigrid_fast)
    252 !
    253 ! 1886 2016-04-21 11:20:47Z suehring
    254 ! Bugfix: setting advection flags near walls
    255 ! reformulated index values for nzb_v_inner
    256 ! variable discriptions added in declaration block
    257 !
    258 ! 1845 2016-04-08 08:29:13Z raasch
    259 ! nzb_2d removed
    260 !
    261 ! 1804 2016-04-05 16:30:18Z maronga
    262 ! Removed code for parameter file check (__check)
    263 !
    264 ! 1779 2016-03-03 08:01:28Z raasch
    265 ! coupling_char is trimmed at every place it occurs, because it can have
    266 ! different length now
    267 !
    268 ! 1762 2016-02-25 12:31:13Z hellstea
    269 ! Introduction of nested domain feature
    270 !
    271 ! 1743 2016-01-13 10:23:51Z raasch
    272 ! Bugfix for calculation of nzb_s_outer and nzb_u_outer at north boundary of
    273 ! total domain
    274 !
    275 ! 1691 2015-10-26 16:17:44Z maronga
    276 ! Renamed prandtl_layer to constant_flux_layer.
    277 !
    278 ! 1682 2015-10-07 23:56:08Z knoop
    279 ! Code annotations made doxygen readable
    280 !
    281 ! 1677 2015-10-02 13:25:23Z boeske
    282 ! Bugfix: Ghost points are included in wall_flags_0 and wall_flags_00
    283 !
    284 ! 1675 2015-10-02 08:28:59Z gronemeier
    285 ! Bugfix: Definition of topography grid levels
    286 !
    287 ! 1660 2015-09-21 08:15:16Z gronemeier
    288 ! Bugfix: Definition of topography grid levels if vertical grid stretching
    289 !         starts below the maximum topography height.
    290 !
    291 ! 1580 2015-04-10 13:43:49Z suehring
    292 ! Bugfix: setting flags for 5th order scheme near buildings
    293 !
    294 ! 1575 2015-03-27 09:56:27Z raasch
    295 ! adjustments for psolver-queries
    296 !
    297 ! 1557 2015-03-05 16:43:04Z suehring
    298 ! Adjustment for monotoinic limiter
    299 !
    300 ! 1418 2014-06-06 13:05:08Z fricke
    301 ! Bugfix: Change if-condition for stretched grid in the ocean, with the old
    302 !          condition and a negative value for dz_stretch_level the condition
    303 !          was always true for the whole model domain
    304 !
    305 ! 1409 2014-05-23 12:11:32Z suehring
    306 ! Bugfix: set wall_flags_0 at inflow and outflow boundary also for i <= nxlu
    307 ! j <= nysv
    308 !
    309 ! 1353 2014-04-08 15:21:23Z heinze
    310 ! REAL constants provided with KIND-attribute
    311 !
    312 ! 1322 2014-03-20 16:38:49Z raasch
    313 ! REAL constants defined as wp-kind
    314 !
    315 ! 1320 2014-03-20 08:40:49Z raasch
    316 ! ONLY-attribute added to USE-statements,
    317 ! kind-parameters added to all INTEGER and REAL declaration statements,
    318 ! kinds are defined in new module kinds,
    319 ! revision history before 2012 removed,
    320 ! comment fields (!:) to be used for variable explanations added to
    321 ! all variable declaration statements
    322 !
    323 ! 1221 2013-09-10 08:59:13Z raasch
    324 ! wall_flags_00 introduced to hold bits 32-63,
    325 ! additional 3D-flag arrays for replacing the 2D-index array nzb_s_inner in
    326 ! loops optimized for openACC (pres + flow_statistics)
    327 !
    328 ! 1092 2013-02-02 11:24:22Z raasch
    329 ! unused variables removed
    330 !
    331 ! 1069 2012-11-28 16:18:43Z maronga
    332 ! bugfix: added coupling_char to TOPOGRAPHY_DATA to allow topography in the
    333 !         ocean model in case of coupled runs
    334 !
    335 ! 1036 2012-10-22 13:43:42Z raasch
    336 ! code put under GPL (PALM 3.9)
    337 !
    338 ! 1015 2012-09-27 09:23:24Z raasch
    339 ! lower index for calculating wall_flags_0 set to nzb_w_inner instead of
    340 ! nzb_w_inner+1
    341 !
    342 ! 996 2012-09-07 10:41:47Z raasch
    343 ! little reformatting
    344 !
    345 ! 978 2012-08-09 08:28:32Z fricke
    346 ! Bugfix: nzb_max is set to nzt at non-cyclic lateral boundaries
    347 ! Bugfix: Set wall_flags_0 for inflow boundary
    348 !
    349 ! 927 2012-06-06 19:15:04Z raasch
    350 ! Wall flags are not set for multigrid method in case of masking method
    351 !
    352 ! 864 2012-03-27 15:10:33Z gryschka
    353 ! In case of ocean and Dirichlet bottom bc for u and v dzu_mg and ddzu_pres
    354 ! were not correctly defined for k=1.
    355 !
    356 ! 861 2012-03-26 14:18:34Z suehring
    357 ! Set wall_flags_0. The array is needed for degradation in ws-scheme near walls,
    358 ! inflow and outflow boundaries as well as near the bottom and the top of the
    359 ! model domain.!
    360 ! Initialization of nzb_s_inner and nzb_w_inner.
    361 ! gls has to be at least nbgp to do not exceed the array bounds of nzb_local
    362 ! while setting wall_flags_0
    363 !
    364 ! 843 2012-02-29 15:16:21Z gryschka
    365 ! In case of ocean and dirichlet bc for u and v at the bottom
    366 ! the first u-level ist defined at same height as the first w-level
    367 !
    368 ! 818 2012-02-08 16:11:23Z maronga
    369 ! Bugfix: topo_height is only required if topography is used. It is thus now
    370 ! allocated in the topography branch
    371 !
    372 ! 809 2012-01-30 13:32:58Z maronga
    373 ! Bugfix: replaced .AND. and .NOT. with && and ! in the preprocessor directives
    374 !
    375 ! 807 2012-01-25 11:53:51Z maronga
    376 ! New cpp directive "__check" implemented which is used by check_namelist_files
    377 !
    378 ! Revision 1.1  1997/08/11 06:17:45  raasch
    379 ! Initial revision (Testversion)
    380 !
    38169!
    38270! Description:
Note: See TracChangeset for help on using the changeset viewer.