Changeset 2345


Ignore:
Timestamp:
Aug 9, 2017 11:50:30 AM (5 years ago)
Author:
Giersch
Message:

! Remove error message PA0156 and the conserve_volume_flow_mode option

File:
1 edited

Legend:

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

    r2339 r2345  
    2525! -----------------
    2626! $Id$
     27! Remove error message PA0156 and the conserve_volume_flow_mode option
     28! inflow_profile
     29!
     30! 2339 2017-08-07 13:55:26Z raasch
    2731! corrected timestamp in header
    2832!
     
    37563760
    37573761       ELSEIF ( TRIM( conserve_volume_flow_mode ) /= 'initial_profiles' .AND.  &
    3758             TRIM( conserve_volume_flow_mode ) /= 'inflow_profile' .AND.        &
    37593762            TRIM( conserve_volume_flow_mode ) /= 'bulk_velocity' )  THEN
    37603763          WRITE( message_string, * )  'unknown conserve_volume_flow_mode: ',   &
     
    37673770               'require  conserve_volume_flow_mode = ''initial_profiles'''
    37683771          CALL message( 'check_parameters', 'PA0155', 1, 2, 0, 6, 0 )
    3769        ENDIF
    3770        IF ( bc_lr == 'cyclic'  .AND.  bc_ns == 'cyclic'  .AND.                 &
    3771             TRIM( conserve_volume_flow_mode ) == 'inflow_profile' )  THEN
    3772           WRITE( message_string, * )  'cyclic boundary conditions ',           &
    3773                'require conserve_volume_flow_mode = ''initial_profiles''',     &
    3774                ' or ''bulk_velocity'''
    3775           CALL message( 'check_parameters', 'PA0156', 1, 2, 0, 6, 0 )
    37763772       ENDIF
    37773773    ENDIF
Note: See TracChangeset for help on using the changeset viewer.