Return to norm.i CVS log

Up to [Research Unix] / researchv10no / cmd / ideal / tests

Annotation of researchv10no/cmd/ideal/tests/norm.i, revision 1.1

1.1     ! root        1: norm
        !             2: .nf
        !             3: .IS
        !             4: ...minx -1.5
        !             5: ...maxy 1.5
        !             6: ...maxx 1.5
        !             7: ...miny -1.5
        !             8: ...libfile hole
        !             9: gridline {
        !            10:        var a,b;
        !            11:        var neg, pos;
        !            12:        conn 0.5*(a+b) - neg to 0.5*(a+b) + pos;
        !            13: }
        !            14: main{
        !            15:        conn (1,0) to (1,-1) using 10 gridline {neg = 1; pos = 0;} <a,b>;
        !            16:        conn (0,-1) to (1,-1) using 10 gridline {neg = 0; pos = (0,1);} <a,b>;
        !            17:        put hole{
        !            18:                radius = 1;
        !            19:                center = (0,0);
        !            20:                opaque exterior;
        !            21:        };
        !            22: }
        !            23: .IE
        !            24: .IS
        !            25: ...forget gridline
        !            26: .IE

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