Boustrophedon transform: Difference between revisions

m
→‎{{header|J}}: make M local in alternate approach
(→‎{{header|J}}: Alternate approach)
m (→‎{{header|J}}: make M local in alternate approach)
Line 79:
 
<syntaxhighlight lang=J>B=: {{
M=:. |:y#,:u i.y
for_i.(#~>:/"1)1+(,#:i.@*)~y-1 do.
M=:. M (<i)}~(M{~<i-0 1)+M{~<(-/\i)-1 0
end.
M|:~<1 0
6,962

edits