Changeset 3988 for palm/trunk/SOURCE/virtual_measurement_mod.f90

Timestamp:

May 22, 2019 11:32:37 AM (5 years ago)

Author:

kanani

Message:

enable steering of output interval for virtual measurements

File:

• palm/trunk/SOURCE/virtual_measurement_mod.f90 (modified) (4 diffs)

palm/trunk/SOURCE/virtual_measurement_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Add variables to enable steering of output interval for virtual measurements
+! 
+! 3913 2019-04-17 15:12:28Z gronemeier
 ! Bugfix: rotate positions of measurements before writing them into file
 ! 
@@ -284 +287 @@
     LOGICAL ::  init = .TRUE.                     !< flag indicating initialization of data output
     LOGICAL ::  use_virtual_measurement = .FALSE. !< Namelist parameter
-    
-    REAL(wp) ::  vm_time_start = 0.0              !< time after virtual measurements should start
+
+    REAL(wp) ::  dt_virtual_measurement = 0.0_wp    !< namelist parameter
+    REAL(wp) ::  time_virtual_measurement = 0.0_wp  !< time since last 3d output
+    REAL(wp) ::  vm_time_start = 0.0                !< time after virtual measurements should start
 
     TYPE( virt_general )                        ::  vmea_general !< data structure which encompass general variables
@@ -325 +330 @@
 !
 !-- Public variables
-    PUBLIC  vmea, vmea_general, vm_time_start
+    PUBLIC  dt_virtual_measurement, time_virtual_measurement, vmea, vmea_general, vm_time_start
 
  CONTAINS
@@ -374 +379 @@
     CHARACTER (LEN=80) ::  line   !< dummy string that contains the current line of the parameter file
  
-    NAMELIST /virtual_measurement_parameters/  use_virtual_measurement,        &
+    NAMELIST /virtual_measurement_parameters/  dt_virtual_measurement,                             &
+                                               use_virtual_measurement,                            &
                                                vm_time_start