Changeset 773 for palm/trunk/SOURCE/init_masks.f90

Timestamp:

Oct 27, 2011 11:47:37 AM (12 years ago)

Author:

heinze

Message:

Typo in number for error messages

File:

• palm/trunk/SOURCE/init_masks.f90 (modified) (1 diff)

palm/trunk/SOURCE/init_masks.f90

@@ -176 +176 @@
                    WRITE ( message_string, * ) 'output of "', TRIM( var ), &
                         '" requires cloud_physics = .TRUE.'
-                   CALL message( 'init_masks', 'PA0348', 1, 2, 0, 6, 0 )
+                   CALL message( 'init_masks', 'PA0108', 1, 2, 0, 6, 0 )
                 ENDIF
                 unit = 'K'