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.

Ignore:
Timestamp:
2015-09-05T16:17:09-07:00 (9 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/monom.lisp

    r3540 r3541  
    137137    (length (monom-exponents m))))
    138138
    139 (defgeneric monom-equalp (m1 m2)
    140   (:documentation "Returns T iff monomials M1 and M2 have identical EXPONENTS.")
     139(defgeneric universal-equalp (object1 object2)
     140  (:documentation "Returns T iff OBJECT1 and OBJECT2 are equal.")
    141141  (:method ((m1 monom) (m2 monom))
     142    "Returns T iff monomials M1 and M2 have identical EXPONENTS."
    142143    (equalp (monom-exponents m1) (monom-exponents m2))))
    143144
Note: See TracChangeset for help on using the changeset viewer.