Four sides of square: Difference between revisions

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


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


Some examples:
Some examples:
Retrieved from "https://rosettacode.org/wiki/Four_sides_of_square"