Ignore:
Timestamp:
Jun 20, 2017 9:51:42 AM (7 years ago)
Author:
schwenkel
Message:

implementation of new bulk microphysics scheme

File:
1 edited

Legend:

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

    r2233 r2292  
    2525! -----------------
    2626! $Id$
     27! Implementation of new microphysic scheme: cloud_scheme = 'morrison'
     28! includes two more prognostic equations for cloud drop concentration (nc) 
     29! and cloud water content (qc).
     30!
     31! 2233 2017-05-30 18:08:54Z suehring
    2732!
    2833! 2232 2017-05-30 17:47:52Z suehring
     
    194199             ENDDO
    195200
     201          CASE ( 'nc' )
     202             DO  i = nxlg, nxrg
     203                DO  j = nysg, nyng
     204                   DO  k = nzb, nzt+1
     205                      nc_av(k,j,i) = nc_av(k,j,i) / REAL( average_count_3d, KIND=wp )
     206                   ENDDO
     207                ENDDO
     208             ENDDO
     209
    196210          CASE ( 'nr' )
    197211             DO  i = nxlg, nxrg
Note: See TracChangeset for help on using the changeset viewer.