3 lines
115 B
Scheme
3 lines
115 B
Scheme
(for-each
|
|
(^s (format #t "~7d: ~d\n" s (decode s)))
|
|
'("MCMLVI" "XXC" "MCMXC" "XXCIII" "IIIIX" "MIM" "LXXIIX"))
|