Return to sbox.c CVS log

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

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

1.1     ! root        1: #include <stdio.h>
        !             2: #include "tek.h"
        !             3: sbox(x1, y1, x2, y2)
        !             4: double x1, y1, x2, y2;
        !             5: {
        !             6:        double ff[8], *fp[1];
        !             7:        int i[2];
        !             8:        ff[0] = ff[6] = x1;
        !             9:        ff[1] = ff[3] = y1;
        !            10:        ff[2] = ff[4] = x2;
        !            11:        ff[5] = ff[7] = y2;
        !            12:        i[0] = 4;
        !            13:        i[1] = 0;
        !            14:        fp[0] = ff;
        !            15:        internal = 1;
        !            16:        fill(i, fp);
        !            17:        internal = 0;
        !            18: }

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