Ignore:
Timestamp:
Jul 12, 2016 4:34:24 PM (5 years ago)
Author:
suehring
Message:

Separate balance equations for humidity and passive_scalar

File:
1 edited

Legend:

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

    r1818 r1960  
    1919! Current revisions:
    2020! -----------------
    21 !
     21! Treat humidity and passive scalar separately
    2222!
    2323! Former revisions:
     
    498498             ENDDO
    499499
     500          CASE ( 'ssws*' )
     501             DO  i = nxlg, nxrg
     502                DO  j = nysg, nyng
     503                   ssws_av(j,i) = ssws_av(j,i) / REAL( average_count_3d, KIND=wp )
     504                ENDDO
     505             ENDDO
     506
    500507          CASE ( 't*' )
    501508             DO  i = nxlg, nxrg
Note: See TracChangeset for help on using the changeset viewer.