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/average_3d_data.f90

    r668 r771  
    44! Current revisions:
    55! -----------------
    6 !
     6! +lpt_av
    77! Former revisions:
    88! -----------------
     
    7575             ENDDO
    7676
     77          CASE ( 'lpt' )
     78             DO  i = nxlg, nxrg
     79                DO  j = nysg, nyng
     80                   DO  k = nzb, nzt+1
     81                      lpt_av(k,j,i) = lpt_av(k,j,i) / REAL( average_count_3d )
     82                   ENDDO
     83                ENDDO
     84             ENDDO
     85
    7786          CASE ( 'lwp*' )
    7887             DO  i = nxlg, nxrg
Note: See TracChangeset for help on using the changeset viewer.