Oops, trying this out, I messed up in a couple ways with my
implementation of genExample. I should have tested it.

Here's what I had intended to write:

genExample=:{{
  r=.i.0
  for_j.,y do.
     if. (*j)*(j=<.j)*(j>:_12)*j<:12 do.
      r=. r,j&o. BV
    else.
      r=. r,<j
    end.
  end.
  ($y)$r
}}

That said, if that's still not clear, and if I represent verbs using
9!:3]5, here's what A, B, C and D would look like:


   A
+----+----+----+
|1&o.|0   |0   |
+----+----+----+
|0   |1&o.|0   |
+----+----+----+
|0   |0   |1&o.|
+----+----+----+
   B
+----+-----+----+
|0   |01&o.|2&o.|
+----+-----+----+
|3&o.|4&o. |5&o.|
+----+-----+----+
|6&o.|7&o. |8&o.|
+----+-----+----+
   C
+----+----+----+
|0   |0   |1&o.|
+----+----+----+
|1&o.|0   |1&o.|
+----+----+----+
|0   |1&o.|0   |
+----+----+----+
   D
+-----+-----+-----+
|0    |01&o.|2&o. |
+-----+-----+-----+
|3&o. |4&o. |5&o. |
+-----+-----+-----+
|6&o. |7&o. |8&o. |
+-----+-----+-----+

+-----+-----+-----+
|9&o. |10&o.|11&o.|
+-----+-----+-----+
|12&o.|13   |14   |
+-----+-----+-----+
|15   |16   |17   |
+-----+-----+-----+

+-----+-----+-----+
|18   |19   |20   |
+-----+-----+-----+
|21   |22   |23   |
+-----+-----+-----+
|24   |25   |26   |
+-----+-----+-----+

Thanks,

-- 
Raul

On Thu, Dec 30, 2021 at 2:11 PM Jose Mario Quintana
<[email protected]> wrote:
>
> You will have to forgive me; I cannot parse and execute explicit code to
> that degree in my mind and I do not know what you mean.  However, I will
> make a few comments regarding your following post.

See: http://jsoftware.com/pipermail/chat/2021-December/009026.html
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to