Changeset 2274 for palm/trunk/SOURCE/lpm_init.f90
- Timestamp:
- Jun 9, 2017 1:27:48 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/lpm_init.f90
r2265 r2274 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Changed error messages 28 ! 29 ! 2265 2017-06-08 16:58:28Z schwenkel 27 30 ! Unused variables removed. 28 31 ! … … 301 304 !-- propably (not realized so far). 302 305 IF ( surf_def_h(1)%ns >= 1 ) THEN 303 WRITE( message_string, * ) 'Overhanging topograp yhdo not work '// &306 WRITE( message_string, * ) 'Overhanging topography do not work '// & 304 307 'with particles' 305 308 CALL message( 'lpm_init', 'PA0212', 0, 1, 0, 6, 0 )
Note: See TracChangeset
for help on using the changeset viewer.