B=:2 :'u n'
X=:2 :'m*v'
3 :0^:_ N=:|:(,&":&.>/~a.{~64+])&:>:&i./$S=:<;.2@,&TAB;._2(1!:1)3
(,N)=:,S=:([do@$)@do@((,&('+-B';'X%B';;:'X%:]')@[{~,i:[)&.;:&'-/*SQRT=') ::]&.>S
)
wd@}:@;"1]&.(0j2&":)(TAB,~'-'bx@('_'=])}":!.8@) ::]&.>S
Note that non-ascii characters in the above source code will be escaped (such as \x9f).