Ignore:
Timestamp:
Jan 17, 2008 1:08:34 PM (14 years ago)
Author:
raasch
Message:

further updates for turbulent inflow: PE-grid change for restart is working

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/calc_spectra.f90

    r144 r146  
    291291    IF ( myid == 0 )  THEN
    292292!
    293 !--    Sum of spectra for later averaging (see routine plot_spectra)
     293!--    Sum of spectra for later averaging (see routine data_output_spectra)
    294294!--    Temperton fft results need to be normalized
    295295       IF ( fft_method == 'temperton-algorithm' )  THEN
     
    307307
    308308!
    309 !-- n_sp_x is needed by plot_spectra_x
     309!-- n_sp_x is needed by data_output_spectra_x
    310310    n_sp_x = n
    311311
     
    403403    IF ( myid == 0 )  THEN
    404404!
    405 !--    Sum of spectra for later averaging (see routine plot_spectra)
     405!--    Sum of spectra for later averaging (see routine data_output_spectra)
    406406!--    Temperton fft results need to be normalized
    407407       IF ( fft_method == 'temperton-algorithm' )  THEN
     
    419419
    420420!
    421 !-- n_sp_y is needed by plot_spectra_y
     421!-- n_sp_y is needed by data_output_spectra_y
    422422    n_sp_y = n
    423423
Note: See TracChangeset for help on using the changeset viewer.