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/radiation_model_mod.f90

    r3065 r3066  
    2828! -----------------
    2929! $Id$
     30! Error message revised
     31!
     32! 3065 2018-06-12 07:03:02Z Giersch
    3033! dz was replaced by dz(1), error message concerning vertical stretching was
    3134! added 
     
    51135116                                     'stretching is applied have to be ',      &
    51145117                                     'greater than ', zw(nzut)
    5115           CALL message( 'init_grid', 'PA0496', 1, 2, 0, 6, 0 )
     5118          CALL message( 'radiation_interaction_init', 'PA0496', 1, 2, 0, 6, 0 )
    51165119       ENDIF
    51175120!
Note: See TracChangeset for help on using the changeset viewer.