[Bug-apl] Circle

[Mike Duvos]

       )CLEAR
CLEAR WS
      ⎕IO←0
      X←1D1*360
      +/(¯1+X×X)*0.5
5.393937829E¯8J¯5.393937829E¯8

[IBM APL2]

      +/¯4○X
5.393937829E¯8J¯5.393937829E¯8

[GNU APL]

      +/¯4○X
122.0040743J2.828427087

I think this is wrong.