plot(arcsin(10/r), 10/r,r=0..300)