V10/vol2/contents/photo2.ms

.so ../ADM/mac
.XX \& \& Pico-Portrait
.de X1
.nr %# \\$1
.ds ZX \\$3
.ds ZY \\$2
.BP
.KS
.so photo1.pic.o
.KE
.BP
filler
..
.TL
photo pages - part 2
.LP
.X1 502 "Dennis Ritchie" "new = $dmr[x+sin(y)/(y+50), y]"
.X1 512 "Norman Wilson" "Flake Transformation (program by Rodian Paul, 1988)"
.X1 542 "Fred Grampp" "Picture Map (produced by a pico function)"
.X1 556 "Dave Presotto" "Wipe Transformation (program by Rodian Paul, 1988)"
.Y1 594 "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)"
.X1 604 "Paul Glick" "new = $pg[X_cart(r=r_polar(x,y), a=(y*x)/4+A_polar(x,y)), Y_cart(r,a)]"
.BP
we are done now