Return to arrow CVS log

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

Annotation of researchv10no/cmd/ideal/lib/arrow, revision 1.1.1.1

1.1       root        1: .IS
                      2: arrow {
                      3:        var tl, hd, head, perp, headang;
                      4:        conn tl to hd;
                      5:        perp = head*(tl-hd)/abs(tl-hd);
                      6:        conn hd + cis(headang)*perp to hd to hd + cis(-headang)*perp;
                      7:        head ~ 0.1;
                      8:         headang ~ 25;
                      9: }
                     10: .IE

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