From 1db27bfd1241f771dd0ad3d0fcd90a2a55c78366 Mon Sep 17 00:00:00 2001
From: Dave Whipp <dwhipp@dal.ca>
Date: Wed, 25 May 2011 17:13:42 +0000
Subject: [PATCH] Removed unused declared/passed variables

---
 src/compute_convergence_criterion.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/compute_convergence_criterion.f90 b/src/compute_convergence_criterion.f90
index 745bee9f..f570169b 100644
--- a/src/compute_convergence_criterion.f90
+++ b/src/compute_convergence_criterion.f90
@@ -49,8 +49,8 @@ logical velocity_converged
 !(((((((((((((((( declaration of the subroutine internal variables )))))))))))))
 !------------------------------------------------------------------------------|
   
-integer err,ierr,iproc,nproc,i
-double precision dduvw,duvw,uvw,time1,time2
+integer ierr,iproc,nproc,i
+double precision dduvw,duvw,uvw
 double precision velocity_diff_norm,maxdiff,oldmax
 character*72 shift
 
-- 
GitLab