2 A [Maxima](http://maxima.sf.net/) package for the PSLQ algorithm.
4 Forked from: https://github.com/andrejv/identify
5 Author: Andrej Vodopivec.
7 (%i1) load("pslq.mac")$
8 (%i2) root: float(sin(%pi/12))$
9 (%i3) guess_exact_value(root);
10 (%o3) sqrt(2-sqrt(3))/2
11 (%i4) makelist(root^i, i, 0, 4)$
12 (%i5) pslq_integer_relation(%);
14 (%i6) makelist(x^i, i, 0, 4).%;
15 (%o6) -16*x^4+16*x^2-1
17 (%o7) [x=-sqrt(sqrt(3)+2)/2,x=sqrt(sqrt(3)+2)/2,x=-sqrt(2-sqrt(3))/2,x=sqrt(2-sqrt(3))/2]