From a50745ff9e468d0614cc2dc2f311533c774d8741 Mon Sep 17 00:00:00 2001
From: Dave Whipp <dwhipp@dal.ca>
Date: Tue, 16 Feb 2010 20:12:31 +0000
Subject: [PATCH] fixed typos

---
 src/define_isostasy_bc.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/define_isostasy_bc.f90 b/src/define_isostasy_bc.f90
index df17ee18..7da83b66 100644
--- a/src/define_isostasy_bc.f90
+++ b/src/define_isostasy_bc.f90
@@ -52,7 +52,7 @@ logical firstcall
 !------------------------------------------------------------------------------|
 
 integer i,j,iproc,nproc,ierr,nb,xdisp,ydisp,xnow,ynow,ie,jp
-double precision eps,pi,zsl,dxy,zdisp,vinit
+double precision eps,pi,zsl,dxy,zdisp,vinit,x1,x2
 double precision,dimension(:,:),allocatable::zisoslx,zisosly
 
 !------------------------------------------------------------------------------|
-- 
GitLab