Changeset 3467 for palm/trunk/SOURCE/date_and_time_mod.f90

Timestamp:

Oct 30, 2018 7:05:21 PM (7 years ago)

Author:

suehring

Message:

Branch salsa @3446 re-integrated into trunk

Location:

palm/trunk/SOURCE

Files:

• . (modified) (1 prop)
• date_and_time_mod.f90 (modified) (2 diffs)

palm/trunk/SOURCE/date_and_time_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Tabs removed
+! 
+! 3458 2018-10-30 14:51:23Z kanani
 ! from chemistry branch r3443, banzhafs:
 ! Added initial hour_of_day, hour_of_year, day_of_year and month_of_year to
@@ -563 +566 @@
     ELSE 
 
-        DO i_mon=1,index_mm
+    DO i_mon=1,index_mm
        
-            sum_dd=sum_dd+days(i_mon)
-
-        ENDDO
+       sum_dd=sum_dd+days(i_mon)
+
+    ENDDO
       
     index_hh=(sum_dd*nhour)+(index_dd*nhour)+(hh)