Changeset 274 for palm/trunk/SOURCE/data_output_dvrp.f90
- Timestamp:
- Mar 26, 2009 3:11:21 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/data_output_dvrp.f90
r264 r274 401 401 ENDDO 402 402 ELSE 403 message_string = 'if humidity/passive_scalar = ' // & 404 'FALSE output of ' // TRIM( output_variable ) // & 405 'is not provided' 406 CALL message( 'data_output_dvrp', 'PA0183', 0, 0, 0, 6, 0 ) 403 message_string = 'if humidity/passive_scalar = ' // & 404 'FALSE output of ' // TRIM( output_variable ) // & 405 'is not provided' 406 CALL message( 'data_output_dvrp', 'PA0183',& 407 0, 0, 0, 6, 0 ) 407 408 ENDIF 408 409 … … 417 418 ENDDO 418 419 ELSE 419 message_string = 'if cloud_physics = FALSE ' // & 420 'output of ' // TRIM( output_variable) // & 421 'is not provided' 422 CALL message( 'data_output_dvrp', 'PA0184', 0, 0, 0, 6, 0 ) 420 message_string = 'if cloud_physics = FALSE ' // & 421 'output of ' // TRIM( output_variable) // & 422 'is not provided' 423 CALL message( 'data_output_dvrp', 'PA0184',& 424 0, 0, 0, 6, 0 ) 423 425 ENDIF 424 426
Note: See TracChangeset
for help on using the changeset viewer.