From ca1bab0de427993662499315e43df0df44a8f45f Mon Sep 17 00:00:00 2001
From: Douglas Guptill <douglas.guptill@dal.ca>
Date: Mon, 29 Jun 2009 16:56:00 +0000
Subject: [PATCH] declare some variables
---
CASCADE/cascade.f | 3 +++
1 file changed, 3 insertions(+)
diff --git a/CASCADE/cascade.f b/CASCADE/cascade.f
index 87c36175..adac6afe 100644
--- a/CASCADE/cascade.f
+++ b/CASCADE/cascade.f
@@ -139,6 +139,9 @@ c - update_time_step
logical,dimension(:),allocatable::c_list,mask,inactive
logical,dimension(:,:),allocatable::mask_e
+ integer nnodedouar
+ real endtime, dtmin, dtmax
+
real influx,outflux
real*8 eps
character run_name*256
--
GitLab