2 lines
89 B
Text
2 lines
89 B
Text
suf=: (;:'th st nd rd th') {::~ 4 <. 10 10 (* 1&~:)~/@#: ]
|
|
nth=: [: ;:inv (": , suf)each
|