From 71f5bda1ab10570f5ab2b7490a8aeeb885625291 Mon Sep 17 00:00:00 2001
From: Douglas Guptill <douglas.guptill@dal.ca>
Date: Wed, 10 Jun 2009 15:23:34 +0000
Subject: [PATCH] cosmetic
---
CASCADE/find_neighbours.f | 3 ---
1 file changed, 3 deletions(-)
diff --git a/CASCADE/find_neighbours.f b/CASCADE/find_neighbours.f
index b2ec9e95..c7fc8240 100644
--- a/CASCADE/find_neighbours.f
+++ b/CASCADE/find_neighbours.f
@@ -91,9 +91,6 @@ c does the work
mode=0
eps=0.d0
if (ivocal.eq.1) call debug ('delaun$',0)
-c call delaun (points,np,neighbour,vertices,nt,2*np,
-c & vis_tlist,vis_elist,add_tlist,eps,nv_max,
-c & mode,inactive,bfirst,itstart,subset)
call delaun (points,np,neighbour,vertices,nt,2*np,
& vis_tlist,vis_elist,add_tlist,eps,nv_max,
& mode,dummy1,bfirst,itstart,dummy2)
--
GitLab