RosettaCodeData/Task/Caesar-cipher/J/caesar-cipher-1.j
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

2 lines
76 B
Text

cndx=: [: , 65 97 +/ 26 | (i.26)&+
caesar=: (cndx 0)}&a.@u:@cndx@[ {~ a.i.]