Complex Numbers Index   <<   >>

 

   Tol←{⎕ct←⍵⍵ ⋄ ⍎(0=⎕nc '⍺')↓'⍺ ⍺⍺ ⍵'}

   (x⍳y) ≡ x {⍳⍨ ⍉cluster⍤1⍉ |⍵}Tol(2×⎕ct) HASH y
1

   (x⍳y) ≡ x {⍳⍨ ⍉cluster⍤1⍉ |⍵}Tol(1.005×⎕ct) HASH y
1
   (x⍳y) ≡ x {⍳⍨ ⍉cluster⍤1⍉ |⍵}Tol(1.004×⎕ct) HASH y
0