Box the compass: Difference between revisions
Content added Content deleted
m (→{{header|J}}) |
mNo edit summary |
||
Line 29: | Line 29: | ||
hy=:'-'tween&>/@(/: #@>)@; |
hy=:'-'tween&>/@(/: #@>)@; |
||
fixup=: (rplc ''|.@;{.@;:@tolower) ^:(' '&e.)L:0 |
fixup=: (rplc ''|.@;{.@;:@tolower) ^:(' '&e.)L:0 |
||
points=: |
points=: , fixup 2 ([;by;hy;by~)&>/\ cardinal |
||
indice=: 32 | 0.5 <.@+ %&11.25 |
indice=: 32 | 0.5 <.@+ %&11.25 |
||
deg2pnt=: points {~ indice</lang> |
deg2pnt=: points {~ indice</lang> |