Hello!
Does anyone know why this code generates an error?
```
USE: infix
! Solve a quadratic equation in Zp by enumeration.
:: solve-Zp* ( a b c p -- roots )
p iota [ :> x [infix (a*x*x + b*x + c) % p infix] 0 = ] filter ;
```
The error points to `infix]` with the message
```
local is not defined
name "a"
```
---=====---
Александр
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
Factor-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/factor-talk
