Changeset 1214 for palm/trunk/SOURCE
- Timestamp:
- Aug 21, 2013 12:29:17 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/check_parameters.f90
r1213 r1214 20 20 ! Current revisions: 21 21 ! ----------------- 22 ! 22 ! additional check for simultaneous use of vertical grid stretching 23 ! and particle advection 23 24 ! 24 25 ! Former revisions: … … 568 569 569 570 END SELECT 571 572 ! 573 !-- Check if vertical grid stretching is used together with particles 574 IF ( dz_stretch_level < 100000.0 .AND. particle_advection ) THEN 575 message_string = 'Vertical grid stretching is not allowed together ' // & 576 'with particle advection.' 577 CALL message( 'check_parameters', 'PA0017', 1, 2, 0, 6, 0 ) 578 ENDIF 570 579 571 580 !
Note: See TracChangeset
for help on using the changeset viewer.