Commit 3213f2f4 authored by Jannis Teunissen's avatar Jannis Teunissen

Fix another similar call (see prev. commit)

parent 03bbcc2b
...@@ -278,7 +278,7 @@ contains ...@@ -278,7 +278,7 @@ contains
end if end if
if (present(time)) then if (present(time)) then
ierr = dbaddiopt(dboptix, DBOPT_DTIME, time) ierr = dbadddopt(dboptix, DBOPT_DTIME, time)
end if end if
ierr = dbputmmesh(dbix, trim(mmname), len_trim(mmname), n_grids, & ierr = dbputmmesh(dbix, trim(mmname), len_trim(mmname), n_grids, &
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment