Ignore:
Timestamp:
Oct 27, 2011 10:56:21 AM (10 years ago)
Author:
heinze
Message:

Output of liquid water potential temperature in case of cloud_physics=.T. enabled

File:
1 edited

Legend:

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

    r596 r771  
    44! Current revisions:
    55! -----------------
    6 !
     6! +lpt
    77!
    88! Former revisions:
     
    170170                unit = 'm2/s2'
    171171
     172             CASE ( 'lpt' )
     173                IF ( .NOT. cloud_physics )  THEN
     174                   WRITE ( message_string, * ) 'output of "', TRIM( var ), &
     175                        '" requires cloud_physics = .TRUE.'
     176                   CALL message( 'init_masks', 'PA0348', 1, 2, 0, 6, 0 )
     177                ENDIF
     178                unit = 'K'
     179
    172180             CASE ( 'pc', 'pr' )
    173181                IF ( .NOT. particle_advection )  THEN
Note: See TracChangeset for help on using the changeset viewer.