dmodapp.lib
bFactor
LIB "dmodapp.lib"; ring r = 0,x,dp; list L = bFactor((x-4/3)*(x+3)^2*(x-5)^4); L; ==> [1]: ==> _[1]=5 ==> _[2]=4/3 ==> _[3]=-3 ==> [2]: ==> 4,1,2 intRoots(L); ==> [1]: ==> _[1]=5 ==> _[2]=-3 ==> [2]: ==> 4,2