Index: palm/trunk/SOURCE/header.f90
===================================================================
--- palm/trunk/SOURCE/header.f90	(revision 4168)
+++ palm/trunk/SOURCE/header.f90	(revision 4180)
@@ -40,382 +40,4 @@
 ! Implementation of the PALM module interface
 ! 
-! 3589 2018-11-30 15:09:51Z suehring
-! Move the control parameter "salsa" from salsa_mod to control_parameters 
-! (M. Kurppa)
-!  
-! 3582 2018-11-29 19:16:36Z suehring
-! variables documented
-! 
-! 3552 2018-11-22 10:28:35Z suehring
-! change date format into YYYY-MM-DD
-! 
-! 3525 2018-11-14 16:06:14Z kanani
-! Changes related to clean-up of biometeorology (dom_dwd_user)
-! 
-! 3524 2018-11-14 13:36:44Z raasch
-! unused variables removed
-! 
-! 3467 2018-10-30 19:05:21Z suehring
-! Implementation of a new aerosol module salsa.
-! 
-! 3448 2018-10-29 18:14:31Z kanani
-! Add biometeorology
-! 
-! 3355 2018-10-16 14:03:34Z knoop
-! Header output concerning offline nesting
-! 
-! 3343 2018-10-15 10:38:52Z suehring
-! call of ocean_header
-! 
-! 3298 2018-10-02 12:21:11Z kanani
-! Minor formatting (kanani)
-! Add chemistry header (basit)
-!
-! 3294 2018-10-01 02:37:10Z raasch
-! changes concerning modularization of ocean option
-! 
-! 3274 2018-09-24 15:42:55Z knoop
-! Modularization of all bulk cloud physics code components
-! 
-! 3241 2018-09-12 15:02:00Z raasch
-! unused variables removed
-! 
-! 3232 2018-09-07 12:21:44Z raasch
-! Increase printed length of run identifier
-! 
-! 3225 2018-08-30 16:33:14Z kanani
-! Increase printed length of run identifier
-! 
-! 3083 2018-06-19 14:03:12Z gronemeier
-! Print RANS-mode constants
-! 
-! 3065 2018-06-12 07:03:02Z Giersch
-! Header output concerning stretching revised
-! 
-! 3045 2018-05-28 07:55:41Z Giersch
-! Error messages revised
-! 
-! 2967 2018-04-13 11:22:08Z raasch
-! bugfix: missing parallel cpp-directives added
-! 
-! 2883 2018-03-14 08:29:10Z Giersch
-! Format of the output of dt_dopr_listing (325) has been changed
-! 
-! 2817 2018-02-19 16:32:21Z knoop
-! Preliminary gust module interface implemented
-! 
-! 2776 2018-01-31 10:44:42Z Giersch
-! Variable synthetic_turbulence_generator has been abbreviated
-! 
-! 2746 2018-01-15 12:06:04Z suehring
-! Move flag plant canopy to modules
-! 
-! 2718 2018-01-02 08:49:38Z maronga
-! Corrected "Former revisions" section
-! 
-! 2701 2017-12-15 15:40:50Z suehring
-! Changes from last commit documented
-! 
-! 2698 2017-12-14 18:46:24Z suehring
-! Bugfix in get_topography_top_index
-! 
-! 2696 2017-12-14 17:12:51Z kanani
-! Change in file header (GPL part)
-! Print information about turbulence closure (TG)
-! Print information about inifor initialization (MS)
-! 
-! 2575 2017-10-24 09:57:58Z maronga
-! Added output for complex terrain simulations
-! 
-! 2544 2017-10-13 18:09:32Z maronga
-! Moved initial day of year and time to inipar. 
-! 
-! 2339 2017-08-07 13:55:26Z gronemeier
-! corrected timestamp in header
-! 
-! 2338 2017-08-07 12:15:38Z gronemeier
-! Modularize 1D model
-! 
-! 2320 2017-07-21 12:47:43Z suehring
-! Modularize large-scale forcing and nudging
-! 
-! 2300 2017-06-29 13:31:14Z raasch
-! host-specific code removed
-! 
-! 2299 2017-06-29 10:14:38Z maronga
-! Modified output for spinups
-! 
-! 2298 2017-06-29 09:28:18Z raasch
-! MPI2 related parts removed
-! 
-! 2270 2017-06-09 12:18:47Z maronga
-! Renamed Prandtl layer to constant flux layer
-! 
-! 2259 2017-06-08 09:09:11Z gronemeier
-! Implemented synthetic turbulence generator
-!
-! 2258 2017-06-08 07:55:13Z suehring
-! Bugfix, add pre-preprocessor directives to enable non-parrallel mode
-! 
-! 2233 2017-05-30 18:08:54Z suehring
-!
-! 2232 2017-05-30 17:47:52Z suehring
-! Adjustments to new topography and surface concept
-! Generic tunnel setup added
-! 
-! 2200 2017-04-11 11:37:51Z suehring
-! monotonic_adjustment removed
-! 
-! 2118 2017-01-17 16:38:49Z raasch
-! OpenACC relatec code removed
-! 
-! 2073 2016-11-30 14:34:05Z raasch
-! small bugfix concerning output of scalar profiles
-! 
-! 2050 2016-11-08 15:00:55Z gronemeier
-! Implement turbulent outflow condition
-! 
-! 2037 2016-10-26 11:15:40Z knoop
-! Anelastic approximation implemented
-! 
-! 2000 2016-08-20 18:09:15Z knoop
-! Forced header and separation lines into 80 columns
-! 
-! 1992 2016-08-12 15:14:59Z suehring
-! Adapted for top_scalarflux
-! 
-! 1960 2016-07-12 16:34:24Z suehring
-! Treat humidity and passive scalar separately.
-! Modify misleading information concerning humidity.
-! Bugfix, change unit for humidity flux.
-! 
-! 1957 2016-07-07 10:43:48Z suehring
-! flight module added
-!
-! 1931 2016-06-10 12:06:59Z suehring
-! Rename multigrid into multigrid_noopt
-!
-! 1902 2016-05-09 11:18:56Z suehring
-! Write information about masking_method only for multigrid solver
-!
-! 1849 2016-04-08 11:33:18Z hoffmann
-! Adapted for modularization of microphysics
-!
-! 1833 2016-04-07 14:23:03Z raasch
-! spectrum renamed spectra_mod, output of spectra related quantities moved to
-! spectra_mod
-!
-! 1831 2016-04-07 13:15:51Z hoffmann
-! turbulence renamed collision_turbulence,
-! drizzle renamed cloud_water_sedimentation
-!
-! 1826 2016-04-07 12:01:39Z maronga
-! Moved radiation model header output to the respective module.
-! Moved canopy model header output to the respective module.
-!
-! 1822 2016-04-07 07:49:42Z hoffmann
-! Tails removed. icloud_scheme replaced by microphysics_*
-!
-! 1817 2016-04-06 15:44:20Z maronga
-! Moved land_surface_model header output to the respective module.
-!
-! 1808 2016-04-05 19:44:00Z raasch
-! routine local_flush replaced by FORTRAN statement
-!
-! 1797 2016-03-21 16:50:28Z raasch
-! output of nesting datatransfer mode
-!
-! 1791 2016-03-11 10:41:25Z raasch
-! output of nesting informations of all domains
-!
-! 1788 2016-03-10 11:01:04Z maronga
-! Parameter dewfall removed
-!
-! 1786 2016-03-08 05:49:27Z raasch
-! cpp-direktives for spectra removed
-!
-! 1783 2016-03-06 18:36:17Z raasch
-! netcdf module and variable names changed, output of netcdf_deflate
-!
-! 1764 2016-02-28 12:45:19Z raasch
-! output of nesting informations
-!
-! 1697 2015-10-28 17:14:10Z raasch
-! small E- and F-FORMAT changes to avoid informative compiler messages about
-! insufficient field width
-!
-! 1691 2015-10-26 16:17:44Z maronga
-! Renamed prandtl_layer to constant_flux_layer, renames rif_min/rif_max to
-! zeta_min/zeta_max.
-! 
-! 1682 2015-10-07 23:56:08Z knoop
-! Code annotations made doxygen readable 
-! 
-! 1675 2015-10-02 08:28:59Z gronemeier
-! Bugfix: Definition of topography grid levels
-! 
-! 1660 2015-09-21 08:15:16Z gronemeier
-! Bugfix: Definition of building/street canyon height if vertical grid stretching
-!         starts below the maximum topography height.
-! 
-! 1590 2015-05-08 13:56:27Z maronga
-! Bugfix: Added TRIM statements for character strings for LSM and radiation code
-! 
-! 1585 2015-04-30 07:05:52Z maronga
-! Further output for radiation model(s).
-!
-! 1575 2015-03-27 09:56:27Z raasch
-! adjustments for psolver-queries, output of seed_follows_topography
-!
-! 1560 2015-03-06 10:48:54Z keck
-! output for recycling y shift
-! 
-! 1557 2015-03-05 16:43:04Z suehring
-! output for monotonic limiter
-!
-! 1551 2015-03-03 14:18:16Z maronga
-! Added informal output for land surface model and radiation model. Removed typo.
-! 
-! 1496 2014-12-02 17:25:50Z maronga
-! Renamed: "radiation -> "cloud_top_radiation"
-! 
-! 1484 2014-10-21 10:53:05Z kanani
-! Changes due to new module structure of the plant canopy model:
-!   module plant_canopy_model_mod and output for new canopy model parameters 
-!   (alpha_lad, beta_lad, lai_beta,...) added,
-!   drag_coefficient, leaf_surface_concentration and scalar_exchange_coefficient
-!   renamed to canopy_drag_coeff, leaf_surface_conc and leaf_scalar_exch_coeff,
-!   learde renamed leaf_area_density.
-! Bugfix: DO-WHILE-loop for lad header information additionally restricted 
-! by maximum number of gradient levels (currently 10)
-!
-! 1482 2014-10-18 12:34:45Z raasch
-! information about calculated or predefined virtual processor topology adjusted
-!
-! 1468 2014-09-24 14:06:57Z maronga
-! Adapted for use on up to 6-digit processor cores
-! 
-! 1429 2014-07-15 12:53:45Z knoop
-! header exended to provide ensemble_member_nr if specified
-! 
-! 1376 2014-04-26 11:21:22Z boeske
-! Correction of typos
-! 
-! 1365 2014-04-22 15:03:56Z boeske
-! New section 'Large scale forcing and nudging':
-! output of large scale forcing and nudging information,
-! new section for initial profiles created
-! 
-! 1359 2014-04-11 17:15:14Z hoffmann
-! dt_sort_particles removed
-! 
-! 1353 2014-04-08 15:21:23Z heinze
-! REAL constants provided with KIND-attribute 
-! 
-! 1327 2014-03-21 11:00:16Z raasch
-! parts concerning iso2d and avs output removed,
-! -netcdf output queries
-!
-! 1324 2014-03-21 09:13:16Z suehring
-! Bugfix: module spectrum added
-!
-! 1322 2014-03-20 16:38:49Z raasch
-! REAL functions provided with KIND-attribute,
-! some REAL constants defined as wp-kind
-!
-! 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 
-! 
-! 1308 2014-03-13 14:58:42Z fricke
-! output of the fixed number of output time levels
-! output_format adjusted for masked data if netcdf_data_format > 5
-!
-! 1299 2014-03-06 13:15:21Z heinze
-! output for using large_scale subsidence in combination 
-! with large_scale_forcing
-! reformatting, more detailed explanations
-!
-! 1241 2013-10-30 11:36:58Z heinze
-! output for nudging + large scale forcing from external file
-!
-! 1216 2013-08-26 09:31:42Z raasch
-! output for transpose_compute_overlap
-!
-! 1212 2013-08-15 08:46:27Z raasch
-! output for poisfft_hybrid removed
-!
-! 1179 2013-06-14 05:57:58Z raasch
-! output of reference_state, use_reference renamed use_single_reference_value
-!
-! 1159 2013-05-21 11:58:22Z fricke
-! +use_cmax
-!
-! 1115 2013-03-26 18:16:16Z hoffmann
-! descriptions for Seifert-Beheng-cloud-physics-scheme added
-!
-! 1111 2013-03-08 23:54:10Z raasch
-! output of accelerator board information
-! ibc_p_b = 2 removed
-!
-! 1108 2013-03-05 07:03:32Z raasch
-! bugfix for r1106
-!
-! 1106 2013-03-04 05:31:38Z raasch
-! some format changes for coupled runs
-!
-! 1092 2013-02-02 11:24:22Z raasch
-! unused variables removed
-!
-! 1036 2012-10-22 13:43:42Z raasch
-! code put under GPL (PALM 3.9)
-!
-! 1031 2012-10-19 14:35:30Z raasch
-! output of netCDF data format modified
-!
-! 1015 2012-09-27 09:23:24Z raasch
-! output of Adjustment of mixing length to the Prandtl mixing length at first
-! grid point above ground removed
-!
-! 1003 2012-09-14 14:35:53Z raasch
-! output of information about equal/unequal subdomain size removed
-!
-! 1001 2012-09-13 14:08:46Z raasch
-! all actions concerning leapfrog- and upstream-spline-scheme removed
-!
-! 978 2012-08-09 08:28:32Z fricke
-! -km_damp_max, outflow_damping_width
-! +pt_damping_factor, pt_damping_width
-! +z0h
-!
-! 964 2012-07-26 09:14:24Z raasch
-! output of profil-related quantities removed
-!
-! 940 2012-07-09 14:31:00Z raasch
-! Output in case of simulations for pure neutral stratification (no pt-equation
-! solved)
-!
-! 927 2012-06-06 19:15:04Z raasch
-! output of masking_method for mg-solver
-!
-! 868 2012-03-28 12:21:07Z raasch
-! translation velocity in Galilean transformation changed to 0.6 * ug
-!
-! 833 2012-02-22 08:55:55Z maronga
-! Adjusted format for leaf area density
-!
-! 828 2012-02-21 12:00:36Z raasch
-! output of dissipation_classes + radius_classes
-!
-! 825 2012-02-19 03:03:44Z raasch
-! Output of cloud physics parameters/quantities complemented and restructured
-!
-! Revision 1.1  1997/08/11 06:17:20  raasch
-! Initial revision
-!
 !
 ! Description:
