Changeset 4680 for palm/trunk/SOURCE/init_3d_model.f90

Timestamp:

Sep 16, 2020 10:20:34 AM (4 years ago)

Author:

gronemeier

Message:

Add option to fix date and time of the simulation; renamed set_reference_date_time to init_date_time (palm_date_time_mod, init_3d_model, modules, parin)

File:

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

palm/trunk/SOURCE/init_3d_model.f90

@@ -24 +24 @@
 ! -----------------
 ! $Id$
+! Add option to fix date or time of the simulation
+!
+! 4671 2020-09-09 20:27:58Z pavelkrc
 ! Implementation of downward facing USM and LSM surfaces
 !
@@ -198 +201 @@
 
     USE palm_date_time_mod,                                                                        &
-        ONLY:  set_reference_date_time
+        ONLY:  init_date_time
 
     USE pegrid
@@ -292 +295 @@
 !
 !-- Set reference date-time
-    CALL set_reference_date_time( date_time_str=origin_date_time )
+    CALL init_date_time( date_time_str=origin_date_time,                                           &
+                         use_fixed_date=use_fixed_date,                                            &
+                         use_fixed_time=use_fixed_time )
 
     IF ( debug_output )  CALL debug_message( 'allocating arrays', 'start' )