2013-02-22 12:50:26 -05:00
|
|
|
|
2018-02-14 20:01:11 -05:00
|
|
|
USING: rot13 tools.test ;
|
2013-02-22 12:50:26 -05:00
|
|
|
|
|
|
|
{ "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz" } [
|
|
|
|
"NOPQRSTUVWXYZABCDEFGHIJKLMnopqrstuvwxyzabcdefghijklm" rot13
|
|
|
|
] unit-test
|
|
|
|
|
|
|
|
{
|
|
|
|
"Ubj pna lbh gryy na rkgebireg sebz na\nvagebireg ng AFN? In the elevators,\nthe extrovert looks at the OTHER guy's shoes."
|
|
|
|
} [
|
|
|
|
"How can you tell an extrovert from an\nintrovert at NSA? Va gur ryringbef,\ngur rkgebireg ybbxf ng gur BGURE thl'f fubrf."
|
|
|
|
rot13
|
|
|
|
] unit-test
|