Annotation of researchv10dc/vol2/contents/photo3.ms, revision 1.1.1.1

1.1       root        1: .nr LL 6.5i
                      2: .nr LT 6.5i
                      3: .de XX
                      4: .nr %# \\$2
                      5: .ds %e .tl |\\$3||\\f(NI\\$1\\fP|
                      6: .ds %o .tl |\\f(NI\\$1\\fP||\\$3|
                      7: .ds %E .tl |\\\\n(PN||UNIX Papers|
                      8: .ds %O .tl |Research Tenth Edition||\\\\n(PN|
                      9: ..
                     10: .ds cr \h'3p'\s+3\fS\N'191'\fP\s-3
                     11: .br
                     12: .pn 1
                     13: .XX \& \& Pico-Portrait
                     14: .de X1
                     15: .ds ZX \\$3
                     16: .ds ZY \\$2
                     17: .BP
                     18: ...KS
                     19: .nr %# \\$1
                     20: .af PN 1
                     21: .so photo1.pic.o
                     22: ...KE
                     23: .nr %# \\$1
                     24: ..
                     25: .de Y1
                     26: .ds ZX \\$3
                     27: .ds ZY \\$2
                     28: .ds ZZ \\$4
                     29: .BP
                     30: ...KS
                     31: .nr %# \\$1
                     32: .af PN i
                     33: .so pho11.pic.o
                     34: ...KE
                     35: .nr %# \\$1
                     36: ..
                     37: .de X2
                     38: .ds ZX \\$4
                     39: .ds ZY \\$3
                     40: .ds ZZ \\$2
                     41: .BP
                     42: ...KS
                     43: .nr %# \\$1
                     44: .af PN i
                     45: .so photo2.pic.o
                     46: ...KE
                     47: .nr %# \\$1
                     48: .af PN 1
                     49: ..
                     50: .TL
                     51: photo pages (here's $4 wasted for a header page...)
                     52: .LP
                     53: .X2 2 "Dennis Ritchie" "Ken Thompson" "new = old[x_cart(r=16*sqrt(r_polar(x,y)),a=a_polar(x,y)), y_cart(r,a)]"
                     54: .Y1 6 "Andrew Hume" "new = $andrew[x_cart((r-(sin(a))/300),a), y_cart(r,a)]" "with r=r_polar(x,y) and a=a_polar(x,y)"
                     55: .X1 602 "Paul Glick" "new = $pg[X_cart(r=r_polar(x,y), a=(y*x)/4+A_polar(x,y)), Y_cart(r,a)]"
                     56: .BP
                     57: done

unix.superglobalmegacorp.com

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