Ignore:
Timestamp:
Jun 12, 2018 8:55:55 AM (3 years ago)
Author:
Giersch
Message:

Error messages related to the new vertical grid stretching revised, Bugfix in IF statement before error message

File:
1 edited

Legend:

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

    r3065 r3066  
    2626! -----------------
    2727! $Id$
     28! Error message revised
     29!
     30! 3065 2018-06-12 07:03:02Z Giersch
    2831! dz was replaced by dz(1), error message concerning grid stretching has been
    2932! introduced
     
    10101013                                     'greater than ', MAXVAL(rcz) +            &
    10111014                                      MAXVAL(rr) + eps_min
    1012           CALL message( 'init_grid', 'PA0484', 1, 2, 0, 6, 0 )
     1015          CALL message( 'wtm_init', 'PA0484', 1, 2, 0, 6, 0 )
    10131016       ENDIF
    10141017!
Note: See TracChangeset for help on using the changeset viewer.