classify.lib
LIB "classify.lib"; ring r=0,(x,y,z),ds; export r; ==> // ** `r` is already global init_debug(1); ==> Debugging level is set to 1 poly f=(x2+3y-2z)^2+xyz-(x-y3+x2*z3)^3; poly g=morsesplit(f); ==> Residual singularity f= -x3+3/2xy2+1/2x3y-1/16x2y2+3x2y3 g; ==> -x3+3/2xy2+1/2x3y-1/16x2y2+3x2y3