Return to how CVS log

Up to [Research Unix] / researchv10dc / vol2 / Faces / How

Annotation of researchv10dc/vol2/Faces/How/how, revision 1.1.1.1

1.1       root        1: Andrew/Howard:
                      2: x new =
                      3: old[x_cart((r=r_polar(x,y)-(sin(a_polar(x,y)))/300),(a=a_polar(x,y))), y_cart(r,a)]
                      4: 
                      5: Pjw:
                      6: x new=(x<X/3)?$pjw:(x>X*2/3)?$melted:3*((x-X/3)*$melted+(X*2/3-x)*$pjw)/X
                      7: 
                      8: Dennis -streams- Ritchie:
                      9: x new = $dmr[clamp(x+sin(y)/(y+50)), y]
                     10: 
                     11: Doug McIlroy:
                     12: x new=$doug[xclamp((x*x)/X + 95), yclamp((y*y)/Y + 25)]
                     13: 
                     14: Gerard:
                     15: x new[x,yclamp(y+121-(6*r_polar(x,y))/9)]=$gerard
                     16: 
                     17: Bart:
                     18: x new = $bart[sqrt(x*512),clamp(y+sin(x)/(x+50))]
                     19: 
                     20: Bwk (C):
                     21: x new=$1[xclamp(a_polar(x,y)*5/2), yclamp(r_polar(x,y)*5/2)]
                     22: 
                     23: Pg:
                     24: x new=$pg[X_cart(r=r_polar(x,y), a=(y*x)/4+A_polar(x,y)), Y_cart(r,a)]
                     25: 
                     26: Rob:
                     27: x new = $rob[x+(X*cos(((x-X)*360)*2/X))/6,y]

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