Changeset 3467 for palm/trunk/SOURCE/date_and_time_mod.f90
- Timestamp:
- Oct 30, 2018 7:05:21 PM (7 years ago)
- Location:
- palm/trunk/SOURCE
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE
-
palm/trunk/SOURCE/date_and_time_mod.f90
r3458 r3467 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Tabs removed 28 ! 29 ! 3458 2018-10-30 14:51:23Z kanani 27 30 ! from chemistry branch r3443, banzhafs: 28 31 ! Added initial hour_of_day, hour_of_year, day_of_year and month_of_year to … … 563 566 ELSE 564 567 565 568 DO i_mon=1,index_mm 566 569 567 568 569 570 sum_dd=sum_dd+days(i_mon) 571 572 ENDDO 570 573 571 574 index_hh=(sum_dd*nhour)+(index_dd*nhour)+(hh)
Note: See TracChangeset
for help on using the changeset viewer.