RosettaCodeData/Task/Roman-numerals-Decode/J/roman-numerals-decode-1.j
2023-07-01 13:44:08 -04:00

1 line
74 B
Text

rom2d=: [: (+/ .* _1^ 0,~ 2</\ ]) 1 5 10 50 100 500 1000 {~ 'IVXLCDM'&i.