From 386e2e430158fea79bd1b2f279002147fb1afbcf Mon Sep 17 00:00:00 2001
From: Douglas Guptill <douglas.guptill@dal.ca>
Date: Mon, 1 Jun 2009 00:37:16 +0000
Subject: [PATCH] declare dummy parmaters to match callers
---
CASCADE/update_time_step.f | 3 +++
1 file changed, 3 insertions(+)
diff --git a/CASCADE/update_time_step.f b/CASCADE/update_time_step.f
index 62c28dad..f6a34dbe 100644
--- a/CASCADE/update_time_step.f
+++ b/CASCADE/update_time_step.f
@@ -33,6 +33,9 @@ c OUTPUT: dt = new time step length
c subroutines called:
c NONE
+ double precision dhminfluv,dhmaxfluv
+ double precision dhmindiff,dhmaxdiff
+
common /vocal/ ivocal
real xkf(*)
--
GitLab