apl>" <-APL2-------------------- sam236.txt ---------------------------->


apl>" <- conjugate (+) ------------------------------------------------->


apl>+-4

-4

apl>+4 2.3 -3 -.7

4 2.3 -3 -0.7

apl>+1j2

1j-2

apl>1j2X+1j2

5  

apl>" <- decode (B) (polynomial evaluation) ---------------------------->


apl>3 B 1 2 1

16

apl>1j1 B 1 2 3 4

5j9

apl>2 B 1 1 1 1

15

apl>(L#l,l,l # 2 1R2 10) B L # r # 3 2R1 4 0 3 1 2

1 4
0 3
1 2

 2  2  2
10 10 10

  5  24
101 432

apl>(L#    l # 2 1R2 10) B L # r # 3 2R1 4 0 3 1 2

1 4
0 3
1 2

 2
10

  5  24
101 432

apl>)off