S.Mustonen (1976), Survo Users' Guide (1992), p. 336
1 * 2 *HEADER= FRAME=3 SIZE=1164,1164 XDIV=0,1,0 YDIV=0,1,0 3 *T=0,2*pi,pi/4000 pi=3.14159265 SCALE=-3.5,3.5 DEVICE=PS,THING2.PS 4 *R=cos(78*T)+cos(80*T) A=R*cos(T) B=R*sin(T) 5 *p=0,2,1 s=0.25*p u=0.03*p LINETYPE=[color(0.0,0.8,1,0.3)] "Brown" 6 *PLOT X(T)=0.6*(p-1)+A+s*B+u*sin(5*B),
7 *Y(T)=2.1*(p-1)+B+u*sin(5*A)
8 *
Index | Catalog | Previous | Next