Changeset 1241 for palm/trunk/SOURCE/ls_forcing.f90

Timestamp:

Oct 30, 2013 11:36:58 AM (10 years ago)

Author:

heinze

Message:

Nudging and large scale forcing from external file implemented

File:

• palm/trunk/SOURCE/ls_forcing.f90 (modified) (1 diff)

palm/trunk/SOURCE/ls_forcing.f90

@@ -161 +161 @@
           ENDIF
 
+
           DO  k = nzb, nzt+1
              IF ( highheight < zu(k) ) THEN