Changeset 3176 for palm/trunk/SOURCE/sum_up_3d_data.f90
- Timestamp:
- Jul 26, 2018 5:12:48 PM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/sum_up_3d_data.f90
r3173 r3176 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Remove output of latent heat flux at urban-surfaces and set fill values 28 ! instead 29 ! 30 ! 3173 2018-07-26 12:55:23Z suehring 27 31 ! Bugfix for last commit 28 32 ! … … 894 898 qsws_av(j,i) = qsws_av(j,i) + & 895 899 surf_lsm_h%qsws(m) * l_v 896 ELSEIF ( match_usm ) THEN897 m = surf_usm_h%end_index(j,i)898 qsws_av(j,i) = qsws_av(j,i) + &899 surf_usm_h%qsws(m) * l_v900 900 ENDIF 901 901 ENDDO
Note: See TracChangeset
for help on using the changeset viewer.