Return to fan.i CVS log

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

Annotation of researchv10no/cmd/ideal/tests/fan.i, revision 1.1.1.1

1.1       root        1: fan
                      2: .nf
                      3: .IS
                      4: fan{
                      5: var x;
                      6: var b;
                      7: conn x to y0;
                      8: conn x to y1;
                      9: conn x to y2;
                     10: }
                     11: main{
                     12: var y0,y1,y2;
                     13: y0 = (2,2);
                     14: y1 = y0 + 1;
                     15: y2 = y1 + 1;
                     16: conn 2 to 5 using 3 fan {} <x,b>;
                     17: }
                     18: .IE
                     19: .IS
                     20: ...forget fan
                     21: .IE

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