Return to circle.c CVS log

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

Annotation of researchv10no/libplot/libpen/circle.c, revision 1.1

1.1     ! root        1: #include "pen.h"
        !             2: circle(x, y, r)
        !             3: double x, y, r;
        !             4: {
        !             5:        if(noscale){
        !             6:        x = SCX(x);
        !             7:        y = SCY(y);
        !             8:        r = SCX(r);
        !             9:        }
        !            10:        penUp();
        !            11:        fprintf(pltout,"PA %8.2f,%8.2f CI %8.2f\n",
        !            12:                x, y, r);
        !            13:        ckerr(0);
        !            14: }
        !            15: disc(x, y, r)
        !            16: double x, y, r;
        !            17: {
        !            18:        circle(x, y, r);
        !            19: }

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