8 lines
135 B
Text
8 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
|