dimension :: Polynomial -> Int
dimension (Polynomial p) = rows matrix where
    first = head p
    matrix = coeff first

-- | 'linear' @p@ takes a polynomial and returns 'False' if the degree of the polynomial is greater then 1. Otherwise it returns 'True'
dimension :: Polynomial -> Int
dimension (Polynomial p) = rows matrix where
    first = head p
    matrix = coeff first

-- | 'linear' @p@ takes a polynomial and returns 'False' if the degree of the polynomial is greater then 1. Otherwise it returns 'True'
dimension (Polynomial p) = rows matrix where
    first = head p
    matrix = coeff first

-- | 'linear' @p@ takes a polynomial and returns 'False' if the degree of the polynomial is greater then 1. Otherwise it returns 'True'