Index: palm/trunk/SOURCE/init_pegrid.f90
===================================================================
--- palm/trunk/SOURCE/init_pegrid.f90	(revision 4045)
+++ palm/trunk/SOURCE/init_pegrid.f90	(revision 4180)
@@ -51,218 +51,4 @@
 ! variables documented
 ! 
-! 3552 2018-11-22 10:28:35Z suehring
-! Introduce new MPI-datatype for ghostpoint exchange of 2D 8-bit Integer arrays 
-! 
-! 3542 2018-11-20 17:04:13Z suehring
-! Bugfix in setting number of ghost layers in neutral case 
-! 
-! 3341 2018-10-15 10:31:27Z suehring
-! unused variables removed
-! 
-! 3183 2018-07-27 14:25:55Z suehring
-! Rename variables and boundary conditions in mesoscale-offline nesting mode
-! 
-! 3182 2018-07-27 13:36:03Z suehring
-! bugfix: wrong error number in r3057 revised
-! 
-! 3057 2018-06-05 09:03:41Z raasch
-! bugfix: check that nz is even in case that optimized multigrid is used
-! 
-! 3049 2018-05-29 13:52:36Z Giersch
-! Error messages revised
-! 
-! 3045 2018-05-28 07:55:41Z Giersch
-! Error messages revised
-! 
-! 2938 2018-03-27 15:52:42Z suehring
-! - No checks for domain decomposition in case of turbulence generator 
-!  (is done in stg module)
-! - Introduce ids to indicate lateral processors for turbulence generator
-! 
-! 2936 2018-03-27 14:49:27Z suehring
-! Variable use_synthetic_turbulence_generator has been abbreviated
-! 
-! 2718 2018-01-02 08:49:38Z maronga
-! Corrected "Former revisions" section
-! 
-! 2696 2017-12-14 17:12:51Z kanani
-! Change in file header (GPL part)
-! 3D-Integer exchange on multigrid level (MS)
-! Forcing implemented (MS)
-! 
-! 2600 2017-11-01 14:11:20Z raasch
-! calculation of block-I/O quantitites removed (is now done in parin)
-! 
-! 2516 2017-10-04 11:03:04Z suehring
-! Remove tabs
-! 
-! 2514 2017-10-04 09:52:37Z suehring
-! Redundant preprocessor directives removed 
-! 
-! 2372 2017-08-25 12:37:32Z sward
-! Shifted cyclic boundary conditions implemented
-! 
-! 2365 2017-08-21 14:59:59Z kanani
-! Vertical nesting implemented (SadiqHuq)
-! 
-! 2300 2017-06-29 13:31:14Z raasch
-! host-specific settings removed
-! 
-! 2298 2017-06-29 09:28:18Z raasch
-! MPI2 related parts removed
-! 
-! 2271 2017-06-09 12:34:55Z sward
-! Error message changed
-! 
-! 2259 2017-06-08 09:09:11Z gronemeier
-! Implemented synthetic turbulence generator
-!
-! 2238 2017-05-31 16:49:16Z suehring
-! Remove unnecessary module load of pmc_interface
-! 
-! 2231 2017-05-30 16:44:33Z suehring
-!
-! 2200 2017-04-11 11:37:51Z suehring
-! monotonic_adjustment removed
-!
-! 2197 2017-03-24 02:25:00Z raasch
-! bugfix: do not allow odd values for nz at the coarsest grid level in case of
-! optimized multigrid solver
-!
-! 2180 2017-03-17 13:33:05Z hellstea
-! Checks to ensure (2178) that pdims match the grid dimensions in the
-! automatic determination of pdims are canceled as unnecessary
-! 
-! 2178 2017-03-17 11:07:39Z hellstea
-! Checks to ensure that pdims match the grid dimensions are added in the
-! automatic determination of pdims
-!
-! 2050 2016-11-08 15:00:55Z gronemeier
-! Implement turbulent outflow condition
-! 
-! 2000 2016-08-20 18:09:15Z knoop
-! Forced header and separation lines into 80 columns
-! 
-! 1968 2016-07-18 12:01:49Z suehring
-! Extent MPI-datatypes for exchange of 2D-INTEGER arrays on coarser multigrid
-! level  
-! 
-! 1964 2016-07-14 15:35:18Z hellstea
-! Bugfix: erroneous setting of nest_bound_l/r/s/n = .TRUE. for vertical nesting mode removed.
-!
-! 1923 2016-05-31 16:37:07Z boeske
-! Initial version of purely vertical nesting introduced. 
-! 
-! 1922 2016-05-31 16:36:08Z boeske
-! Bugfix: array transposition checks restricted to cases if a fourier 
-! transform is used , removed unused variable nnx_z
-! 
-! 1833 2016-04-07 14:23:03Z raasch
-! spectra related variables moved to spectra_mod
-!
-! 1815 2016-04-06 13:49:59Z raasch
-! cpp-directives for intel openmp bug removed
-!
-! 1804 2016-04-05 16:30:18Z maronga
-! Removed code for parameter file check (__check)
-!
-! 1779 2016-03-03 08:01:28Z raasch
-! changes regarding nested domain removed: virtual PE grid will be automatically
-! calculated for nested runs too
-!
-! 1764 2016-02-28 12:45:19Z raasch
-! cpp-statements for nesting removed
-!
-! 1762 2016-02-25 12:31:13Z hellstea
-! Introduction of nested domain feature
-!
-! 1682 2015-10-07 23:56:08Z knoop
-! Code annotations made doxygen readable 
-! 
-! 1677 2015-10-02 13:25:23Z boeske
-! New MPI-data types for exchange of 3D integer arrays.
-!
-! 1575 2015-03-27 09:56:27Z raasch
-! adjustments for psolver-queries, calculation of ngp_xz added
-!
-! 1565 2015-03-09 20:59:31Z suehring
-! Refine if-clause for setting nbgp. 
-!
-! 1557 2015-03-05 16:43:04Z suehring
-! Adjustment for monotonic limiter
-!
-! 1468 2014-09-24 14:06:57Z maronga
-! Adapted for use on up to 6-digit processor cores
-! 
-! 1435 2014-07-21 10:37:02Z keck
-! bugfix: added missing parameter coupling_mode_remote to ONLY-attribute
-! 
-! 1402 2014-05-09 14:25:13Z raasch
-! location messages modified
-! 
-! 1384 2014-05-02 14:31:06Z raasch
-! location messages added
-! 
-! 1353 2014-04-08 15:21:23Z heinze
-! REAL constants provided with KIND-attribute
-!
-! 1322 2014-03-20 16:38:49Z raasch
-! REAL functions provided with KIND-attribute
-!
-! 1320 2014-03-20 08:40:49Z raasch
-! ONLY-attribute added to USE-statements,
-! kind-parameters added to all INTEGER and REAL declaration statements,
-! kinds are defined in new module kinds,
-! revision history before 2012 removed,
-! comment fields (!:) to be used for variable explanations added to
-! all variable declaration statements
-!
-! 1304 2014-03-12 10:29:42Z raasch
-! bugfix: single core MPI runs missed some settings of transpose indices
-!
-! 1212 2013-08-15 08:46:27Z raasch
-! error message for poisfft_hybrid removed
-!
-! 1159 2013-05-21 11:58:22Z fricke
-! dirichlet/neumann and neumann/dirichlet removed
-!
-! 1139 2013-04-18 07:25:03Z raasch
-! bugfix for calculating the id of the PE carrying the recycling plane
-!
-! 1111 2013-03-08 23:54:10Z raasch
-! initialization of poisfft moved to module poisfft
-!
-! 1092 2013-02-02 11:24:22Z raasch
-! unused variables removed
-!
-! 1056 2012-11-16 15:28:04Z raasch
-! Indices for arrays n.._mg start from zero due to definition of arrays f2 and
-! p2 as automatic arrays in recursive subroutine next_mg_level
-!
-! 1041 2012-11-06 02:36:29Z raasch
-! a 2d virtual processor topology is used by default for all machines
-!
-! 1036 2012-10-22 13:43:42Z raasch
-! code put under GPL (PALM 3.9)
-!
-! 1003 2012-09-14 14:35:53Z raasch
-! subdomains must have identical size (grid matching = "match" removed)
-!
-! 1001 2012-09-13 14:08:46Z raasch
-! all actions concerning upstream-spline-method removed
-!
-! 978 2012-08-09 08:28:32Z fricke
-! dirichlet/neumann and neumann/dirichlet added
-! nxlu and nysv are also calculated for inflow boundary
-!
-! 809 2012-01-30 13:32:58Z maronga
-! Bugfix: replaced .AND. and .NOT. with && and ! in the preprocessor directives
-!
-! 807 2012-01-25 11:53:51Z maronga
-! New cpp directive "__check" implemented which is used by check_namelist_files
-!
-! Revision 1.1  1997/07/24 11:15:09  raasch
-! Initial revision
-!
 !
 ! Description:
