RosettaCodeData/Task/Caesar-cipher/Uiua/caesar-cipher.uiua
2026-04-30 12:34:36 -04:00

7 lines
135 B
Text

k ← 3
m ← -:26 k
Rot ← +@A◿26+k-@A
Rrot ← +@A◿26+m-@A
&sc
&p. ⍥(¯≡(⍥Rot=1±.))2
&p ⍥(¯≡(⍥Rrot=1±.))2