Changeset 192 for palm/trunk
 Timestamp:
 Aug 27, 2008 4:51:49 PM (16 years ago)
 Location:
 palm/trunk/SOURCE
 Files:

 2 edited
Legend:
 Unmodified
 Added
 Removed

palm/trunk/SOURCE/CURRENT_MODIFICATIONS
r191 r192 96 96 Errors: 97 97  98 Bugfix: exponent = 1.0 / ( ny + 1.0 ) in calc_spectra_x (calc_spectra) 99 98 100 Bugfix: change definition of us_wall from 1D to 2D. Tests showed that this decreases 99 101 u* by some 10% and increases TKE and momentum fluxes by some 10% because friction … … 146 148 Bugfix: misplaced #endif directives (combine_plot_fields) 147 149 148 c heck_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_binary150 calc_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 149 151 
palm/trunk/SOURCE/calc_spectra.f90
r189 r192 4 4 ! Actual revisions: 5 5 !  6 ! bugfix in calc_spectra_x: exponent = 1.0 / ( ny + 1.0 ) 6 7 ! allow 100 spectra levels instead of 10 for consistency with 7 8 ! define_netcdf_header … … 231 232 ! 232 233 ! Exponent for geometric average 233 exponent = 1.0 / ( n x+ 1.0 )234 exponent = 1.0 / ( ny + 1.0 ) 234 235 235 236 !
Note: See TracChangeset
for help on using the changeset viewer.