diff --git a/CASCADE/find_neighbours.f b/CASCADE/find_neighbours.f index b2ec9e951ca1c680265be852a85b5001aa790495..c7fc82408062909890432c9acf2603481121bfbb 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)