chern.lib
LIB "chern.lib"; ring r = 0, (x, y), dp; // compute the Euler characteristic of the affine ellipric curve y^2=x^3+x+1; ideal I=y2-x3-x-1; EulerAff(I); ==> 3