Advertisement
Guest User

Untitled

a guest
Apr 19th, 2015
198
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.12 KB | None | 0 0
  1. f1[x] = x^5 - 3 x - 1
  2. f2[x] = D[f1[x], x]
  3.  
  4. f3[x] = PolynomialRemainder[f1[x], f2[x] , x]
  5. f1[x] = f2[x]
  6. f2[x] = -f3[x]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement