Four sides of square: Difference between revisions

Content added Content deleted
m (J: more efficient)
m (more concise, faster)
Line 216: Line 216:


Implementation:
Implementation:
<lang J>fsos=: {{+./~(y{.1)+.1{.~-y}}</lang>
<lang J>fsos=: {{+./~(+.|.)y{.1}}</lang>


Some examples:
Some examples: