- Timestamp:
- 2015-06-18T22:23:55-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/5am-monom.lisp
r2400 r2401 101 101 (is (= (r-total-degree m) 6)) 102 102 (is (= (r-sugar m) 6)) 103 (is (equalp (r->list z) '(0 0 0)) "Trivial monomialis a vector of 0's")103 (is (equalp (r->list z) '(0 0 0)) "Trivial term is a vector of 0's") 104 104 (is (r-equalp (r* m n) m*n)) 105 105 (is (r-equalp (r/ n m) n/m))
Note:
See TracChangeset
for help on using the changeset viewer.