Ignore:
Timestamp:
Feb 8, 2018 1:24:35 PM (4 years ago)
Author:
suehring
Message:

Output of ground-heat flux at natural- and urban-type surfaces in one output variable; enable restart data of _av variables that belong to both land- and urban-surface model

File:
1 edited

Legend:

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

    r2766 r2797  
    2525! -----------------
    2626! $Id$
     27! Enable output of ground-heat flux also at urban surfaces.
     28!
     29! 2766 2018-01-22 17:17:47Z kanani
    2730! Removed preprocessor directive __chem
    2831!
     
    200203             ENDDO
    201204
     205          CASE ( 'ghf*' )
     206             DO  i = nxl, nxr
     207                DO  j = nys, nyn
     208                   ghf_av(j,i) = ghf_av(j,i)                                   &
     209                                 / REAL( average_count_3d, KIND=wp )
     210                ENDDO
     211             ENDDO
     212             CALL exchange_horiz_2d( ghf_av, nbgp )
     213
    202214          CASE ( 'qsws*' )
    203215             DO  i = nxlg, nxrg
Note: See TracChangeset for help on using the changeset viewer.