From 77a6a460a25886fa64e8ed56037d0ae7417b1689 Mon Sep 17 00:00:00 2001
From: Luis Kornblueh <luis.kornblueh@mpimet.mpg.de>
Date: Fri, 15 Jun 2018 11:12:14 +0200
Subject: [PATCH] Use explicit type conversion.
---
examples/simulate_iau.f90 | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/examples/simulate_iau.f90 b/examples/simulate_iau.f90
index fcb4e469..3867c408 100644
--- a/examples/simulate_iau.f90
+++ b/examples/simulate_iau.f90
@@ -21,13 +21,13 @@ program simulate_iau
write (0,*) "Assign values ..."
- start_date = "2016-01-01T00:00:00"
- stop_date = "2016-01-02T00:00:00"
+ start_date = t_datetime("2016-01-01T00:00:00")
+ stop_date = t_datetime("2016-01-02T00:00:00")
- time_step = "PT15M"
+ time_step = t_timedelta("PT15M")
dtime = 900.0
- iau_time_shift = "-PT1H30M"
+ iau_time_shift = t_timedelta("-PT1H30M")
dt_shift = -5400.0
write (0,*) "Prepare time loop ..."
--
GitLab