On Tue, Mar 8, 2022 at 5:42 AM Elijah Stone <elro...@elronnd.net> wrote:
>
> f=. {&1 0 : [:
> g=. -. : [:
>
> Distinguish f and g, without the use of explicit control structures, ::,
> AR introspection, or other forms of cheating.
I dislike when "cheating" is used to mean "anything other than the
idea I am thinking of".
With that in mind:
weigh=: {{1e5 timex 'u ',":u 1}}
compare=: {{ u weigh < v weigh [ u weigh }}
f compare g
0
g compare f
1
f compare g
0
g compare f
1
Conclusion: f is heavier than g.
--
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
