home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 344b.lha / plplot_v2.6 / src / plpat.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-01-27  |  479 b   |  22 lines

  1. /* Sets line width */
  2.  
  3. #include "plplot.h"
  4. #include "declare.h"
  5.  
  6. void plpat(nlin,inc,del)
  7. PLINT nlin, *inc, *del;
  8. {
  9.    PLINT i, level;
  10.  
  11.    glev(&level);
  12.    if (level < 1)  plexit("Please call plstar before calling plpat.");
  13.    if(nlin<1 || nlin>2) plexit("Only 1 or 2 line styles allowed in plpat.");
  14.  
  15.    nps = nlin;
  16.    for(i=0; i<nlin; i++) {
  17.       inclin[i] = inc[i];
  18.       delta[i] = del[i];
  19.       if(del[i] < 0)plexit("Line spacing must be greater than 0 in plpat.");
  20.    }
  21. }
  22.