Zig-zag matrix: Difference between revisions
→{{header|Klingphix}}
(→{{header|Haskell}}: Pruned a (now) redundant import, added signatures, tweaked name to avoid wiki glitch, preferred guards to if then.) |
|||
Line 2,969:
=={{header|Klingphix}}==
<lang Klingphix>include ..\Utilitys.tlhy
Line 2,982 ⟶ 2,977:
<Size 2 power
1 sub
<i <j add 1 band 0 equal
[<j <Size less
<i 1 great
[<i <Size less
<j 1 great
)
]
<Size
%row >row
<Size
%col >col
( <row
]
nl
]
nl "End " input</lang>
| |||