Changeset 4180 for palm/trunk/SOURCE/spectra_mod.f90

Timestamp:

Aug 21, 2019 2:37:54 PM (5 years ago)

Author:

scharf

Message:

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

File:

• palm/trunk/SOURCE/spectra_mod.f90 (modified) (1 diff)

palm/trunk/SOURCE/spectra_mod.f90

@@ -30 +30 @@
 ! Renamed output variables
 ! 
-! 3248 2018-09-14 09:42:06Z sward
-! Minor formating changes
-! 
-! 3246 2018-09-13 15:14:50Z sward
-! Added error handling for input namelist via parin_fail_message
-! 
-! 3241 2018-09-12 15:02:00Z raasch
-! unused variables removed
-! 
-! 3049 2018-05-29 13:52:36Z Giersch
-! Error messages revised
-! 
-! 3045 2018-05-28 07:55:41Z Giersch
-! Error message revised
-! 
-! 2956 2018-04-10 11:01:03Z Giersch
-! spectrum_x and spectrum_y will only be allocated if they are not allocated 
-! before (e.g. in case of restart runs) 
-! 
-! 2932 2018-03-26 09:39:22Z maronga
-! renamed spectra_par to spectra_parameters
-! 
-! 2841 2018-02-27 15:02:57Z knoop
-! Bugfix: wrong placement of include 'mpif.h' corrected
-! 
-! 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)
-!
-! 2216 2017-04-28 12:54:20Z suehring
-!
-! 2193 2017-03-22 04:21:28Z raasch
-! Normalization of spectra output adjusted
-!
-! 2192 2017-03-22 04:14:10Z raasch
-! bugfix for index bounds of arrays spectrum_x and spectrum_y
-!
-! 2000 2016-08-20 18:09:15Z knoop
-! Forced header and separation lines into 80 columns
-! 
-! 1960 2016-07-12 16:34:24Z suehring
-! Additional default spectra for passive scalar
-! 
-! 1833 2016-04-07 14:23:03Z raasch
-! file renamed, reading the spectra_par NAMELIST moved from package_parin to
-! here
-!
-! 1815 2016-04-06 13:49:59Z raasch
-! bugfix: preprocessor directives included for the non-parallel case
-!
-! 1808 2016-04-05 19:44:00Z raasch
-! MPI module used by default on all machines
-!
-! 1786 2016-03-08 05:49:27Z raasch
-! routine is modularized, filename renamed from calc_spectra to spectrum,
-! privious data module spectrum moved from modules.f90 to here,
-! cpp-direktives for spectra removed, immediate return if no spectra levels are
-! given
-!
-! 1682 2015-10-07 23:56:08Z knoop
-! Code annotations made doxygen readable 
-!
-! 1575 2015-03-27 09:56:27Z raasch
-! adjustments for psolver-queries
-!
-! 1511 2014-12-16 15:54:16Z suehring
-! Bugfix concerning spectra normalization
-!
-! 1431 2014-07-15 14:47:17Z suehring
-! Wavenumber-integrated spectra coincide with respective variance. 
-! 
-! 1342 2014-03-26 17:04:47Z kanani
-! REAL constants defined as wp-kinds
-!
-! 1324 2014-03-21 09:13:16Z suehring
-! Bugfix: nzb_x, nzb_yd, nyn_x, nyn_x, nzt_x, nzt_yd belong to transpose_indices 
-!
-! 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
-!
-! 1318 2014-03-17 13:35:16Z raasch
-! module interfaces removed
-!
-! 1216 2013-08-26 09:31:42Z raasch
-! resorting of array moved to separate routine resort_for_zx,
-! one argument removed from the transpose_..d routines
-!
-! 1120 2013-04-05 15:11:35Z raasch
-! bugfix: calls of fft_x|y replaced by fft_x|y_1d
-!
-! 1036 2012-10-22 13:43:42Z raasch
-! code put under GPL (PALM 3.9)
-!
-! 1003 2012-09-14 14:35:53Z raasch
-! adjustment of array tend for cases with unequal subdomain sizes removed
-!
-! Revision 1.1  2001/01/05 15:08:07  raasch
-! Initial revision
-!
 !
 ! Description: