Changeset 192


Ignore:
Timestamp:
Aug 27, 2008 4:51:49 PM (13 years ago)
Author:
letzel
Message:
  • Bugfix: exponent in calc_spectra_x (calc_spectra)
Location:
palm/trunk/SOURCE
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/CURRENT_MODIFICATIONS

    r191 r192  
    9696Errors:
    9797------
     98Bugfix: exponent = 1.0 / ( ny + 1.0 ) in calc_spectra_x (calc_spectra)
     99
    98100Bugfix: change definition of us_wall from 1D to 2D. Tests showed that this decreases
    99101u* by some 10% and increases TKE and momentum fluxes by some 10% because friction
     
    146148Bugfix: misplaced #endif directives (combine_plot_fields)
    147149
    148 check_parameters, 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
     150calc_spectra, check_parameters, 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
    149151
  • palm/trunk/SOURCE/calc_spectra.f90

    r189 r192  
    44! Actual revisions:
    55! -----------------
     6! bugfix in calc_spectra_x: exponent = 1.0 / ( ny + 1.0 )
    67! allow 100 spectra levels instead of 10 for consistency with
    78! define_netcdf_header
     
    231232!
    232233!-- Exponent for geometric average
    233     exponent = 1.0 / ( nx + 1.0 )
     234    exponent = 1.0 / ( ny + 1.0 )
    234235
    235236!
Note: See TracChangeset for help on using the changeset viewer.