Return to frame.c CVS log

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

Annotation of researchv10no/libplot/lib4014/frame.c, revision 1.1

1.1     ! root        1: #include <stdio.h>
        !             2: #include "tek.h"
        !             3: frame(xs, ys, xf, yf)
        !             4: double xs, ys, xf, yf;
        !             5: {
        !             6:        register double osidex, osidey;
        !             7:        osidex = e1->sidex;
        !             8:        osidey = e1->sidey;
        !             9:        e1->left = xs * (e0->left + e0->sidex);
        !            10:        e1->bottom = ys* (e0->bottom +  e0->sidey);
        !            11:        e1->sidex = (xf-xs) * e0->sidex;
        !            12:        e1->sidey = (yf-ys) * e0->sidey;
        !            13:        e1->scalex *= (e1->sidex / osidex);
        !            14:        e1->scaley *= (e1->sidey / osidey);
        !            15:        e1->quantum=e0->quantum/sqrt(e1->scalex*e1->scalex +
        !            16:                e1->scaley*e1->scaley);
        !            17:        if(e1->quantum < .01)
        !            18:                e1->quantum = .01;
        !            19: }

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