- Timestamp:
- 2015-06-18T08:02:41-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/5am-monom.lisp
r2181 r2183 61 61 (is (equalp (r->list z) '(0 0 0)) "Trivial monomial is a vector of 0's") 62 62 (is (r-equalp (r* m n) m*n)) 63 (is (r-equalp (r-tensor-product m n) m-tensor-n)))) 63 (is (r-equalp (r-tensor-product m n) m-tensor-n)) 64 (signals 65 (error "INITIAL-EXPONENTS must have length DIMENSION") 66 (make-monom :dimension 3 :initial-exponents '(1 2 3 4 5 6))))) 64 67 65 68
Note:
See TracChangeset
for help on using the changeset viewer.