Updated the multiplicative portion of getting powers of a polynomial term

larcs.org

@@ -839,10 +839,7 @@ The ability to retrieve tha variable in a polynomial term is important.  This is
                          (numeric 0)
                          (variable 1)
                          (power (third term))
-                         (multiplicative
-                          (if (listp (third term))
-                              (third (third term))
-                              1))
+                         (multiplicative (get-power (third term)))
                          (* 0)))
 #+END_SRC