paper 1 repeat a 1 100 { repeat b 1 100 { set [(a*a/b) (b*b/a)] ((a+b)/2) } }