Return to frame.c CVS log

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

Annotation of researchv10no/libplot/libpen/frame.c, revision 1.1.1.1

1.1       root        1: #include "pen.h"
                      2: frame(xs, ys, xf, yf)
                      3: double xs, ys, xf, yf;
                      4: {
                      5:        e1->p1x = e0->p1x+(xs*DX);
                      6:        e1->p1y = e0->p1y+(ys*DY);
                      7:        e1->p2x = e0->p1x+(xf*DX);
                      8:        e1->p2y = e0->p1y+(yf*DY);
                      9:        fprintf(pltout,"IP %8.2f,%8.2f %8.2f,%8.2f\n",
                     10:                e1->p1x,e1->p1y,
                     11:                e1->p2x,e1->p2y);
                     12:        fprintf(pltout,"SC %8.2f,%8.2f,%8.2f,%8.2f\n",
                     13:                e1->xmin,e1->xmax,e1->ymin,e1->ymax);
                     14:        ckerr(0);
                     15: }

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