*0j1×⍵   (!⍳∞) ÷⍨ e ← ∞ ⍴ 1 0j1 ¯1  0j¯1
cos ⍵    (!⍳∞) ÷⍨ c ← ∞ ⍴ 1 0   ¯1  0
sin ⍵    (!⍳∞) ÷⍨ s ← ∞ ⍴ 0 1    0 ¯1

e        1  0j1  ¯1  0j¯1  1  0j1  ¯1  0j¯1  1  0j1
c        1  0    ¯1  0     1  0    ¯1  0     1  0   …
0j1×s    0  0j1   0  0j¯1  0  0j1   0  0j¯1  0  0j1

e        1  0j1  ¯1  0j¯1  1  0j1  ¯1  0j¯1  1  0j1 …
c+0j1×s  1  0j1  ¯1  0j¯1  1  0j1  ¯1  0j¯1  1  0j1

   e = c + 0j1×s
1 1 1 1 1 1 1 1 1 1 …

   (*0j1×⍵) = (cos ⍵) + 0j1 × (sin ⍵)