home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 344b.lha / plplot_v2.6 / src / plabv.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-01-27  |  518 b   |  22 lines
  1. #include "plplot.h"
  2.  
  3. /* Determines if point (px,py) lies above the line joining (sx1,sy1) to */
  4. /* (sx2,sy2). It only works correctly if sx1 <= px <= sx2  */
  5.  
  6. PLINT plabv(px, py, sx1, sy1, sx2, sy2)
  7. PLINT px, py, sx1, sy1, sx2, sy2;
  8. {
  9.       PLINT above;
  10.  
  11.       if (py >= sy1 && py >= sy2)
  12.         above = 1;
  13.       else if (py < sy1 && py < sy2)
  14.         above = 0;
  15.       else if ((PLFLT)(sx2-sx1) * (py-sy1) > (PLFLT)(px-sx1) * (sy2-sy1))
  16.         above = 1;
  17.       else
  18.         above = 0;
  19.  
  20.       return((PLINT)above);
  21. }
  22.