Return to poly.c CVS log

Up to [Research Unix] / researchv10no / libplot / lib4014

Annotation of researchv10no/libplot/lib4014/poly.c, revision 1.1.1.1

1.1       root        1: #include <stdio.h>
                      2: poly(num, ff)
                      3: int num[];
                      4: double *ff[];
                      5: {
                      6:        double *xp, *yp, **fp;
                      7:        int i, *n;
                      8:        n = num;
                      9:        fp = ff;
                     10:        while((i = *n++)){
                     11:                xp = *fp++;
                     12:                yp = xp+1;
                     13:                move(*xp, *yp);
                     14:                while(--i){
                     15:                        xp += 2;
                     16:                        yp += 2;
                     17:                        vec(*xp, *yp);
                     18:                }
                     19:        }
                     20: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.