| > | restart; |
| > | read("/Volumes/NATHAN USB/Math/Maple/Tropical/tropical.txt"); |
| > | with(Tropical); |
Warning, the protected names add and resultant have been redefined and unprotected
| > | f:=x^2+x*y-y^2+y*z+5*z^2; |
![(Typesetting:-mprintslash)([f := x^2+x*y-y^2+y*z+5*z^2], [x^2+x*y-y^2+y*z+5*z^2])](images/resultant_5.gif){kind=small}
| > | plotgraph(f); |
| > | dualgraph(f); |
| > | g:=x^3+x*y*z-y^3+2*y^2*z+4*z^3; |
![(Typesetting:-mprintslash)([g := x^3+x*y*z-y^3+2*y^2*z+4*z^3], [x^3+x*y*z-y^3+2*y^2*z+4*z^3])](images/resultant_8.gif){kind=small}
| > | plotgraph(g); |
| > | dualgraph(g); |
| > | SylvesterMatrix(f,g,x); |
![(Typesetting:-mprintslash)([Matrix([[0, y, 5*z^2-y^2+y*z, infinity, infinity], [infinity, 0, y, 5*z^2-y^2+y*z, infinity], [infinity, infinity, 0, y, 5*z^2-y^2+y*z], [0, infinity, y*z, 4*z^3-y^3+2*y^2*...](images/resultant_11.gif)
| > | resultant(f,g,x); |
| > | SylvesterMatrix(f,g,y); |
![(Typesetting:-mprintslash)([Matrix([[-1, x+z, x^2+5*z^2, infinity, infinity], [infinity, -1, x+z, x^2+5*z^2, infinity], [infinity, infinity, -1, x+z, x^2+5*z^2], [-1, 2*z, x*z, x^3+4*z^3, infinity], [...](images/resultant_13.gif)
| > | resultant(f,g,y); |
