home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / ledar34.zip / leda-r-3_4_tar / LEDA-3.4 / src / plane_alg / misc.c < prev    next >
Text File  |  1996-09-03  |  1KB  |  44 lines
  1. /*******************************************************************************
  2. +
  3. +  LEDA 3.4
  4. +
  5. +  misc.c
  6. +
  7. +  This file is part of the LEDA research version (LEDA-R) that can be 
  8. +  used free of charge in academic research and teaching. Any commercial
  9. +  use of this software requires a license which is distributed by the
  10. +  LEDA Software GmbH, Postfach 151101, 66041 Saarbruecken, FRG
  11. +  (fax +49 681 31104).
  12. +
  13. +  Copyright (c) 1991-1996  by  Max-Planck-Institut fuer Informatik
  14. +  Im Stadtwald, 66123 Saarbruecken, Germany     
  15. +  All rights reserved.
  16. + 
  17. *******************************************************************************/
  18.  
  19. bool Is_Simple_Polygon(const list<POINT>& L)
  20. {
  21.   list<SEGMENT> seg_list; 
  22.  
  23.   list_item it;
  24.   forall_items(it,L)
  25.   { POINT p = L[it];
  26.     POINT q = L[L.cyclic_succ(it)];
  27.     seg_list.append(SEGMENT(p,q));
  28.    }
  29.  
  30.   GRAPH<POINT,SEGMENT> G;
  31.  
  32.   SWEEP_SEGMENTS(seg_list,G);
  33.  
  34.   node v;
  35.   forall_nodes(v,G)
  36.     if (G.degree(v) != 2) return false;
  37.  
  38.   return true;
  39.  
  40. }
  41.  
  42.  
  43.  
  44.