Ignore:
Timestamp:
May 28, 2018 7:55:41 AM (3 years ago)
Author:
Giersch
Message:

Code adjusted according to coding standards, renamed namelists, error messages revised until PA0347, output CASE 108 disabled

File:
1 edited

Legend:

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

    r3014 r3045  
    2525! -----------------
    2626! $Id$
     27! Error messages revised
     28!
     29! 3014 2018-05-09 08:42:38Z maronga
    2730! Added nzb_do and nzt_do for some modules for 2d output
    2831!
     
    462465            ntdim_2d_xy(av) )  THEN
    463466          WRITE ( message_string, * ) 'Output of xy cross-sections is not ',   &
    464                           'given at t=', simulated_time, '&because the',       &
     467                          'given at t=', simulated_time, ' because the',       &
    465468                          ' maximum number of output time levels is exceeded.'
    466469          CALL message( 'data_output_2d', 'PA0384', 0, 1, 0, 6, 0 )
     
    471474            ntdim_2d_xz(av) )  THEN
    472475          WRITE ( message_string, * ) 'Output of xz cross-sections is not ',   &
    473                           'given at t=', simulated_time, '&because the',       &
     476                          'given at t=', simulated_time, ' because the',       &
    474477                          ' maximum number of output time levels is exceeded.'
    475478          CALL message( 'data_output_2d', 'PA0385', 0, 1, 0, 6, 0 )
     
    480483            ntdim_2d_yz(av) )  THEN
    481484          WRITE ( message_string, * ) 'Output of yz cross-sections is not ',   &
    482                           'given at t=', simulated_time, '&because the',       &
     485                          'given at t=', simulated_time, ' because the',       &
    483486                          ' maximum number of output time levels is exceeded.'
    484487          CALL message( 'data_output_2d', 'PA0386', 0, 1, 0, 6, 0 )
Note: See TracChangeset for help on using the changeset viewer.