Changeset 392 for palm/trunk/SOURCE


Ignore:
Timestamp:
Sep 24, 2009 10:39:14 AM (15 years ago)
Author:
raasch
Message:

New:
---

Adapted for machine lck
(mrun, mbuild, subjob)

bc_lr/bc_ns in most subroutines replaced by LOGICAL variables bc_lr_cyc,
bc_ns_cyc for speed optimization
(check_parameters, diffusion_u, diffusion_v, diffusion_w, modules)

Additional timestep criterion in case of simulations with plant canopy (timestep)

Check for illegal entries in section_xy|xz|yz that exceed nz+1|ny+1|nx+1
(check_parameters)

Clipping of dvrp output implemented. Default colourtable for particles
implemented, particle attributes (color, dvrp_size) can be set with new
parameters particle_color, particle_dvrpsize, color_interval,
dvrpsize_interval (init_dvrp, data_output_dvrp, modules, user_data_output_dvrp).
Slicer attributes (dvrp) are set with new routine set_slicer_attributes_dvrp
and are controlled with existing parameters slicer_range_limits.
(set_slicer_attributes_dvrp)

Ocean atmosphere coupling allows to use independent precursor runs in order
to account for different spin-up times. The time when coupling has to be
started is given by new inipar parameter coupling_start_time. The precursor
ocean run has to be started using new mrun option "-y" in order to add
appendix "_O" to all output files.
(check_for_restart, check_parameters, data_output_2d, data_output_3d,
data_output_profiles, data_output_ptseries, data_output_spectra,
data_output_tseries, header, init_coupling, modules, mrun,
parin, read_var_list, surface_coupler, time_integration, write_var_list)

Polygon reduction for topography and ground plate isosurface. Reduction level
for buildings can be chosen with parameter cluster_size. (init_dvrp)

External pressure gradient (check_parameters, header, init_3d_model, modules,
parin, prognostic_equations, read_var_list, write_var_list)

New topography case 'single_street_canyon' (header, init_grid, modules, parin,
read_var_list, user_check_parameters, user_header, user_init_grid, write_var_list)

Option to predefine a target bulk velocity for conserve_volume_flow
(check_parameters, header, init_3d_model, modules, parin, read_var_list,
write_var_list)

Option for user defined 2D data output in xy cross sections at z=nzb+1
(data_output_2d, user_data_output_2d)

xy cross section output of surface heatfluxes (latent, sensible)
(average_3d_data, check_parameters, data_output_2d, modules, read_3d_binary,
sum_up_3d_data, write_3d_binary)

average_3d_data, check_for_restart, check_parameters, data_output_2d, data_output_3d, data_output_dvrp, data_output_profiles, data_output_ptseries, data_output_spectra, data_output_tseries, init_coupling, init_dvrp, init_grid, init_3d_model, header, mbuild, modules, mrun, package_parin, parin, prognostic_equations, read_3d_binary, read_var_list, subjob, surface_coupler, timestep, time_integration, user_check_parameters, user_data_output_2d, user_data_output_dvrp, user_header, user_init_grid, write_3d_binary, write_var_list

New: set_particle_attributes, set_slicer_attributes_dvrp

Changed:


lcmuk changed to lc to avoid problems with Intel compiler on sgi-ice
(poisfft)

For extended NetCDF files, the updated title attribute includes an update of
time_average_text where appropriate. (netcdf)

In case of restart runs without extension, initial profiles are not written
to NetCDF-file anymore. (data_output_profiles, modules, read_var_list, write_var_list)

Small change in formatting of the message handling routine concering the output in the
job protocoll. (message)

initializing_actions='read_data_for_recycling' renamed to 'cyclic_fill', now
independent of turbulent_inflow (check_parameters, header, init_3d_model)

2 NetCDF error numbers changed. (data_output_3d)

A Link to the website appendix_a.html is printed for further information
about the possible errors. (message)

Temperature gradient criterion for estimating the boundary layer height
replaced by the gradient criterion of Sullivan et al. (1998). (flow_statistics)

NetCDF unit attribute in timeseries output in case of statistic regions added
(netcdf)

Output of NetCDF messages with aid of message handling routine.
(check_open, close_file, data_output_2d, data_output_3d,
data_output_profiles, data_output_ptseries, data_output_spectra,
data_output_tseries, netcdf, output_particles_netcdf)

Output of messages replaced by message handling routine.
(advec_particles, advec_s_bc, buoyancy, calc_spectra, check_for_restart,
check_open, coriolis, cpu_log, data_output_2d, data_output_3d, data_output_dvrp,
data_output_profiles, data_output_spectra, fft_xy, flow_statistics, header,
init_1d_model, init_3d_model, init_dvrp, init_grid, init_particles, init_pegrid,
netcdf, parin, plant_canopy_model, poisfft_hybrid, poismg, read_3d_binary,
read_var_list, surface_coupler, temperton_fft, timestep, user_actions,
user_data_output_dvrp, user_dvrp_coltab, user_init_grid, user_init_plant_canopy,
user_parin, user_read_restart_data, user_spectra )

Maximum number of tails is calculated from maximum number of particles and
skip_particles_for_tail (init_particles)

Value of vertical_particle_advection may differ for each particle group
(advec_particles, header, modules)

First constant in array den also defined as type double. (eqn_state_seawater)

Parameter dvrp_psize moved from particles_par to dvrp_graphics_par. (package_parin)

topography_grid_convention moved from userpar to inipar (check_parameters,
header, parin, read_var_list, user_check_parameters, user_header,
user_init_grid, user_parin, write_var_list)

Default value of grid_matching changed to strict.

Adjustments for runs on lcxt4 (necessary due to an software update on CRAY) and
for coupled runs on ibmy (mrun, subjob)

advec_particles, advec_s_bc, buoyancy, calc_spectra, check_for_restart, check_open, check_parameters, close_file, coriolis, cpu_log, data_output_2d, data_output_3d, data_output_dvrp, data_output_profiles, data_output_ptseries, data_output_spectra, data_output_tseries, eqn_state_seawater, fft_xy, flow_statistics, header, init_1d_model, init_3d_model, init_dvrp, init_grid, init_particles, init_pegrid, message, mrun, netcdf, output_particles_netcdf, package_parin, parin, plant_canopy_model, poisfft, poisfft_hybrid, poismg, read_3d_binary, read_var_list, sort_particles, subjob, user_check_parameters, user_header, user_init_grid, user_parin, surface_coupler, temperton_fft, timestep, user_actions, user_data_output_dvrp, user_dvrp_coltab, user_init_grid, user_init_plant_canopy, user_parin, user_read_restart_data, user_spectra, write_var_list

Errors:


Bugfix: Initial hydrostatic pressure profile in case of ocean runs is now
calculated in 5 iteration steps. (init_ocean)

Bugfix: wrong sign in buoyancy production of ocean part in case of not using
the reference density (only in 3D routine production_e) (production_e)

Bugfix: output of averaged 2d/3d quantities requires that an avaraging
interval has been set, respective error message is included (check_parameters)

Bugfix: Output on unit 14 only if requested by write_binary.
(user_last_actions)

Bugfix to avoid zero division by km_neutral (production_e)

Bugfix for extended NetCDF files: In order to avoid 'data mode' errors if
updated attributes are larger than their original size, NF90_PUT_ATT is called
in 'define mode' enclosed by NF90_REDEF and NF90_ENDDEF calls. This implies a
possible performance loss; an alternative strategy would be to ensure equal
attribute size in a job chain. (netcdf)

Bugfix: correction of initial volume flow for non-flat topography (init_3d_model)
Bugfix: zero initialization of arrays within buildings for 'cyclic_fill' (init_3d_model)

Bugfix: to_be_resorted => s_av for time-averaged scalars (data_output_2d, data_output_3d)

Bugfix: error in formatting the output (message)

Bugfix: avoid that ngp_2dh_s_inner becomes zero (init_3_model)

Typographical error: unit of wpt in dots_unit (modules)

Bugfix: error in check, if particles moved further than one subdomain length.
This check must not be applied for newly released particles. (advec_particles)

Bugfix: several tail counters are initialized, particle_tail_coordinates is
only written to file if its third index is > 0, arrays for tails are allocated
with a minimum size of 10 tails if there is no tail initially (init_particles,
advec_particles)

Bugfix: pressure included for profile output (check_parameters)

Bugfix: Type of count and count_rate changed to default INTEGER on NEC machines
(cpu_log)

Bugfix: output if particle time series only if particle advection is switched
on. (time_integration)

Bugfix: qsws was calculated in case of constant heatflux = .FALSE. (prandtl_fluxes)

Bugfix: averaging along z is not allowed for 2d quantities (e.g. u* and z0) (data_output_2d)

Typographical errors (netcdf)

If the inversion height calculated by the prerun is zero, inflow_damping_height
must be explicitly specified (init_3d_model)

Small bugfix concerning 3d 64bit netcdf output format (header)

Bugfix: dt_fixed removed from the restart file, because otherwise, no change
from a fixed to a variable timestep would be possible in restart runs.
(read_var_list, write_var_list)

Bugfix: initial setting of time_coupling in coupled restart runs (time_integration)

advec_particles, check_parameters, cpu_log, data_output_2d, data_output_3d, header, init_3d_model, init_particles, init_ocean, modules, netcdf, prandtl_fluxes, production_e, read_var_list, time_integration, user_last_actions, write_var_list

Location:
palm/trunk/SOURCE
Files:
67 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/CURRENT_MODIFICATIONS

    r388 r392  
    11New:
    22---
    3 
    4 Adapted for machine lck
    5 (mrun, mbuild, subjob)
    6 
    7 bc_lr/bc_ns  in most subroutines replaced by LOGICAL variables bc_lr_cyc,
    8 bc_ns_cyc for speed optimization
    9 (check_parameters, diffusion_u, diffusion_v, diffusion_w, modules)
    10 
    11 Additional timestep criterion in case of simulations with plant canopy (timestep)
    12 
    13 Check for illegal entries in section_xy|xz|yz that exceed nz+1|ny+1|nx+1
    14 (check_parameters)
    15 
    16 Clipping of dvrp output implemented. Default colourtable for particles
    17 implemented, particle attributes (color, dvrp_size) can be set with new
    18 parameters particle_color, particle_dvrpsize, color_interval,
    19 dvrpsize_interval (init_dvrp, data_output_dvrp, modules, user_data_output_dvrp).
    20 Slicer attributes (dvrp) are set with new routine set_slicer_attributes_dvrp
    21 and are controlled with existing parameters slicer_range_limits.
    22 (set_slicer_attributes_dvrp)
    23 
    24 Ocean atmosphere coupling allows to use independent precursor runs in order
    25 to account for different spin-up times. The time when coupling has to be
    26 started is given by new inipar parameter coupling_start_time. The precursor
    27 ocean run has to be started using new mrun option "-y" in order to add
    28 appendix "_O" to all output files.
    29 (check_for_restart, check_parameters, data_output_2d, data_output_3d,
    30 data_output_profiles, data_output_ptseries, data_output_spectra,
    31 data_output_tseries, header, init_coupling, modules, mrun,
    32 parin, read_var_list, surface_coupler, time_integration, write_var_list)
    33 
    34 Polygon reduction for topography and ground plate isosurface. Reduction level
    35 for buildings can be chosen with parameter cluster_size. (init_dvrp)
    36 
    37 External pressure gradient (check_parameters, header, init_3d_model, modules,
    38 parin, prognostic_equations, read_var_list, write_var_list)
    39 
    40 New topography case 'single_street_canyon' (header, init_grid, modules, parin,
    41 read_var_list, user_check_parameters, user_header, user_init_grid, write_var_list)
    42 
    43 Option to predefine a target bulk velocity for conserve_volume_flow
    44 (check_parameters, header, init_3d_model, modules, parin, read_var_list,
    45 write_var_list)
    46 
    47 Option for user defined 2D data output in xy cross sections at z=nzb+1
    48 (data_output_2d, user_data_output_2d)
    49 
    50 xy cross section output of surface heatfluxes (latent, sensible)
    51 (average_3d_data, check_parameters, data_output_2d, modules, read_3d_binary,
    52 sum_up_3d_data, write_3d_binary)
    53 
    54 
    55 average_3d_data, check_for_restart, check_parameters, data_output_2d, data_output_3d, data_output_dvrp, data_output_profiles, data_output_ptseries, data_output_spectra, data_output_tseries, init_coupling, init_dvrp, init_grid, init_3d_model, header, mbuild, modules, mrun, package_parin, parin, prognostic_equations, read_3d_binary, read_var_list, subjob, surface_coupler, timestep, time_integration, user_check_parameters, user_data_output_2d, user_data_output_dvrp, user_header, user_init_grid, write_3d_binary, write_var_list
    56 
    57 New: set_particle_attributes, set_slicer_attributes_dvrp
    583
    594
    605Changed:
    616-------
    62 __lcmuk changed to __lc to avoid problems with Intel compiler on sgi-ice
    63 (poisfft)
    64 
    65 For extended NetCDF files, the updated title attribute includes an update of
    66 time_average_text where appropriate. (netcdf)
    67 
    68 In case of restart runs without extension, initial profiles are not written
    69 to NetCDF-file anymore. (data_output_profiles, modules, read_var_list, write_var_list)
    70 
    71 Small change in formatting of the message handling routine concering the output in the
    72 job protocoll. (message)
    73 
    74 initializing_actions='read_data_for_recycling' renamed to 'cyclic_fill', now
    75 independent of turbulent_inflow (check_parameters, header, init_3d_model)
    76 
    77 2 NetCDF error numbers changed. (data_output_3d)
    78 
    79 A Link to the website appendix_a.html is printed for further information
    80 about the possible errors. (message)
    81 
    82 Temperature gradient criterion for estimating the boundary layer height
    83 replaced by the gradient criterion of Sullivan et al. (1998). (flow_statistics)
    84 
    85 NetCDF unit attribute in timeseries output in case of statistic regions added
    86 (netcdf)
    87 
    88 Output of NetCDF messages with aid of message handling routine.
    89 (check_open, close_file, data_output_2d, data_output_3d,
    90 data_output_profiles, data_output_ptseries, data_output_spectra,
    91 data_output_tseries, netcdf, output_particles_netcdf)
    92 
    93 Output of messages replaced by message handling routine.
    94 (advec_particles, advec_s_bc, buoyancy, calc_spectra, check_for_restart,
    95 check_open, coriolis, cpu_log, data_output_2d, data_output_3d, data_output_dvrp,
    96 data_output_profiles, data_output_spectra, fft_xy, flow_statistics, header,
    97 init_1d_model, init_3d_model, init_dvrp, init_grid, init_particles, init_pegrid,
    98 netcdf, parin, plant_canopy_model, poisfft_hybrid, poismg, read_3d_binary,
    99 read_var_list, surface_coupler, temperton_fft, timestep, user_actions,
    100 user_data_output_dvrp, user_dvrp_coltab, user_init_grid, user_init_plant_canopy,
    101 user_parin, user_read_restart_data, user_spectra )
    102 
    103 Maximum number of tails is calculated from maximum number of particles and
    104 skip_particles_for_tail (init_particles)
    105 
    106 Value of vertical_particle_advection may differ for each particle group
    107 (advec_particles, header, modules)
    108 
    109 First constant in array den also defined as type double. (eqn_state_seawater)
    110 
    111 Parameter dvrp_psize moved from particles_par to dvrp_graphics_par. (package_parin)
    112 
    113 topography_grid_convention moved from userpar to inipar (check_parameters,
    114 header, parin, read_var_list, user_check_parameters, user_header,
    115 user_init_grid, user_parin, write_var_list)
    116 
    117 Default value of grid_matching changed to strict.
    118 
    119 Adjustments for runs on lcxt4 (necessary due to an software update on CRAY) and
    120 for coupled runs on ibmy (mrun, subjob)
    121 
    122 advec_particles, advec_s_bc, buoyancy, calc_spectra, check_for_restart, check_open, check_parameters, close_file, coriolis, cpu_log, data_output_2d, data_output_3d, data_output_dvrp, data_output_profiles, data_output_ptseries, data_output_spectra, data_output_tseries, eqn_state_seawater, fft_xy, flow_statistics, header, init_1d_model, init_3d_model, init_dvrp, init_grid, init_particles, init_pegrid, message, mrun, netcdf, output_particles_netcdf, package_parin, parin, plant_canopy_model, poisfft, poisfft_hybrid, poismg, read_3d_binary, read_var_list, sort_particles, subjob, user_check_parameters, user_header, user_init_grid, user_parin, surface_coupler, temperton_fft, timestep, user_actions, user_data_output_dvrp, user_dvrp_coltab, user_init_grid, user_init_plant_canopy, user_parin, user_read_restart_data, user_spectra, write_var_list
    1237
    1248
    1259Errors:
    12610------
    127 Bugfix: Initial hydrostatic pressure profile in case of ocean runs is now
    128 calculated in 5 iteration steps. (init_ocean)
    12911
    130 Bugfix: wrong sign in buoyancy production of ocean part in case of not using
    131 the reference density (only in 3D routine production_e) (production_e)
    13212
    133 Bugfix: output of averaged 2d/3d quantities requires that an avaraging
    134 interval has been set, respective error message is included (check_parameters)
    135 
    136 Bugfix: Output on unit 14 only if requested by write_binary.
    137 (user_last_actions)
    138 
    139 Bugfix to avoid zero division by km_neutral (production_e)
    140 
    141 Bugfix for extended NetCDF files: In order to avoid 'data mode' errors if
    142 updated attributes are larger than their original size, NF90_PUT_ATT is called
    143 in 'define mode' enclosed by NF90_REDEF and NF90_ENDDEF calls. This implies a
    144 possible performance loss; an alternative strategy would be to ensure equal
    145 attribute size in a job chain. (netcdf)
    146 
    147 Bugfix: correction of initial volume flow for non-flat topography (init_3d_model)
    148 Bugfix: zero initialization of arrays within buildings for 'cyclic_fill' (init_3d_model)
    149 
    150 Bugfix: to_be_resorted => s_av for time-averaged scalars (data_output_2d, data_output_3d)
    151 
    152 Bugfix: error in formatting the output (message)
    153 
    154 Bugfix: avoid that ngp_2dh_s_inner becomes zero (init_3_model)
    155 
    156 Typographical error: unit of wpt in dots_unit (modules)
    157 
    158 Bugfix: error in check, if particles moved further than one subdomain length.
    159 This check must not be applied for newly released particles. (advec_particles)
    160 
    161 Bugfix: several tail counters are initialized, particle_tail_coordinates is
    162 only written to file if its third index is > 0, arrays for tails are allocated
    163 with a minimum size of 10 tails if there is no tail initially (init_particles,
    164 advec_particles)
    165 
    166 Bugfix: pressure included for profile output (check_parameters)
    167 
    168 Bugfix: Type of count and count_rate changed to default INTEGER on NEC machines
    169 (cpu_log)
    170 
    171 Bugfix: output if particle time series only if particle advection is switched
    172 on. (time_integration)
    173 
    174 Bugfix: qsws was calculated in case of constant heatflux = .FALSE. (prandtl_fluxes)
    175 
    176 Bugfix: averaging along z is not allowed for 2d quantities (e.g. u* and z0) (data_output_2d)
    177 
    178 Typographical errors (netcdf)
    179 
    180 If the inversion height calculated by the prerun is zero, inflow_damping_height
    181 must be explicitly specified (init_3d_model)
    182 
    183 Small bugfix concerning 3d 64bit netcdf output format (header)
    184 
    185 Bugfix: dt_fixed removed from the restart file, because otherwise, no change
    186 from a fixed to a variable timestep would be possible in restart runs.
    187 (read_var_list, write_var_list)
    188 
    189 Bugfix: initial setting of time_coupling in coupled restart runs (time_integration)
    190 
    191 advec_particles, check_parameters, cpu_log, data_output_2d, data_output_3d, header, init_3d_model, init_particles, init_ocean, modules, netcdf, prandtl_fluxes, production_e, read_var_list, time_integration, user_last_actions, write_var_list
  • palm/trunk/SOURCE/advec_particles.f90

    r336 r392  
    44! Current revisions:
    55! -----------------
     6! TEST: PRINT statements on unit 9 (commented out)
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 336 2009-06-10 11:19:35Z raasch
    613! Particle attributes are set with new routine set_particle_attributes.
    714! Vertical particle advection depends on the particle group.
     
    1219! Bugfix: several tail counters are initialized, particle_tail_coordinates is
    1320! only written to file if its third index is > 0
    14 ! TEST: PRINT statements on unit 9 (commented out)
    15 !
    16 ! Former revisions:
    17 ! -----------------
    18 ! $Id$
    1921!
    2022! 212 2008-11-11 09:09:24Z raasch
  • palm/trunk/SOURCE/advec_s_bc.f90

    r247 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine
    7 !
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 247 2009-02-27 14:01:30Z heinze
     13! Output of messages replaced by message handling routine
    1214!
    1315! 216 2008-11-25 07:12:43Z raasch
  • palm/trunk/SOURCE/average_3d_data.f90

    r367 r392  
    44! Actual revisions:
    55! -----------------
    6 ! Added calculation of shf* and qsws*
     6!
    77!
    88! Former revisions:
    99! -----------------
    1010! $Id$
     11!
     12! 367 2009-08-25 08:35:52Z maronga
     13! Added calculation of shf* and qsws*
    1114!
    1215! 96 2007-06-04 08:07:41Z raasch
  • palm/trunk/SOURCE/buoyancy.f90

    r247 r392  
    44! Currrent revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine
    7 !
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 247 2009-02-27 14:01:30Z heinze
     13! Output of messages replaced by message handling routine
    1214!
    1315! 132 2007-11-20 09:46:11Z letzel
  • palm/trunk/SOURCE/calc_spectra.f90

    r274 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine
    7 !
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 274 2009-03-26 15:11:21Z heinze
     13! Output of messages replaced by message handling routine
    1214!
    1315! 225 2009-01-26 14:44:20Z raasch
  • palm/trunk/SOURCE/check_for_restart.f90

    r291 r392  
    44! Current revisions:
    55! -----------------
    6 ! Coupling with independent precursor runs.
    7 ! Output of messages replaced by message handling routine
    8 !
     6!
    97!
    108! Former revisions:
    119! -----------------
    1210! $Id$
     11!
     12! 291 2009-04-16 12:07:26Z raasch
     13! Coupling with independent precursor runs.
     14! Output of messages replaced by message handling routine
    1315!
    1416! 222 2009-01-12 16:04:16Z letzel
  • palm/trunk/SOURCE/check_open.f90

    r277 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of NetCDF messages with aid of message handling routine.
    7 ! Output of messages replaced by message handling routine
    8 !
     6!
    97!
    108! Former revisions:
    119! -----------------
    1210! $Id$
     11!
     12! 277 2009-03-31 09:13:47Z heinze
     13! Output of NetCDF messages with aid of message handling routine.
     14! Output of messages replaced by message handling routine
    1315!
    1416! 146 2008-01-17 13:08:34Z raasch
  • palm/trunk/SOURCE/check_parameters.f90

    r388 r392  
    44! Actual revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 388 2009-09-23 09:40:33Z raasch
    613! Check profiles fpr prho and hyp.
    714! Bugfix: output of averaged 2d/3d quantities requires that an avaraging
     
    1724! 'single_street_canyon'
    1825! Added shf* and qsws* to the list of available output data
    19 !
    20 ! Former revisions:
    21 ! -----------------
    22 ! $Id$
    2326!
    2427! 222 2009-01-12 16:04:16Z letzel
  • palm/trunk/SOURCE/close_file.f90

    r263 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of NetCDF messages with aid of message handling routine.
     6!
    77!
    88! Former revisions:
    99! -----------------
    1010! $Id$
     11!
     12! 263 2009-03-18 12:26:04Z heinze
     13! Output of NetCDF messages with aid of message handling routine.
     14!
     15! Feb. 2007
    1116! RCS Log replace by Id keyword, revision history cleaned up
    1217!
  • palm/trunk/SOURCE/coriolis.f90

    r254 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
     6!
    77!
    88!
     
    1010! -----------------
    1111! $Id$
     12!
     13! 254 2009-03-05 15:33:42Z heinze
     14! Output of messages replaced by message handling routine.
    1215!
    1316! 106 2007-08-16 14:30:26Z raasch
  • palm/trunk/SOURCE/cpu_log.f90

    r274 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 ! Type of count and count_rate changed to default INTEGER on NEC machines
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 274 2009-03-26 15:11:21Z heinze
     13! Output of messages replaced by message handling routine.
     14! Type of count and count_rate changed to default INTEGER on NEC machines
    1215!
    1316! 225 2009-01-26 14:44:20Z raasch
  • palm/trunk/SOURCE/data_output_2d.f90

    r367 r392  
    44! Current revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 367 2009-08-25 08:35:52Z maronga
    613! simulated_time in NetCDF output replaced by time_since_reference_point.
    714! Output of NetCDF messages with aid of message handling routine.
     
    1118! Bugfix: to_be_resorted => s_av for time-averaged scalars
    1219! Calculation of shf* and qsws* added.
    13 !
    14 ! Former revisions:
    15 ! -----------------
    16 ! $Id$
    1720!
    1821! 215 2008-11-18 09:54:31Z raasch
  • palm/trunk/SOURCE/data_output_3d.f90

    r355 r392  
    44! Current revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 355 2009-07-17 01:03:01Z letzel
    613! simulated_time in NetCDF output replaced by time_since_reference_point.
    714! Output of NetCDF messages with aid of message handling routine.
    815! Output of messages replaced by message handling routine.
    916! Bugfix: to_be_resorted => s_av for time-averaged scalars
    10 !
    11 !
    12 ! Former revisions:
    13 ! -----------------
    14 ! $Id$
    1517!
    1618! 96 2007-06-04 08:07:41Z raasch
  • palm/trunk/SOURCE/data_output_dvrp.f90

    r287 r392  
    3232! Current revisions:
    3333! -----------------
     34!
     35!
     36! Former revisions:
     37! -----------------
     38! $Id$
     39!
     40! 287 2009-04-09 08:59:36Z raasch
    3441! Clipping of dvr-output implemented, using a default colourtable for
    3542! particles,
    3643! output of messages replaced by message handling routine.
    37 ! TEST: different colours for isosurfaces
    38 !
    39 ! Former revisions:
    40 ! -----------------
    41 ! $Id$
    4244!
    4345! 210 2008-11-06 08:54:02Z raasch
     
    467469
    468470          IF ( mode_dvrp(m)(1:10) == 'isosurface' )  THEN
    469              WRITE(9,*) '#8'
    470              CALL local_flush( 9 )
     471
    471472!
    472473!--          DVRP-Calls for plotting isosurfaces:
     
    485486             CALL DVRP_DATA( m-1, local_pf, 1, nx_dvrp, ny_dvrp, nz_dvrp, &
    486487                             cyclic_dvrp, cyclic_dvrp, cyclic_dvrp )
    487              WRITE(9,*) '#8.2'
    488              CALL local_flush( 9 )
    489488
    490489             c_size_x = vc_size_x;  c_size_y = vc_size_y;  c_size_z = vc_size_z
    491490             CALL DVRP_CLUSTER_SIZE( m-1, c_size_x, c_size_y, c_size_z )
    492              WRITE(9,*) '#8.3'
    493              CALL local_flush( 9 )
    494491
    495492             c_mode   = vc_mode
    496493             CALL DVRP_CLUSTERING_MODE( m-1, c_mode )
    497              WRITE(9,*) '#8.4'
    498              CALL local_flush( 9 )
    499494
    500495             gradient_normals = vc_gradient_normals
    501496             CALL DVRP_GRADIENTNORMALS( m-1, gradient_normals )
    502              WRITE(9,*) '#8.5'
    503              CALL local_flush( 9 )
     497
    504498!
    505499!--          A seperate procedure for setting vc_alpha will be in the next
     
    507501             tmp_c_alpha = vc_alpha
    508502             CALL DVRP_THRESHOLD( -(m-1)-1, tmp_c_alpha )
    509              WRITE(9,*) '#8.6'
    510              CALL local_flush( 9 )
    511503
    512504             IF ( dvrp_overlap )  THEN
     
    515507                tmp_th = 1.0   ! nothing is plotted because array values are 0
    516508             ENDIF
    517              WRITE(9,*) '#8.7'
    518              CALL local_flush( 9 )
    519509
    520510             CALL DVRP_THRESHOLD( m-1, tmp_th )
    521              WRITE(9,*) '#8.8'
    522              WRITE(9,*) 'nxl_dvrp=',nxl_dvrp, ' nxl=',nxl
    523              WRITE(9,*) 'nxr_dvrp=',nxr_dvrp, ' nxr=',nxr
    524              WRITE(9,*) 'nys_dvrp=',nys_dvrp, ' nys=',nys
    525              WRITE(9,*) 'nyn_dvrp=',nyn_dvrp, ' nyn=',nyn
    526              CALL local_flush( 9 )
     511
    527512             CALL DVRP_VISUALIZE( m-1, 21, dvrp_filecount )
    528              WRITE(9,*) '#8.9'
    529              CALL local_flush( 9 )
    530513
    531514             CALL cpu_log( log_point_s(26), 'dvrp_isosurface', 'stop' )
    532                       WRITE(9,*) '#9'
    533                       CALL local_flush( 9 )
    534515
    535516          ELSEIF ( mode_dvrp(m)(1:6) == 'slicer' )  THEN
    536                       WRITE(9,*) '#10'
    537                       CALL local_flush( 9 )
     517
    538518!
    539519!--          DVRP-Calls for plotting slicers:
     
    572552             tmp_pos = slicer_position
    573553             CALL DVRP_SLICER( m-1, section_mode, tmp_pos )
    574 !             tmp_pos = 1.0
    575 !             CALL DVRP_SLICER( m-1, 2, tmp_pos )
    576              WRITE (9,*) 'nx_dvrp=', nx_dvrp
    577              WRITE (9,*) 'ny_dvrp=', ny_dvrp
    578              WRITE (9,*) 'nz_dvrp=', nz_dvrp
    579              WRITE (9,*) 'section_mode=', section_mode
    580              WRITE (9,*) 'slicer_position=', slicer_position
    581              CALL local_flush( 9 )
    582554
    583555             CALL DVRP_VISUALIZE( m-1, 2, dvrp_filecount )
    584556
    585557             CALL cpu_log( log_point_s(27), 'dvrp_slicer', 'stop' )
    586                       WRITE(9,*) '#11'
    587                       CALL local_flush( 9 )
    588558
    589559          ENDIF
     
    591561          DEALLOCATE( local_pf )
    592562
    593                       WRITE(9,*) '#12'
    594                       CALL local_flush( 9 )
    595563       ELSEIF ( mode_dvrp(m)(1:9) == 'pathlines' ) THEN
    596564
     
    629597
    630598    ENDDO
    631                       WRITE(9,*) '#13'
    632                       CALL local_flush( 9 )
    633599
    634600    dvrp_filecount = dvrp_filecount + 1
  • palm/trunk/SOURCE/data_output_profiles.f90

    r345 r392  
    44! Current revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 345 2009-07-01 14:37:56Z heinze
    613! In case of restart runs without extension, initial profiles are not written
    714! to NetCDF-file anymore.
     
    916! Output of NetCDF messages with aid of message handling routine.
    1017! Output of messages replaced by message handling routine.
    11 !
    12 !
    13 ! Former revisions:
    14 ! -----------------
    15 ! $Id$
    1618!
    1719! 197 2008-09-16 15:29:03Z raasch
  • palm/trunk/SOURCE/data_output_ptseries.f90

    r291 r392  
    44! Current revisions:
    55! -----------------
    6 ! simulated_time in NetCDF output replaced by time_since_reference_point.
    7 ! Output of NetCDF messages with aid of message handling routine.
    8 !
     6!
    97!
    108! Former revisions:
    119! -----------------
    1210! $Id$
     11!
     12! 291 2009-04-16 12:07:26Z raasch
     13! simulated_time in NetCDF output replaced by time_since_reference_point.
     14! Output of NetCDF messages with aid of message handling routine.
    1315!
    1416! 60 2007-03-11 11:50:04Z raasch
  • palm/trunk/SOURCE/data_output_spectra.f90

    r291 r392  
    44! Current revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 291 2009-04-16 12:07:26Z raasch
    613! simulated_time in NetCDF output replaced by time_since_reference_point.
    714! Output of NetCDF messages with aid of message handling routine.
    815! Output of messages replaced by message handling routine.
    9 !
    10 !
    11 ! Former revisions:
    12 ! -----------------
    13 ! $Id$
    1416!
    1517! 189 2008-08-13 17:09:26Z letzel
  • palm/trunk/SOURCE/data_output_tseries.f90

    r291 r392  
    44! Current revisions:
    55! -----------------
    6 ! simulated_time in NetCDF output replaced by time_since_reference_point.
    7 ! Output of NetCDF messages with aid of message handling routine.
    8 !
     6!
    97!
    108! Former revisions:
    119! -----------------
    1210! $Id$
     11!
     12! 291 2009-04-16 12:07:26Z raasch
     13! simulated_time in NetCDF output replaced by time_since_reference_point.
     14! Output of NetCDF messages with aid of message handling routine.
    1315!
    1416! 48 2007-03-06 12:28:36Z raasch
  • palm/trunk/SOURCE/diffusion_u.f90

    r366 r392  
    44! Actual revisions:
    55! -----------------
    6 ! bc_ns replaced by bc_ns_cyc
     6!
    77!
    88! Former revisions:
    99! -----------------
    1010! $Id$
     11!
     12! 366 2009-08-25 08:06:27Z raasch
     13! bc_ns replaced by bc_ns_cyc
    1114!
    1215! 106 2007-08-16 14:30:26Z raasch
  • palm/trunk/SOURCE/diffusion_v.f90

    r366 r392  
    44! Actual revisions:
    55! -----------------
    6 ! bc_lr replaced by bc_lr_cyc
     6!
    77!
    88! Former revisions:
    99! -----------------
    1010! $Id$
     11!
     12! 366 2009-08-25 08:06:27Z raasch
     13! bc_lr replaced by bc_lr_cyc
    1114!
    1215! 106 2007-08-16 14:30:26Z raasch
  • palm/trunk/SOURCE/diffusion_w.f90

    r366 r392  
    44! Actual revisions:
    55! -----------------
    6 ! bc_lr/bc_ns replaced by bc_lr_cyc/bc_ns_cyc
     6!
    77!
    88! Former revisions:
    99! -----------------
    1010! $Id$
     11!
     12! 366 2009-08-25 08:06:27Z raasch
     13! bc_lr/bc_ns replaced by bc_lr_cyc/bc_ns_cyc
    1114!
    1215! 75 2007-03-22 09:54:05Z raasch
  • palm/trunk/SOURCE/eqn_state_seawater.f90

    r388 r392  
    44! Actual revisions:
    55! -----------------
    6 ! Potential density is additionally calculated in eqn_state_seawater,
    7 ! first constant in array den also defined as type double
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 388 2009-09-23 09:40:33Z raasch
     13! Potential density is additionally calculated in eqn_state_seawater,
     14! first constant in array den also defined as type double.
    1215!
    1316! 97 2007-06-21 08:23:15Z raasch
  • palm/trunk/SOURCE/fft_xy.f90

    r274 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 !
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 274 2009-03-26 15:11:21Z heinze
     13! Output of messages replaced by message handling routine.
     14!
     15! Feb. 2007
    1216! RCS Log replace by Id keyword, revision history cleaned up
    1317!
  • palm/trunk/SOURCE/flow_statistics.f90

    r388 r392  
    44! Current revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 388 2009-09-23 09:40:33Z raasch
    613! Vertical profiles of potential density and hydrostatic pressure are
    714! calculated.
     
    1118! replaced by the gradient criterion of Sullivan et al. (1998).
    1219! Output of messages replaced by message handling routine.
    13 !
    14 !
    15 ! Former revisions:
    16 ! -----------------
    17 ! $Id$
    1820!
    1921! 197 2008-09-16 15:29:03Z raasch
  • palm/trunk/SOURCE/header.f90

    r346 r392  
    44! Current revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 346 2009-07-06 10:13:41Z raasch
    613! initializing_actions='read_data_for_recycling' renamed to 'cyclic_fill'
    714! Coupling with independent precursor runs.
     
    1320! topography_grid_convention moved from user_header
    1421! small bugfix concerning 3d 64bit netcdf output format
    15 !
    16 ! Former revisions:
    17 ! -----------------
    18 ! $Id$
    1922!
    2023! 206 2008-10-13 14:59:11Z raasch
  • palm/trunk/SOURCE/init_1d_model.f90

    r254 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 !
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 254 2009-03-05 15:33:42Z heinze
     13! Output of messages replaced by message handling routine.
    1214!
    1315! 184 2008-08-04 15:53:39Z letzel
  • palm/trunk/SOURCE/init_3d_model.f90

    r388 r392  
    77! Current revisions:
    88! -----------------
     9!
     10!
     11! Former revisions:
     12! -----------------
     13! $Id$
     14!
     15! 388 2009-09-23 09:40:33Z raasch
    916! Initialization of prho added.
    1017! bugfix: correction of initial volume flow for non-flat topography
     
    2027! If the inversion height calculated by the prerun is zero,
    2128! inflow_damping_height must be explicitly specified.
    22 !
    23 ! Former revisions:
    24 ! -----------------
    25 ! $Id$
    2629!
    2730! 181 2008-07-30 07:07:47Z raasch
  • palm/trunk/SOURCE/init_coupling.f90

    r291 r392  
    44! Actual revisions:
    55! -----------------
    6 ! Coupling with independent precursor runs.
     6!
    77!
    88! Former revisions:
    99! ------------------
    1010! $Id$
     11!
     12! 291 2009-04-16 12:07:26Z raasch
     13! Coupling with independent precursor runs.
    1114!
    1215! 222 2009-01-12 16:04:16Z letzel
  • palm/trunk/SOURCE/init_dvrp.f90

    r284 r392  
    44! Current revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 284 2009-04-06 06:36:10Z raasch
    613! Definition of a colortable to be used for particles.
    714! Output names are changed: surface=groundplate, buildings=topography
     
    1320! ToDo: checking of mode_dvrp for legal values is not correct
    1421! Implementation of a MPI-1 coupling: __mpi2 adjustments for MPI_COMM_WORLD
    15 !
    16 ! Former revisions:
    17 ! -----------------
    18 ! $Id$
    1922!
    2023! 210 2008-11-06 08:54:02Z raasch
  • palm/trunk/SOURCE/init_grid.f90

    r274 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 ! new topography case 'single_street_canyon'
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 274 2009-03-26 15:11:21Z heinze
     13! Output of messages replaced by message handling routine.
     14! new topography case 'single_street_canyon'
    1215!
    1316! 217 2008-12-09 18:00:48Z letzel
  • palm/trunk/SOURCE/init_ocean.f90

    r388 r392  
    44! Actual revisions:
    55! -----------------
    6 ! Bugfix: Initial profiles of hydrostatic pressure and density are calculated
    7 ! iteratively. First calculation of hyp(0) changed.
     6!
    87!
    98! Former revisions:
    109! ------------------
    1110! $Id$
     11!
     12! 388 2009-09-23 09:40:33Z raasch
     13! Bugfix: Initial profiles of hydrostatic pressure and density are calculated
     14! iteratively. First calculation of hyp(0) changed.
    1215!
    1316! 124 2007-10-19 15:47:46Z raasch
  • palm/trunk/SOURCE/init_particles.f90

    r336 r392  
    44! Current revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 336 2009-06-10 11:19:35Z raasch
    613! Maximum number of tails is calculated from maximum number of particles and
    714! skip_particles_for_tail,
     
    916! Bugfix: arrays for tails are allocated with a minimum size of 10 tails if
    1017! there is no tail initially
    11 !
    12 ! Former revisions:
    13 ! -----------------
    14 ! $Id$
    1518!
    1619! 150 2008-02-29 08:19:58Z raasch
  • palm/trunk/SOURCE/init_pegrid.f90

    r274 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
     6!
    77! ATTENTION: nnz_x undefined problem still has to be solved!!!!!!!!
    88! TEST OUTPUT (TO BE REMOVED) logging mpi2 ierr values
     
    1111! -----------------
    1212! $Id$
     13!
     14! 274 2009-03-26 15:11:21Z heinze
     15! Output of messages replaced by message handling routine.
    1316!
    1417! 206 2008-10-13 14:59:11Z raasch
  • palm/trunk/SOURCE/modules.f90

    r388 r392  
    55! Current revisions:
    66! -----------------
     7!
     8!
     9! Former revisions:
     10! -----------------
     11! $Id$
     12!
     13! 388 2009-09-23 09:40:33Z raasch
    714! +prho, prho_1
    815! +bc_lr_cyc, bc_ns_cyc
     
    2229! default value of grid_matching changed to strict
    2330! +shf_av, qsws_av
    24 !
    25 ! Former revisions:
    26 ! -----------------
    27 ! $Id$
    2831!
    2932! 217 2008-12-09 18:00:48Z letzel
  • palm/trunk/SOURCE/netcdf.f90

    r359 r392  
    77! Current revisions:
    88! ------------------
     9!
     10!
     11! Former revisions:
     12! -----------------
     13! $Id$
     14!
     15! 359 2009-08-19 16:56:44Z letzel
    916! For extended NetCDF files, the updated title attribute includes an update of
    1017! time_average_text where appropriate.
     
    1926! Output of messages replaced by message handling routine.
    2027! Typographical errors fixed.
    21 !
    22 !
    23 ! Former revisions:
    24 ! -----------------
    25 ! $Id$
    2628!
    2729! 216 2008-11-25 07:12:43Z raasch
  • palm/trunk/SOURCE/package_parin.f90

    r336 r392  
    44! Actual revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 336 2009-06-10 11:19:35Z raasch
    613! +clip_dvrp_*, cluster_size, color_interval, dvrpsize_interval,
    714! groundplate_color, isosurface_color, particle_color, particle_dvrpsize
     
    916! parameter dvrp_psize moved from particles_par to dvrp_graphics_par
    1017! Variables for dvrp-mode pathlines added
    11 !
    12 ! Former revisions:
    13 ! -----------------
    14 ! $Id$
    1518!
    1619! 210 2008-11-06 08:54:02Z raasch
  • palm/trunk/SOURCE/parin.f90

    r291 r392  
    44! Current revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 291 2009-04-16 12:07:26Z raasch
    613! +local_dvrserver_running in envpar
    714! Output of messages replaced by message handling routine.
     
    1017! dp_external, dp_level_b, dp_smooth, dpdxy, u_bulk, v_bulk in inipar
    1118! topography_grid_convention moved from userpar
    12 !
    13 ! Former revisions:
    14 ! -----------------
    15 ! $Id$
    1619!
    1720! 197 2008-09-16 15:29:03Z raasch
  • palm/trunk/SOURCE/plant_canopy_model.f90

    r257 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 !
    8 !
    9 ! Bugfix: remove IF statement in plant_canopy_model_ij
     6!
    107!
    118! Former revisions:
    129! -----------------
    1310! $Id$
     11!
     12! 257 2009-03-11 15:17:42Z heinze
     13! Output of messages replaced by message handling routine.
     14! Bugfix: remove IF statement in plant_canopy_model_ij
    1415!
    1516! 153 2008-03-19 09:41:30Z steinfeld
  • palm/trunk/SOURCE/poisfft.f90

    r377 r392  
    44! Actual revisions:
    55! -----------------
    6 ! __lcmuk changed to __lc to avoid problems with Intel compiler on sgi-ice
     6!
    77!
    88! Former revisions:
    99! -----------------
    1010! $Id$
     11!
     12! 377 2009-09-04 11:09:00Z raasch
     13! __lcmuk changed to __lc to avoid problems with Intel compiler on sgi-ice
    1114!
    1215! 164 2008-05-15 08:46:15Z raasch
  • palm/trunk/SOURCE/poisfft_hybrid.f90

    r274 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 !
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 274 2009-03-26 15:11:21Z heinze
     13! Output of messages replaced by message handling routine.
     14!
     15! Feb. 2007
    1216! RCS Log replace by Id keyword, revision history cleaned up
    1317!
  • palm/trunk/SOURCE/poismg.f90

    r257 r392  
    88! Current revisions:
    99! -----------------
    10 ! Output of messages replaced by message handling routine.
    11 !
     10!
    1211!
    1312! Former revisions:
    1413! -----------------
    1514! $Id$
     15!
     16! 257 2009-03-11 15:17:42Z heinze
     17! Output of messages replaced by message handling routine.
    1618!
    1719! 181 2008-07-30 07:07:47Z raasch
  • palm/trunk/SOURCE/prandtl_fluxes.f90

    r315 r392  
    44! Actual revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 315 2009-05-13 10:57:59Z raasch
    613! Saturation condition at (sea) surface is not used in precursor runs (only
    714! in the following coupled runs)
    815! Bugfix: qsws was calculated in case of constant heatflux = .FALSE.
    9 !
    10 ! Former revisions:
    11 ! -----------------
    12 ! $Id$
    1316!
    1417! 187 2008-08-06 16:25:09Z letzel
  • palm/trunk/SOURCE/production_e.f90

    r388 r392  
    44! Actual revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 388 2009-09-23 09:40:33Z raasch
    613! Bugfix: wrong sign in buoyancy production of ocean part in case of not using
    714!         the reference density (only in 3D routine production_e)
    815! Bugfix to avoid zero division by km_neutral
    9 !
    10 ! Former revisions:
    11 ! -----------------
    12 ! $Id$
    1316!
    1417! 208 2008-10-20 06:02:59Z raasch
  • palm/trunk/SOURCE/prognostic_equations.f90

    r388 r392  
    44! Actual revisions:
    55! -----------------
    6 ! prho is used instead of rho in diffusion_e,
    7 ! external pressure gradient
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 388 2009-09-23 09:40:33Z raasch
     13! prho is used instead of rho in diffusion_e,
     14! external pressure gradient
    1215!
    1316! 153 2008-03-19 09:41:30Z steinfeld
  • palm/trunk/SOURCE/read_3d_binary.f90

    r367 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 ! +shf_av, qsws_av
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 367 2009-08-25 08:35:52Z maronga
     13! Output of messages replaced by message handling routine.
     14! +shf_av, qsws_av
    1215!
    1316! 220 2008-12-18 07:00:36Z raasch
  • palm/trunk/SOURCE/read_var_list.f90

    r345 r392  
    44! Current revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 345 2009-07-01 14:37:56Z heinze
    613! +output_for_t0
    714! dt_fixed is read into a dummy variable.
     
    1118! dp_external, dp_level_b, dp_smooth, dpdxy, run_coupled,
    1219! time_since_reference_point, topography_grid_convention, u_bulk, v_bulk
    13 !
    14 ! Former revisions:
    15 ! -----------------
    16 ! $Id$
    1720!
    1821! 216 2008-11-25 07:12:43Z raasch
  • palm/trunk/SOURCE/set_particle_attributes.f90

    r271 r392  
    1010! $Id$
    1111!
    12 ! Initial version (2009/03/21)
     12! 271 2009-03-26 00:47:14Z raasch
     13! Initial version
    1314!
    1415! Description:
  • palm/trunk/SOURCE/set_slicer_attributes_dvrp.f90

    r305 r392  
    1010! $Id$
    1111!
    12 ! Initial version (2009/03/31)
     12! 305 2009-04-27 11:58:42Z raasch
     13! Initial version
    1314!
    1415! Description:
  • palm/trunk/SOURCE/sum_up_3d_data.f90

    r367 r392  
    44! Actual revisions:
    55! -----------------
    6 ! +shf*, qsws*
     6!
    77!
    88! Former revisions:
    99! -----------------
    1010! $Id$
     11!
     12! 2009-08-25 08:35:52Z maronga
     13! +shf*, qsws*
    1114!
    1215! 96 2007-06-04 08:07:41Z raasch
  • palm/trunk/SOURCE/surface_coupler.f90

    r291 r392  
    44! Current revisions:
    55! -----------------
    6 ! Coupling with independent precursor runs.
    7 ! Output of messages replaced by message handling routine.
    8 !
     6!
    97!
    108! Former revisions:
    119! ------------------
    1210! $Id$
     11!
     12! 291 2009-04-16 12:07:26Z raasch
     13! Coupling with independent precursor runs.
     14! Output of messages replaced by message handling routine.
    1315!
    1416! 206 2008-10-13 14:59:11Z raasch
  • palm/trunk/SOURCE/temperton_fft.f90

    r258 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 !
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 258 2009-03-13 12:36:03Z heinze
     13! Output of messages replaced by message handling routine.
     14!
     15! Feb. 2007
    1216! RCS Log replace by Id keyword, revision history cleaned up
    1317!
  • palm/trunk/SOURCE/time_integration.f90

    r388 r392  
    44! Actual revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 388 2009-09-23 09:40:33Z raasch
    613! Using prho instead of rho in diffusvities.
    714! Coupling with independent precursor runs.
    815! Bugfix: output of particle time series only if particle advection is switched
    916!         on
    10 !
    11 ! Former revisions:
    12 ! -----------------
    13 ! $Id$
    1417!
    1518! 151 2008-03-07 13:42:18Z raasch
  • palm/trunk/SOURCE/timestep.f90

    r343 r392  
    44! Current revisions:
    55! -----------------
    6 ! Additional timestep criterion in case of simulations with plant canopy
    7 !
    8 ! Output of messages replaced by message handling routine.
    9 !
     6!
    107!
    118! Former revisions:
    129! -----------------
    1310! $Id$
     11!
     12! 343 2009-06-24 12:59:09Z maronga
     13! Additional timestep criterion in case of simulations with plant canopy
     14! Output of messages replaced by message handling routine.
    1415!
    1516! 222 2009-01-12 16:04:16Z letzel
  • palm/trunk/SOURCE/user_actions.f90

    r258 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 !
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 258 2009-03-13 12:36:03Z heinze
     13! Output of messages replaced by message handling routine.
    1214!
    1315! 211 2008-11-11 04:46:24Z raasch
  • palm/trunk/SOURCE/user_data_output_2d.f90

    r343 r392  
    99! -----------------
    1010! $Id$
     11!
     12! 343 2009-06-24 12:59:09Z maronga
     13! +dummy argument two_d
    1114!
    1215! 211 2008-11-11 04:46:24Z raasch
  • palm/trunk/SOURCE/user_data_output_dvrp.f90

    r258 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 ! Clipping implemented
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 258 2009-03-13 12:36:03Z heinze
     13! Output of messages replaced by message handling routine.
     14! Clipping implemented
    1215!
    1316! 211 2008-11-11 04:46:24Z raasch
  • palm/trunk/SOURCE/user_dvrp_coltab.f90

    r258 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 !
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 258 2009-03-13 12:36:03Z heinze
     13! Output of messages replaced by message handling routine.
    1214!
    1315! 211 2008-11-11 04:46:24Z raasch
  • palm/trunk/SOURCE/user_header.f90

    r256 r392  
    44! Actual revisions:
    55! -----------------
    6 ! new topography case 'single_street_canyon'
    7 ! topography_grid_convention moved to header
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 256 2009-03-08 08:56:27Z letzel
     13! new topography case 'single_street_canyon'
     14! topography_grid_convention moved to header
    1215!
    1316! 2008-12-09 18:00:48Z letzel
  • palm/trunk/SOURCE/user_init_grid.f90

    r258 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 ! add 'single_street_canyon' as standard topography case
    8 ! -topography_grid_convention
     6!
    97!
    108! Former revisions:
    119! -----------------
    1210! $Id$
     11!
     12! 258 2009-03-13 12:36:03Z heinze
     13! Output of messages replaced by message handling routine.
     14! add 'single_street_canyon' as standard topography case
     15! -topography_grid_convention
    1316!
    1417! 217 2008-12-09 18:00:48Z letzel
  • palm/trunk/SOURCE/user_init_plant_canopy.f90

    r274 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 !
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 274 2009-03-26 15:11:21Z heinze
     13! Output of messages replaced by message handling routine.
    1214!
    1315! 211 2008-11-11 04:46:24Z raasch
  • palm/trunk/SOURCE/user_last_actions.f90

    r366 r392  
    44! Actual revisions:
    55! -----------------
    6 ! Output on unit 14 only if requested by write_binary
     6!
    77!
    88! Former revisions:
    99! -----------------
    1010! $Id$
     11!
     12! 366 2009-08-25 08:06:27Z raasch
     13! Output on unit 14 only if requested by write_binary
    1114!
    1215! 211 2008-11-11 04:46:24Z raasch
  • palm/trunk/SOURCE/user_parin.f90

    r274 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
    7 ! topography_grid_convention moved to inipar
     6!
    87!
    98! Former revisions:
    109! -----------------
    1110! $Id$
     11!
     12! 274 2009-03-26 15:11:21Z heinze
     13! Output of messages replaced by message handling routine.
     14! topography_grid_convention moved to inipar
    1215!
    1316! 217 2008-12-09 18:00:48Z letzel
  • palm/trunk/SOURCE/user_read_restart_data.f90

    r274 r392  
    77! Current revisions:
    88! -----------------
    9 ! Output of messages replaced by message handling routine.
    10 !
     9!
    1110!
    1211! Former revisions:
    1312! -----------------
    1413! $Id$
     14!
     15! 274 2009-03-26 15:11:21Z heinze
     16! Output of messages replaced by message handling routine.
    1517!
    1618! 220 2008-12-18 07:00:36Z raasch
  • palm/trunk/SOURCE/user_spectra.f90

    r274 r392  
    44! Current revisions:
    55! -----------------
    6 ! Output of messages replaced by message handling routine.
     6!
    77!
    88! Former revisions:
    99! -----------------
    1010! $Id$
     11!
     12! 274 2009-03-26 15:11:21Z heinze
     13! Output of messages replaced by message handling routine.
    1114!
    1215! 211 2008-11-11 04:46:24Z raasch
  • palm/trunk/SOURCE/write_3d_binary.f90

    r367 r392  
    44! Actual revisions:
    55! -----------------
    6 ! +shf_av, qsws_av
     6!
    77!
    88! Former revisions:
    99! -----------------
    1010! $Id$
     11!
     12! 367 2009-08-25 08:35:52Z maronga
     13! +shf_av, qsws_av
    1114!
    1215! 145 2008-01-09 08:17:38Z raasch
  • palm/trunk/SOURCE/write_var_list.f90

    r345 r392  
    44! Actual revisions:
    55! -----------------
     6!
     7!
     8! Former revisions:
     9! -----------------
     10! $Id$
     11!
     12! 345 2009-07-01 14:37:56Z heinze
    613! +output_for_t0
    714! bugfix: -dt_fixed, because otherwise, restart runs cannot change from a
     
    1118! dp_external, dp_level_b, dp_smooth, dpdxy, run_coupled,
    1219! time_since_reference_point, topography_grid_convention, u_bulk, v_bulk
    13 !
    14 ! Former revisions:
    15 ! -----------------
    16 ! $Id$
    1720!
    1821! 153 2008-03-19 09:41:30Z steinfeld
Note: See TracChangeset for help on using the changeset viewer.