Changeset 2817 for palm/trunk/SOURCE/parin.f90

Timestamp:

Feb 19, 2018 4:32:21 PM (6 years ago)

Author:

knoop

Message:

Preliminary gust module interface implemented

File:

• palm/trunk/SOURCE/parin.f90 (modified) (3 diffs)

palm/trunk/SOURCE/parin.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Preliminary gust module interface implemented
+! 
+! 2773 2018-01-30 14:12:54Z suehring
 ! Nesting for chemical species implemented
 ! 
@@ -357 +360 @@
     USE grid_variables,                                                        &
         ONLY:  dx, dy
+
+    USE gust_mod,                                                              &
+        ONLY: gust_parin
 
     USE indices,                                                               &
@@ -724 +730 @@
 !--       Check if radiation model is used and read &radiation_par if required
           CALL radiation_parin
+
+!
+!--       Check if gust module is used and read &gust_par if required
+          CALL gust_parin