From 119181fea57fa05cbf336ed09fb0152fee21313c Mon Sep 17 00:00:00 2001 From: Dave Whipp <dwhipp@dal.ca> Date: Wed, 25 May 2011 17:25:39 +0000 Subject: [PATCH] Removed unused declared/passed variables --- src/compute_dhdx_dhdy_dhdz.f90 | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/compute_dhdx_dhdy_dhdz.f90 b/src/compute_dhdx_dhdy_dhdz.f90 index 4e7349d5..72c1bff3 100644 --- a/src/compute_dhdx_dhdy_dhdz.f90 +++ b/src/compute_dhdx_dhdy_dhdz.f90 @@ -41,8 +41,7 @@ double precision volume double precision,dimension(:),allocatable :: h,dhdr,dhds,dhdt double precision jcb(3,3),jcbi(3,3) double precision eps -integer ierr,nproc,iproc -integer i,j,k,err +integer k,err integer nint !------------------------------------------------------------------------------- -- GitLab