home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / library / dos / diverses / leda / src / plane / _point_s.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-11-15  |  1.3 KB  |  68 lines
  1. /*******************************************************************************
  2. +
  3. +  LEDA  2.1.1                                                 11-15-1991
  4. +
  5. +
  6. +  _point_set.c
  7. +
  8. +
  9. +  Copyright (c) 1991  by  Max-Planck-Institut fuer Informatik
  10. +  Im Stadtwald, 6600 Saarbruecken, FRG     
  11. +  All rights reserved.
  12. + 
  13. *******************************************************************************/
  14.  
  15.  
  16.  
  17. #include <LEDA/point_set.h>
  18.  
  19. ps_item  Point_Set::insert(point p, void* i) 
  20. { ps_item it = delaunay_tree::insert(p,i);
  21.   T.insert(p.xcoord(),p.ycoord(),it);
  22.   return it;
  23.  }
  24.  
  25. list(point) Point_Set::all_points()
  26. { list(point) result;
  27.   list(ps_item)  L = all_items();
  28.   ps_item it;
  29.   forall(it,L) result.append(key(it));
  30.   return result;
  31. }
  32.  
  33.  
  34. ps_item Point_Set::lookup(point p)
  35. { double    x  = p.xcoord();
  36.   double    y  = p.ycoord();
  37.   dic2_item it = T.lookup(x,y);
  38.   return (it!=nil) ? T.inf(it) : nil;
  39. }
  40.  
  41. list(ps_item) Point_Set::range_search(real x0, real x1, real y0, real y1)
  42. {
  43.   list(dic2_item) Lr = T.range_search(x0,x1,y0,y1);
  44.  
  45.   list(ps_item) Lp;
  46.  
  47.   dic2_item it;
  48.  
  49.   forall(it,Lr) Lp.append(T.inf(it));
  50.  
  51.   return Lp;
  52.  
  53. }
  54.  
  55.  
  56. list(ps_item) Point_Set::all_items()          
  57. { list(ps_item) L; 
  58.   delaunay_tree::all_items(L); 
  59.   return L ; 
  60.  }
  61.  
  62.  
  63. list(ps_item) Point_Set::convex_hull()
  64. { list(ps_item) L; 
  65.   delaunay_tree::convex_hull(L);
  66.   return L;
  67.  }
  68.