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 3552


Ignore:
Timestamp:
2015-09-05T16:35:34-07:00 (10 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/monom.lisp

    r3551 r3552  
    167167      (reduce #'+ exponents :start start :end end))))
    168168
    169 (defgeneric universal-sugar (m &optional start end)
     169(defgeneric sugar (m &optional start end)
    170170  (:documentation "Return the sugar of a monomial M. Optinally, a range
    171171of variables may be specified with arguments START and END.")
    172172  (:method ((m monom)  &optional (start 0) (end (monom-dimension m)))
    173173    (declare (type fixnum start end))
    174     (universal-total-degree m start end)))
     174    (total-degree m start end)))
    175175
    176176(defgeneric universal-multiply-by (self other)
Note: See TracChangeset for help on using the changeset viewer.