[Bug-apl] Operator Idiosyncrasies

[Mike Duvos]

[IBM APL2]

     DISPLAY ((+/).×) / A A←3 3⍴4↑1
┌─────────────────────────────────────────┐
│ ┌→────────────────────────────────────┐ │
│ ↓ ┌───────┐   ┌─────────┐ ┌─────────┐ │ │
│ │ │ ┌→──┐ │   │ ┌→────┐ │ │ ┌→────┐ │ │ │
│ │ │ │0 0│ │   │ │0 0 0│ │ │ │0 0 0│ │ │ │
│ │ │ └~──┘ │   │ └~────┘ │ │ └~────┘ │ │ │
│ │ └∊──────┘   └∊────────┘ └∊────────┘ │ │
│ │ ┌─────────┐ ┌───────┐   ┌─────────┐ │ │
│ │ │ ┌→────┐ │ │ ┌→──┐ │   │ ┌→────┐ │ │ │
│ │ │ │0 0 0│ │ │ │0 0│ │   │ │0 0 0│ │ │ │
│ │ │ └~────┘ │ │ └~──┘ │   │ └~────┘ │ │ │
│ │ └∊────────┘ └∊──────┘   └∊────────┘ │ │
│ │ ┌─────────┐ ┌─────────┐ ┌─────────┐ │ │
│ │ │ ┌→────┐ │ │ ┌→────┐ │ │ ┌→────┐ │ │ │
│ │ │ │0 0 0│ │ │ │0 0 0│ │ │ │0 0 0│ │ │ │
│ │ │ └~────┘ │ │ └~────┘ │ │ └~────┘ │ │ │
│ │ └∊────────┘ └∊────────┘ └∊────────┘ │ │
│ └∊────────────────────────────────────┘ │
└∊────────────────────────────────────────┘


[GNU APL]

      DISPLAY ((+/).×) / A A←3 3⍴4↑1

┌─────────┐
│ ┌→────┐ │
│ ↓0 0 0│ │
│ │0 0 0│ │
│ │0 0 1│ │
│ └~────┘ │
└∊────────┘