> From: Brian Schott
> Yes, and I made a couple of small changes to the dyadic gerund form.
>
> ccog (1&{"1...@],.(({:"1...@])`([: <"1 i...@#@] ,. {."1...@])`(_ $~ $...@]))
> }) R
Two points:
* The left argument is not used at all here so could just be 0 or empty.
* The following expression: (_ $~ $...@]) R
works by coincidence for this case with three cogs on the crank, but will
break for situations where that is not the case.
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm