Pretty Fractions by I., S.

(N)=:N=:;/;0 7{;:65}.a.
e=:f'='&f=:,`(r@[,.])`(,.r=:3$'',:,)`,.@.(2#.2=,&#&$)&":
s=:f'+'&f
d=:f'-'&f
p=:rplc&('25+x';'(25+x)')@[f'*'f]
q=:2 :0
2|.'-',(center~1{$)":@>n;m
)
('']&wd 3 0&$f".);._1'=e+s-d*p/q'rplc~]&.;:LF,stdin load'format csv'

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page