From d34acb34070a53d1b46f61d1e8ba93acd8b55482 Mon Sep 17 00:00:00 2001
From: Dave Whipp <dwhipp@dal.ca>
Date: Tue, 24 May 2011 17:32:45 +0000
Subject: [PATCH] Added passing of params

---
 src/define_bc_nest.f90 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/define_bc_nest.f90 b/src/define_bc_nest.f90
index bf65b4d9..98b97563 100644
--- a/src/define_bc_nest.f90
+++ b/src/define_bc_nest.f90
@@ -18,7 +18,7 @@
 !------------------------------------------------------------------------------|
 !------------------------------------------------------------------------------|
 
-subroutine define_bc_nest (nnode,kfix,kfixt,x,y,z,u,v,w,temp,vo,nest)
+subroutine define_bc_nest (nnode,kfix,kfixt,x,y,z,u,v,w,temp,vo,params,nest)
 
 !------------------------------------------------------------------------------|
 !(((((((((((((((( Purpose of the routine  ))))))))))))))))))))))))))))))))))))))
@@ -41,6 +41,7 @@ double precision :: x(nnode),y(nnode),z(nnode)
 double precision :: u(nnode),v(nnode),w(nnode)
 double precision :: temp(nnode)
 type (void) vo
+type (parameters) params
 type (nest_info) nest
 
 !------------------------------------------------------------------------------|
-- 
GitLab