lsum(printf(?t,"~a/~a ",num(k),denom(k)),k,listify(union(setify(create_list(j/i,i,1,?read(),j,0,i)))));
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page