RosettaCodeData/Task/ADFGVX-cipher/J/adfgvx-cipher-3.j

7 lines
157 B
Plaintext

spaces=: {{deb y#inv~,0,.(/:n){*|:_9]\>:i.#y=.y-.' '}}
echo S=: E-.' '
FFFFGFFFFGXDXDGFDGGXDXXXAGAD
P spaces W S
FFF FGF FFF GXD XDG FDGG XDX XXA GAD