Changeset 3458 for palm/trunk/SOURCE/palm.f90

Timestamp:

Oct 30, 2018 2:51:23 PM (5 years ago)

Author:

kanani

Message:

Reintegrated fixes/changes from branch chemistry

File:

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

palm/trunk/SOURCE/palm.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! from chemistry branch r3443, forkel:
+! removed double do_emis check around CALL chem_init
+! replaced call to calc_date_and_time to init_date_and_time
+! 
+! 3337 2018-10-12 15:17:09Z kanani
 ! (from branch resler)
 ! Fix chemistry call
@@ -436 +441 @@
 
        CALL chem_init
+
 !       CALL photolysis_init   ! probably also required for restart
-
-       CALL init_date_and_time     !initialize the time of chemistry emissions
 
     ENDIF
@@ -448 +452 @@
 !
 !-- Initialize all necessary variables
-    CALL calc_date_and_time !this is required for chemistry emissions
+!
+!-- Initial time for chem_emissions_mod
+    CALL init_date_and_time
 
     CALL init_3d_model