Changeset 383
- Timestamp:
- 2015-06-06T18:05:35-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/5am-tests.lisp
r382 r383 100 100 (t2 (ngrobner:make-term (ngrobner:make-monom 3 :initial-contents '(1 2 3)) 9)) 101 101 (t3 (ngrobner:make-term (ngrobner:make-monom 3 :initial-contents '(2 4 6)) (* 7 9)))) 102 (is (equal ( term-mult1 t2) t3))))102 (is (equal (ngrobner::term-mul *ring-of-integers* t1 t2) t3)))) 103 103 104 104 (test coerce-to-infix
Note:
See TracChangeset
for help on using the changeset viewer.