7 lines
176 B
Text
7 lines
176 B
Text
R1000=. ;L:1 ,{ <@(<;._1);._2]0 :0
|
|
C CC CCC CD D DC DCC DCCC CM
|
|
X XX XXX XL L LX LXX LXXX XC
|
|
I II III IV V VI VII VIII IX
|
|
)
|
|
|
|
rfd=: ('M' $~ <.@%&1000) , R1000 {::~ 1000&|
|