.runstdin 3 3 count{1/x[count -3 roll 0]def x{0 x{add}forall 2 div sub mul}forall sqrt round cvi =}for