close Warning: Can't synchronize with repository "(default)" (The repository directory has changed, you should resynchronize the repository with: trac-admin $ENV repository resync '(default)'). Look in the Trac log for more information.

Changeset 4068


Ignore:
Timestamp:
2016-05-31T19:02:51-07:00 (9 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/polynomial.lisp

    r4062 r4068  
    570570  (scalar-multiply-by (copy-instance object2) object1))
    571571
     572(defmethod multiply-by ((object1 poly) (object2 number))
     573  (scalar-multiply-by (copy-instance object1) object2))
     574
    572575(defun make-poly-variable (nvars pos &optional (power 1))
    573576  (change-class (make-monom-variable nvars pos power) 'poly))
    … …  
    682685    (make-poly-constant (poly-dimension self) 1)))
    683686
    684 (defgeneric poly-nreverse (self)
     687(defgeneric poly-reverse (self)
    685688  (:documentation "Reverse the order of terms in a polynomial SELF.")
    686689  (:method ((self poly))
Note: See TracChangeset for help on using the changeset viewer.