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 2547 for branches/f4grobner


Ignore:
Timestamp:
2015-06-19T15:47:27-07:00 (10 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/monom.lisp

    r2546 r2547  
    9292                              :element-type 'exponent)))))))))
    9393
     94(defgeneric monom= (object1 object2)
     95  (:method ((object1 monom) (object2 monom))
     96    (equal (r-exponents object1) (r-exponents object2))))
     97
    9498(defmethod r-coeff ((m monom))
    9599  "A MONOM can be treated as a special case of TERM,
Note: See TracChangeset for help on using the changeset viewer.