Arch

C(rn(2000)).a({cx:d=>10*s(d*t), cy:d=>10*c(d*t), r:d=>250-.4*d+c(d*t/1000)}).y(f, c1()) 

1