(@ 1 (pn (: A 0)(: N(#(l)))(: R 1) (@ N(pn (: A(+ A(* R(% N 2))))(: R(* R 2))(: N(#/ N 10)))) (p (+ 0(/?(^(+ 1(* 8 A)).5)1))) ))