----------------------------------------------------------------------

module TermExamples where

import TermPoly


-- delete this later
--type Coeff = Float
--type Expon = Int
--type Term  = (Coeff, Expon)
--type Poly  = [Term]


----------------------------------------------------------------------

-- COMP2600 -- Assignment 1, 2003

-- Here are some sample polynomials to get you started with testing
-- the list of terms representation polynomial package.

----------------------------------------------------------------------

poly1 = [(8.3,5),(2.4,3),(-3.7,1),(18.7,0)] :: Poly
poly2 = [(-8.3,5),(-2.4,3),(3.7,1),(-18.7,0)] :: Poly
poly3 = [(4.7,3),(-2.0,1)] :: Poly
poly4 = [(1.0,2)] :: Poly
poly5 = [(42.0,0)] :: Poly
poly0 = [] :: Poly

----------------------------------------------------------------------