Ignore:
Timestamp:
Jun 9, 2017 12:34:55 PM (4 years ago)
Author:
sward
Message:

error messages and numbers updated

File:
1 edited

Legend:

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

    r2259 r2271  
    2525! -----------------
    2626! $Id$
     27! Error message changed
     28!
     29! 2259 2017-06-08 09:09:11Z gronemeier
    2730! Implemented synthetic turbulence generator
    2831!
     
    938941                  mg_switch_to_pe0_level >= maximum_grid_level_l )  THEN
    939942                message_string = 'mg_switch_to_pe0_level ' // &
    940                                  'out of range and reset to default (=0)'
     943                                 'out of range and reset to 0'
    941944                CALL message( 'init_pegrid', 'PA0235', 0, 1, 0, 6, 0 )
    942945                mg_switch_to_pe0_level = 0
Note: See TracChangeset for help on using the changeset viewer.