Ignore:
Timestamp:
Jan 4, 2008 4:29:45 AM (14 years ago)
Author:
letzel
Message:

User-defined spectra.

Bugfix: extra '*' removed in user_statistics sample code (user_interface).

File:
1 edited

Legend:

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

    r4 r144  
    44! Actual revisions:
    55! -----------------
    6 !
     6! user-defined spectra
    77!
    88! Former revisions:
     
    180180       
    181181    CASE DEFAULT
    182        PRINT*, '+++ preprocess_spectra: Spectra of ', &
    183                TRIM( data_output_sp(m) ), ' can not be calculated'
     182!
     183!--    The DEFAULT case is reached either if the parameter data_output_sp(m)
     184!--    contains a wrong character string or if the user has coded a special
     185!--    case in the user interface. There, the subroutine user_spectra
     186!--    checks which of these two conditions applies.
     187       CALL user_spectra( 'preprocess', m, pr )
    184188         
    185189    END SELECT
Note: See TracChangeset for help on using the changeset viewer.