Right, this is essentially the “ridiculous” last answer (I should have written 
the “ridiculously simple” answer) mentioned in the spoiler:
 
   r=. ?
   (r -: r f.)0
0
 
Other verbs mentioned in the spoiler solutions are interesting in the sense 
that, unlike r above, they return the same result when they are called 
repeatedly with the same argument (although the results might be different if 
you invoke them from an ijs window via crtl-e versus a direct invocation from 
the ijx window), for example,

   (w -: w f.)119
0
   w 119
1
   w 119
1
   w f. 119
0
   w f. 119
0

 
 
----- Original Message ----
From: Raul Miller <[EMAIL PROTECTED]>

  F=: ? bind 0
  (F -: F f.) 0
0

  F_x_=: 1:
  do_x_ 'G=: F'
  G=: F
  (G_x_ -: G_x_ f.) 0
0

-- 
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to