- Timestamp:
- 2015-06-18T19:34:56-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/5am-monom.lisp
r2311 r2312 73 73 (is (r-equalp (r* m n) m*n)) 74 74 (is (r-equalp (r/ n m) n/m)) 75 (is (r-equalp (r-tensor-product m n) m-tensor-n))))76 75 77 76 (test monom-advanced 78 77 "Monom advanced" 79 78 (with-fixture monom-context () 79 (is (r-equalp (r-tensor-product m n) m-tensor-n)))) 80 80 (signals 81 81 (error "INITIAL-EXPONENTS must have length DIMENSION")
Note:
See TracChangeset
for help on using the changeset viewer.