Changeset 2345

Timestamp:

Aug 9, 2017 11:50:30 AM (7 years ago)

Author:

Giersch

Message:

! Remove error message PA0156 and the conserve_volume_flow_mode option

File:

• palm/trunk/SOURCE/check_parameters.f90 (modified) (3 diffs)

palm/trunk/SOURCE/check_parameters.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Remove error message PA0156 and the conserve_volume_flow_mode option 
+! inflow_profile
+! 
+! 2339 2017-08-07 13:55:26Z raasch
 ! corrected timestamp in header
 ! 
@@ -3756 +3760 @@
 
        ELSEIF ( TRIM( conserve_volume_flow_mode ) /= 'initial_profiles' .AND.  &
-            TRIM( conserve_volume_flow_mode ) /= 'inflow_profile' .AND.        &
             TRIM( conserve_volume_flow_mode ) /= 'bulk_velocity' )  THEN
           WRITE( message_string, * )  'unknown conserve_volume_flow_mode: ',   &
@@ -3767 +3770 @@
                'require  conserve_volume_flow_mode = ''initial_profiles'''
           CALL message( 'check_parameters', 'PA0155', 1, 2, 0, 6, 0 )
-       ENDIF
-       IF ( bc_lr == 'cyclic'  .AND.  bc_ns == 'cyclic'  .AND.                 &
-            TRIM( conserve_volume_flow_mode ) == 'inflow_profile' )  THEN
-          WRITE( message_string, * )  'cyclic boundary conditions ',           &
-               'require conserve_volume_flow_mode = ''initial_profiles''',     &
-               ' or ''bulk_velocity'''
-          CALL message( 'check_parameters', 'PA0156', 1, 2, 0, 6, 0 )
        ENDIF
     ENDIF