Changeset 198 for palm/trunk/SOURCE

Timestamp:

Sep 17, 2008 8:55:28 AM (16 years ago)

Author:

raasch

Message:

file headers updated for the next release 3.5

Location:

palm/trunk/SOURCE

Files:

• CURRENT_MODIFICATIONS (modified) (1 diff)
• advec_particles.f90 (modified) (2 diffs)
• advec_s_ups.f90 (modified) (1 diff)
• advec_u_ups.f90 (modified) (1 diff)
• advec_v_ups.f90 (modified) (1 diff)
• advec_w_ups.f90 (modified) (1 diff)
• calc_spectra.f90 (modified) (2 diffs)
• check_open.f90 (modified) (1 diff)
• check_parameters.f90 (modified) (2 diffs)
• cpu_statistics.f90 (modified) (1 diff)
• data_output_profiles.f90 (modified) (1 diff)
• data_output_spectra.f90 (modified) (1 diff)
• diffusion_s.f90 (modified) (1 diff)
• flow_statistics.f90 (modified) (1 diff)
• header.f90 (modified) (1 diff)
• inflow_turbulence.f90 (modified) (1 diff)
• init_1d_model.f90 (modified) (1 diff)
• init_3d_model.f90 (modified) (1 diff)
• init_dvrp.f90 (modified) (2 diffs)
• init_particles.f90 (modified) (1 diff)
• init_pegrid.f90 (modified) (1 diff)
• local_stop.f90 (modified) (2 diffs)
• modules.f90 (modified) (2 diffs)
• netcdf.f90 (modified) (1 diff)
• palm.f90 (modified) (1 diff)
• parin.f90 (modified) (1 diff)
• particle_boundary_conds.f90 (modified) (1 diff)
• plant_canopy_model.f90 (modified) (2 diffs)
• poisfft.f90 (modified) (1 diff)
• poismg.f90 (modified) (1 diff)
• prandtl_fluxes.f90 (modified) (1 diff)
• pres.f90 (modified) (1 diff)
• production_e.f90 (modified) (1 diff)
• prognostic_equations.f90 (modified) (1 diff)
• read_3d_binary.f90 (modified) (2 diffs)
• read_var_list.f90 (modified) (2 diffs)
• time_integration.f90 (modified) (1 diff)
• transpose.f90 (modified) (1 diff)
• user_interface.f90 (modified) (2 diffs)
• wall_fluxes.f90 (modified) (1 diff)
• write_3d_binary.f90 (modified) (1 diff)
• write_var_list.f90 (modified) (2 diffs)

palm/trunk/SOURCE/CURRENT_MODIFICATIONS

@@ -1 +1 @@
 New:
 ---
-The plant canopy model has been extended to the prognostic equation for   
-the potential temperature and the prognostic equation for the concentration 
-of a passive scalar, as proposed by Watanabe (2004) and Shaw and Schumann 
-(1992). (prognostic_equations, plant_canopy_model)  
 
-Within a job chain, the number of processors or the virtual processor grid
-is now allowed to be changed. This modifies the domain decomposition and
-requires that the PEs within a restart job have to know from which file(s) they
-have to read their restart data (up to now there is a one to one relation
-between the restart files and the PEs, i.e. processor 4 only reads data
-from file "_0004"). Informations about the subdomain index limits of all
-restart files are now written by PE0 (to file "_0000"). Also, all variables
-containing global values which do not depend on the subdomain are written
-to file "_0000" only. In a restart run, this file is opened by all PEs to
-read these global values and the informations about the subdomain index
-limits. Depending on these index limit information it is decided which
-restart file(s) has/have to be opened in order to read the complete data
-necessary for the current subdomain.
-
-The turbulence recycling method of Kataoka and Mizuno (2002) has been
-implemented. A pre-run with smaller model domain can be used to initialize
-the real run, in order to spare the CPU time needed to get the turbulence
-into a quasi-stationary state (see initializing_actions =
-'read_data_for_recycling').
-
-Particle advection adjusted for ocean runs.
-
-Multigrid levels are limited by subdomains if mg_switch_to_pe0_level = -1.
-
-User-defined spectra.
-
-Output of q*2 profile added.
-
-Argument -c introduced to most of the subjob calls, which allows the user to
-choose his own job catalog by setting job_catalog in the configuration file
-(default is ~/job_queue). Workaround for mpixec with -env option.
-Adjustments for lcxt4 (Bergen Center for Computational Science) (mrun, subjob)
-
-advec_particles, calc_spectra, check_open, check_parameters, data_output_spectra, header, init_particles, init_pegrid, init_3d_model, modules, netcdf, parin, particle_boundary_conds, plant_canopy_model, prognostic_equations, read_var_list, read_3d_binary, time_integration, user_interface, write_var_list, write_3d_binary
-
-New: inflow_turbulence
 
 
 Changed:
 -------
-Allow 100 spectra levels instead of 10 for consistency with 
-define_netcdf_header (calc_spectra, data_output_spectra, header, modules, 
-netcdf)
 
-Modification of the integrated version of the profile function for momentum 
-for unstable stratification; more consistent flux definitions. (wall_fluxes, 
-production_e)
-
-Strict grid matching along z is not needed for mg-solver. (check_parameters)
-
-Sharp lateral edges of the plant canopy introduced. Before smaller 
-values of the leaf area density than those applied in the prognostic 
-equation for the vertical velocity were used in the prognostic equations 
-for u and v at the boundaries of the plant_canopy. (init_3d_model)  
-
--cross_ts_* (read_var_list, write_var_list)
--dopr_time_count, old profil parameters (cross_..., dopr_crossindex,
- profile_***) removed (read_3d_binary, write_3d_binary)
-
-hom_sum moved, volume_flow_area, volume_flow_initial moved from ..._3d_binary
-to ..._var_list, hom_sum is now allocated in parin instead of init_3d_model
-
-npex, npey moved from inipar- to d3par-namelist (parin)
-
-myid_char14 removed. This was used since on IBM machines the process rank may
-be changed when the final communicator is defined, in order to save the
-preliminary processor-id for opening the binary output file for restarts
-(unit 14), because otherwise a mismatch occured when reading this file in a
-restart job. This mechanism is not needed any more since the subdomain
-informations are now contained in file _0000. (parin, check_open)
-
-Transpositions for the 2D domain decomposition have been optimized by using
-f_inv as an automatic array instead of providing the memory by a dummy argument.
-This spares one copy loop per transposition. Order of indices in the 3D loops
-in some of the transpose routines have been rearranged for better cache utilization.
-Both have been suggested by Roland Richter (SGI) as part of the
-HLRN-II benchmark process. (transpose)
-
-Workaround for getting information about the coupling mode. (palm)
-
-Format adjustments in order to allow CPU# > 999. (cpu_statistics)
-
-Provisional solution for run_control_1d output: add 'CALL check_open( 15 )'
-(init_1d_model)
-
-Subdomain data are read into temporary arrays pf_tmp/pf3d_tmp in order to
-avoid INTEL compiler warnings about (automatic) creation of temporary arrays
-(combine_plot_fields)
-
-Time coordinate t=0 stored on netcdf-file only if an output is required for
-this time for at least one of the profiles
-
-Spline timeseries splptx etc. removed, timeseries w'u', w'v', w'q' (k=0) added
-(flow_statistics)
-
-advec_s_ups, advec_u_ups, advec_v_ups, advec_w_ups, calc_spectra, check_open, check_parameters, cpu_statistics, data_output_profiles, data_output_spectra, flow_statistics, header, init_1d_model, init_3d_model, modules, netcdf, palm, parin, poisfft, production_e, read_var_list, read_3d_binary, transpose, wall_fluxes, write_var_list, write_3d_binary
 
 
 Errors:
 ------
-Bugfix: exponent = 1.0 / ( ny + 1.0 ) in calc_spectra_x (calc_spectra)
 
-Bugfix: change definition of us_wall from 1D to 2D. Tests showed that this decreases 
-u* by some 10% and increases TKE and momentum fluxes by some 10% because friction 
-was underestimated and momentum fluxes were wrongly calculated due to the bug. 
-(prandtl_fluxes, wall_fluxes)
-
-Bugfix: calculation of horizontal fluxes at vertical walls (diffusion_s)
-
-Bugfix: zero assignments to tendency arrays in case of restarts (init_3d_model)
-
-Bugfix: wrong grid level used in multigrid solver, routine restrict (poismg)
-
-Bugfix: Construction of vertical profiles when 10 gradients have been 
-specified in the parameter list (ug, vg, pt, q, sa, lad). (check_parameters)
-
-Bugfix: Determination of the number of vertical levels for which spectra 
-shall be output - 100 replaced by 10. (netcdf)
-
-Bugfix: Lengths of those characters that are needed for the output of the 
-characteristic levels of potential temperature, the geostrophic wind, 
-scalar concentration, humidity and leaf area density to the header file 
-has been increased. (header) 
-
-Bugfix: add ')' in user_read_restart_data.
-
-The leaf area density is explicitly set to its surface value at k=0. (check_parameters)
-
-Introduce prefix_chr to ensure unique dvrp_file path.
-
-small bugfixes for user_interface sample code (comments):
-- initialize ustvst with 0.0 as it is now computed only until nxr and nyn
-- two ALLOCATE statements moved from user_read_restart_data back to user_init
-- remove 'READ (13) u2_av' statement in user_read_restart_data
-
-Bugfix: remove IF statement in plant_canopy_model_ij (plant_canopy_model)
-
-Bugfix: divide sums(k,8) (e) and sums(k,34) (e*) by ngp_2dh_s_inner(k,sr) 
-(like other scalars) (flow_statistics)
-
-Bugfix: dopr_time_count was written on the binary file, which caused that
-NetCDF files newly created by restart files (no append of existing files!)
-contained uneccessary time levels. (read_3d_binary, write_3d_binary)
-
-Bugfix: extra '*' removed in user_statistics sample code (user_interface)
-
-Bugfix: a stop command was missing in some cases of the parallel branch (local_stop)
-
-Bugfix in volume flow control for non-cyclic boundary conditions (pres)
-
-Bugfix: misplaced #endif directives (combine_plot_fields)
-
-data are collected from PE0 in an ordered sequence which seems to avoid hanging of processes on SGI-ICE (cpu_statistics)
-
-calc_spectra, check_parameters, cpu_statistics, diffusion_s, flow_statistics, init_dvrp, init_3d_model, local_stop, plant_canopy_model, poismg, prandtl_fluxes, pres, read_3d_binary, user_interface, wall_fluxes, write_3d_binary
-

palm/trunk/SOURCE/advec_particles.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Bottom boundary condition and vertical index calculations adjusted for
-! ocean runs.
 ! TEST: PRINT statements on unit 9 (commented out)
 !
@@ -11 +9 @@
 ! -----------------
 ! $Id$
+!
+! 150 2008-02-29 08:19:58Z raasch
+! Bottom boundary condition and vertical index calculations adjusted for
+! ocean runs.
 !
 ! 119 2007-10-17 10:27:13Z raasch

palm/trunk/SOURCE/advec_s_ups.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Arguments removed from transpose routines
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 164 2008-05-15 08:46:15Z raasch
+! Arguments removed from transpose routines
+!
+! February 2007
 ! RCS Log replace by Id keyword, revision history cleaned up
 !

palm/trunk/SOURCE/advec_u_ups.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Arguments removed from transpose routines
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 164 2008-05-15 08:46:15Z raasch
+! Arguments removed from transpose routines
+!
+! February 2007
 ! RCS Log replace by Id keyword, revision history cleaned up
 !

palm/trunk/SOURCE/advec_v_ups.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Arguments removed from transpose routines
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 164 2008-05-15 08:46:15Z raasch
+! Arguments removed from transpose routines
+!
+! February 2007
 ! RCS Log replace by Id keyword, revision history cleaned up
 !

palm/trunk/SOURCE/advec_w_ups.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Arguments removed from transpose routines
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 164 2008-05-15 08:46:15Z raasch
+! Arguments removed from transpose routines
+!
+! February 2007
 ! RCS Log replace by Id keyword, revision history cleaned up
 !

palm/trunk/SOURCE/calc_spectra.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 192 2008-08-27 16:51:49Z letzel
 ! bugfix in calc_spectra_x: exponent = 1.0 / ( ny + 1.0 )
 ! allow 100 spectra levels instead of 10 for consistency with
@@ -9 +16 @@
 ! user-defined spectra, arguments removed from transpose routines
 !
-! Former revisions:
-! -----------------
-! $Id$
+! February 2007
 ! RCS Log replace by Id keyword, revision history cleaned up
 !

palm/trunk/SOURCE/check_open.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 146 2008-01-17 13:08:34Z raasch
 ! First opening of unit 13 openes file _0000 on all PEs (parallel version)
 ! because only this file contains the global variables,
 ! myid_char_14 removed
-!
-! Former revisions:
-! -----------------
-! $Id$
 !
 ! 120 2007-10-17 11:54:43Z raasch

palm/trunk/SOURCE/check_parameters.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 197 2008-09-16 15:29:03Z raasch
 ! Bug fix: Construction of vertical profiles when 10 gradients have been 
 ! specified in the parameter list (ug, vg, pt, q, sa, lad)
@@ -12 +19 @@
 ! check of turbulent_inflow and calculation of recycling_plane.
 ! q*2 profile added
-!
-! Former revisions:
-! -----------------
-! $Id$
 !
 ! 138 2007-11-28 10:03:58Z letzel

palm/trunk/SOURCE/cpu_statistics.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 197 2008-09-16 15:29:03Z raasch
 ! Format adjustments in order to allow CPU# > 999,
 ! data are collected from PE0 in an ordered sequence which seems to avoid
 ! hanging of processes on SGI-ICE
-!
-! Former revisions:
-! -----------------
-! $Id$
 !
 ! 82 2007-04-16 15:40:52Z raasch

palm/trunk/SOURCE/data_output_profiles.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Time coordinate t=0 stored on netcdf-file only if an output is required for
-! this time for at least one of the profiles
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 197 2008-09-16 15:29:03Z raasch
+! Time coordinate t=0 stored on netcdf-file only if an output is required for
+! this time for at least one of the profiles
+!
+! February 2007
 ! RCS Log replace by Id keyword, revision history cleaned up
 !

palm/trunk/SOURCE/data_output_spectra.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! allow 100 spectra levels instead of 10 for consistency with
-! define_netcdf_header
-! user-defined spectra
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 189 2008-08-13 17:09:26Z letzel
+! allow 100 spectra levels instead of 10 for consistency with
+! define_netcdf_header, +user-defined spectra
+!
+! February 2007
 ! RCS Log replace by Id keyword, revision history cleaned up
 !

palm/trunk/SOURCE/diffusion_s.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! bugfix: calculation of fluxes at vertical surfaces
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 183 2008-08-04 15:39:12Z letzel
+! bugfix: calculation of fluxes at vertical surfaces
 !
 ! 129 2007-10-30 12:12:24Z letzel

palm/trunk/SOURCE/flow_statistics.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Spline timeseries splptx etc. removed, timeseries w'u', w'v', w'q' (k=0)
-! added
-! Bugfix: divide sums(k,8) (e) and sums(k,34) (e*) by ngp_2dh_s_inner(k,sr) 
-! (like other scalars)
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 197 2008-09-16 15:29:03Z raasch
+! Spline timeseries splptx etc. removed, timeseries w'u', w'v', w'q' (k=0)
+! added,
+! bugfix: divide sums(k,8) (e) and sums(k,34) (e*) by ngp_2dh_s_inner(k,sr) 
+! (like other scalars)
 !
 ! 133 2007-11-20 10:10:53Z letzel

palm/trunk/SOURCE/header.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! TEST: mg_switch_to_pe0_level = -1!!!!!!!!!
-! allow 100 spectra levels instead of 10 for consistency with 
-! define_netcdf_header
-! Bugfix in the output of the characteristic levels of potential temperature, 
-! geostrophic wind, scalar concentration, humidity and leaf area density
-! Output of turbulence recycling informations
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 197 2008-09-16 15:29:03Z raasch
+! allow 100 spectra levels instead of 10 for consistency with 
+! define_netcdf_header,
+! bugfix in the output of the characteristic levels of potential temperature, 
+! geostrophic wind, scalar concentration, humidity and leaf area density,
+! output of turbulence recycling informations
 !
 ! 138 2007-11-28 10:03:58Z letzel

palm/trunk/SOURCE/inflow_turbulence.f90

@@ -10 +10 @@
 ! $Id$
 !
+! Initial version (2008/03/07)
 !
 ! Description:

palm/trunk/SOURCE/init_1d_model.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! provisional solution for run_control_1d output: add 'CALL check_open( 15 )'
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 184 2008-08-04 15:53:39Z letzel
+! provisional solution for run_control_1d output: add 'CALL check_open( 15 )'
 !
 ! 135 2007-11-22 12:24:23Z raasch

palm/trunk/SOURCE/init_3d_model.f90

@@ -7 +7 @@
 ! Actual revisions:
 ! -----------------
-! Bugfix: zero assignments to tendency arrays in case of restarts
-! Further amendments to and modifications in the initialisation of the plant 
-! canopy model 
-! Allocation of hom_sum moved to parin, initialization of spectrum_x|y directly
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 181 2008-07-30 07:07:47Z raasch
+! bugfix: zero assignments to tendency arrays in case of restarts,
+! further extensions and modifications in the initialisation of the plant 
+! canopy model,
+! allocation of hom_sum moved to parin, initialization of spectrum_x|y directly
 ! after allocating theses arrays,
 ! read data for recycling added as new initialization option,
 ! dummy allocation for diss
-!
-! Former revisions:
-! -----------------
-! $Id$
 !
 ! 138 2007-11-28 10:03:58Z letzel

palm/trunk/SOURCE/init_dvrp.f90

@@ -5 +5 @@
 ! -----------------
 ! 
-! introduce prefix_chr to ensure unique dvrp_file path
 ! TEST: print* statements
 ! ToDo: checking of mode_dvrp for legal values is not correct
@@ -12 +11 @@
 ! -----------------
 ! $Id$
+!
+! 155 2008-03-28 10:56:30Z letzel
+! introduce prefix_chr to ensure unique dvrp_file path
 !
 ! 130 2007-11-13 14:08:40Z letzel

palm/trunk/SOURCE/init_particles.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Set offset_ocean_* needed for calculating vertical indices within ocean runs
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 150 2008-02-29 08:19:58Z raasch
+! Setting offset_ocean_* needed for calculating vertical indices within ocean
+! runs
 !
 ! 117 2007-10-11 03:27:59Z raasch

palm/trunk/SOURCE/init_pegrid.f90

@@ -5 +5 @@
 ! -----------------
 ! ATTENTION: nnz_x undefined problem still has to be solved!!!!!!!!
+! TEST OUTPUT (TO BE REMOVED) logging mpi2 ierr values
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 197 2008-09-16 15:29:03Z raasch
 ! multigrid levels are limited by subdomains if mg_switch_to_pe0_level = -1,
 ! nz is used instead nnz for calculating mg-levels
 ! Collect on PE0 horizontal index bounds from all other PEs,
 ! broadcast the id of the inflow PE (using the respective communicator)
-! TEST OUTPUT (TO BE REMOVED) logging mpi2 ierr values
-!
-! Former revisions:
-! -----------------
-! $Id$
 !
 ! 114 2007-10-10 00:03:15Z raasch

palm/trunk/SOURCE/local_stop.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Bugfix: a stop command was missing in some cases of the parallel branch
+! 
 ! 
 !
@@ -10 +10 @@
 ! -----------------
 ! $Id$
+!
+! 147 2008-02-01 12:41:46Z raasch
+! Bugfix: a stop command was missing in some cases of the parallel branch
 !
 ! 108 2007-08-24 15:10:38Z letzel

palm/trunk/SOURCE/modules.f90

@@ -5 +5 @@
 ! Actual revisions:
 ! -----------------
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 197 2008-09-16 15:29:03Z raasch
 ! allow 100 spectra levels instead of 10 for consistency with 
-! define_netcdf_header
-! +canopy_heat_flux, cthf, lai,
+! define_netcdf_header, +canopy_heat_flux, cthf, lai,
 ! +leaf_surface_concentration, scalar_exchange_coefficient, sec, sls
 ! +hor_index_bounds, hor_index_bounds_previous_run, id_inflow, id_recycling,
@@ -13 +19 @@
 ! ny_on_file, offset_ocean_*, recycling_plane, recycling_width, turbulent_inflow
 ! -myid_char_14
-!
-! Former revisions:
-! -----------------
-! $Id$
 !
 ! 138 2007-11-28 10:03:58Z letzel

palm/trunk/SOURCE/netcdf.f90

@@ -7 +7 @@
 ! Current revisions:
 ! ------------------
-! consistently allow 100 spectra levels instead of 10
-! bug fix in the determination of the number of output heights for spectra
-!
-! user-defined spectra
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 189 2008-08-13 17:09:26Z letzel
+! consistently allow 100 spectra levels instead of 10
+! bug fix in the determination of the number of output heights for spectra,
+! +user-defined spectra
 !
 ! 97 2007-06-21 08:23:15Z raasch

palm/trunk/SOURCE/palm.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Workaround for getting information about the coupling mode
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 197 2008-09-16 15:29:03Z raasch
+! Workaround for getting information about the coupling mode
 !
 ! 108 2007-08-24 15:10:38Z letzel

palm/trunk/SOURCE/parin.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! +cthf
-! +leaf_surface_concentration, scalar_exchange_coefficient
-! +inflow_damping_height, inflow_damping_width, recycling_width,
-! turbulent_inflow in inipar
-! -skip_time_dosp in d3par,
-! Allocation of hom_sum moved from init_3d_model to here,
-! npex, npey moved from inipar to d3par, setting of myid_char_14 removed,
-! lad is allways allocated
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 197 2008-09-16 15:29:03Z raasch
+! +cthf,leaf_surface_concentration, scalar_exchange_coefficient
+! +inflow_damping_height, inflow_damping_width, recycling_width,
+! turbulent_inflow in inipar, -skip_time_dosp in d3par,
+! allocation of hom_sum moved from init_3d_model to here,
+! npex, npey moved from inipar to d3par, setting of myid_char_14 removed,
+! lad is allways allocated
 !
 ! 138 2007-11-28 10:03:58Z letzel

palm/trunk/SOURCE/particle_boundary_conds.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Vertical index calculations adjusted for ocean runs.
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 150 2008-02-29 08:19:58Z raasch
+! Vertical index calculations adjusted for ocean runs.
+!
 ! Initial version (2007/03/09)
 !

palm/trunk/SOURCE/plant_canopy_model.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Consideration of heat sources within the forest canopy which represent the
-! rate of heat input into the air from the forest leaves
-!
-! Evaluation of sinks and sources for scalar concentration due to canopy 
-! elements
+! 
 !
 ! Bugfix: remove IF statement in plant_canopy_model_ij
@@ -15 +11 @@
 ! -----------------
 ! $Id$
+!
+! 153 2008-03-19 09:41:30Z steinfeld
+! heat sources within the forest canopy are added, which represent the
+! rate of heat input into the air from the forest leaves, evaluation of sinks
+! and sources for scalar concentration due to canopy elements
 !
 ! 138 2007-11-28 10:03:58Z letzel

palm/trunk/SOURCE/poisfft.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Arguments removed from transpose routines
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 164 2008-05-15 08:46:15Z raasch
+! Arguments removed from transpose routines
 !
 ! 128 2007-10-26 13:11:14Z raasch

palm/trunk/SOURCE/poismg.f90

@@ -8 +8 @@
 ! Actual revisions:
 ! -----------------
-! Bugfix: grid_level+1 has to be used in restrict for flags-array
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 181 2008-07-30 07:07:47Z raasch
+! Bugfix: grid_level+1 has to be used in restrict for flags-array
 !
 ! 114 2007-10-10 00:03:15Z raasch

palm/trunk/SOURCE/prandtl_fluxes.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Bugfix: change definition of us_wall from 1D to 2D:
-!         Modification of the evaluation of the vertical turbulent momentum 
-!         fluxes u'w' and v'w'; the first usws that is computed corresponds 
-!         to -u'w'/u* and not as priorily assumed to (-u'w')**0.5, the first 
-!         vsws that is computed corresponds to -v'w'/u* and not as priorily
-!         assumed to (-v'w')**0.5. Therefore, the intermediate result for 
-!         usws has to be multiplied by -u* instead by itself in order to 
-!         get u'w'. Accordingly, the intermediate result for vsws has to be 
-!         multiplied by -u* instead by itself in order to get v'w'. As u* 
-!         is calculated for the position of a scalar an additional 
-!         interpolation of u* to the position of u and v, respectively, 
-!         is necessary. As u* is not determined for the ghost points on 
-!         each PE, an additional exchange of information from neighbouring 
-!         PEs is necessary.!  
-! Change: Modification of the integrated version of the profile function for 
-!         momentum for unstable stratification
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 187 2008-08-06 16:25:09Z letzel
+! Bugfix: modification of the calculation of the vertical turbulent momentum
+! fluxes u'w' and v'w'
+! Bugfix: change definition of us_wall from 1D to 2D
+! Change: modification of the integrated version of the profile function for 
+! momentum for unstable stratification (does not effect results)
 !
 ! 108 2007-08-24 15:10:38Z letzel

palm/trunk/SOURCE/pres.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Bugfix in volume flow control for non-cyclic boundary conditions
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 151 2008-03-07 13:42:18Z raasch
+! Bugfix in volume flow control for non-cyclic boundary conditions
 !
 ! 106 2007-08-16 14:30:26Z raasch

palm/trunk/SOURCE/production_e.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! Change: add 'minus' sign to fluxes obtained from subroutine wall_fluxes_e for
-!         consistency with subroutine wall_fluxes
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 187 2008-08-06 16:25:09Z letzel
+! Change: add 'minus' sign to fluxes obtained from subroutine wall_fluxes_e for
+! consistency with subroutine wall_fluxes
 !
 ! 124 2007-10-19 15:47:46Z raasch

palm/trunk/SOURCE/prognostic_equations.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! add call of plant_canopy_model in the prognostic equation for
-! the potential temperature
-! add call of plant_canopy_model in the prognostic equation for
-! the concentration of a passive scalar
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 153 2008-03-19 09:41:30Z steinfeld
+! add call of plant_canopy_model in the prognostic equation for
+! the potential temperature and for the passive scalar
 !
 ! 138 2007-11-28 10:03:58Z letzel

palm/trunk/SOURCE/read_3d_binary.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 150 2008-02-29 08:19:58Z raasch
 ! Files from which restart data are to be read are determined and subsequently
 ! opened. The total domain on the restart file is allowed to be smaller than
@@ -12 +19 @@
 ! reading of old profil parameters (cross_..., dopr_crossindex, profile_***)
 ! removed, initialization of spectrum_x|y removed
-!
-! Former revisions:
-! -----------------
-! $Id$
 !
 ! 102 2007-07-27 09:09:17Z raasch

palm/trunk/SOURCE/read_var_list.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 173 2008-05-23 20:39:38Z raasch
 ! +cthf, leaf_surface_concentration, scalar_exchange_coefficient
 ! +numprocs_previous_run, hor_index_bounds_previous_run, inflow_damping_factor,
@@ -12 +19 @@
 ! read_3d_binary to here,
 ! routines read_parts_of_var_list and skip_var_list added at the end
-!
-! Former revisions:
-! -----------------
-! $Id$
 !
 ! 138 2007-11-28 10:03:58Z letzel

palm/trunk/SOURCE/time_integration.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! inflow turbulence is imposed by calling new routine inflow_turbulence
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 151 2008-03-07 13:42:18Z raasch
+! inflow turbulence is imposed by calling new routine inflow_turbulence
 !
 ! 108 2007-08-24 15:10:38Z letzel

palm/trunk/SOURCE/transpose.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 164 2008-05-15 08:46:15Z raasch
 ! f_inv changed from subroutine argument to automatic array in order to do
 ! re-ordering from f_in to f_inv in one step, one array work is needed instead
 ! of work1 and work2
 !
-! Former revisions:
-! -----------------
-! $Id$
+! February 2007
 ! RCS Log replace by Id keyword, revision history cleaned up
 !

palm/trunk/SOURCE/user_interface.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 159 2008-04-09 08:06:03Z raasch
 ! bugfix in user_read_restart_data
 ! small bugfixes for sample code (comments):
@@ -10 +17 @@
 ! - remove 'READ (13) u2_av' statement in user_read_restart_data
 ! +routines user_read_restart_data, user_spectra
-!
-! Former revisions:
-! -----------------
-! $Id$
 !
 ! 138 2007-11-28 10:03:58Z letzel

palm/trunk/SOURCE/wall_fluxes.f90

@@ -3 +3 @@
 ! Actual revisions:
 ! -----------------
-! Bugfix: change definition of us_wall from 1D to 2D:
-!         Modification of the evaluation of the vertical turbulent momentum 
-!         fluxes u'w' and v'w'; the first usws that is computed corresponds 
-!         to -u'w'/u* and not as priorily assumed to (-u'w')**0.5, the first 
-!         vsws that is computed corresponds to -v'w'/u* and not as priorily
-!         assumed to (-v'w')**0.5. Therefore, the intermediate result for 
-!         usws has to be multiplied by -u* instead by itself in order to 
-!         get u'w'. Accordingly, the intermediate result for vsws has to be 
-!         multiplied by -u* instead by itself in order to get v'w'.
-!         This requires the calculation of us_wall (and vel_total, u_i, v_i, ws)
-!         also in wall_fluxes_e.
-! Bugfix: storage of rifs to rifs_wall in wall_fluxes_e removed
-! Change: add 'minus' sign to fluxes produced by subroutine wall_fluxes_e for 
-!         consistency with subroutine wall_fluxes
-! Change: Modification of the integrated version of the profile function for 
-!         momentum for unstable stratification
+! 
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 187 2008-08-06 16:25:09Z letzel
+! Bugfix: Modification of the evaluation of the vertical turbulent momentum 
+! fluxes u'w' and v'w (see prandtl_fluxes), this requires the calculation of
+! us_wall (and vel_total, u_i, v_i, ws) also in wall_fluxes_e.
+! Bugfix: change definition of us_wall from 1D to 2D
+! Bugfix: storage of rifs to rifs_wall in wall_fluxes_e removed
+! Change: add 'minus' sign to fluxes produced by subroutine wall_fluxes_e for 
+! consistency with subroutine wall_fluxes
+! Change: Modification of the integrated version of the profile function for 
+! momentum for unstable stratification
+!
 ! Initial version (2007/03/07)
 !

palm/trunk/SOURCE/write_3d_binary.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
-! write_var_list is only called for pe0
-! -dopr_time_count,
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 145 2008-01-09 08:17:38Z raasch
+! write_var_list is only called for pe0, -dopr_time_count,
 ! hom_sum moved, volume_flow_area, volume_flow_initial moved to write_var_list,
 ! writing of old profil parameters (cross_..., dopr_crossindex, profile_***)
 ! removed
-!
-! Former revisions:
-! -----------------
-! $Id$
 !
 ! 102 2007-07-27 09:09:17Z raasch

palm/trunk/SOURCE/write_var_list.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
+! 
+!
+! Former revisions:
+! -----------------
+! $Id$
+!
+! 153 2008-03-19 09:41:30Z steinfeld
 ! +cthf, leaf_surface_concentration, scalar_exchange_coefficient
 ! +numprocs, hor_index_bounds, inflow_damping_height, inflow_damping_width,
@@ -10 +17 @@
 ! hom_sum, volume_flow_area, volume_flow_initial moved from write_3d_binary
 ! to here
-!
-! Former revisions:
-! -----------------
-! $Id$
 !
 ! 138 2007-11-28 10:03:58Z letzel