- Timestamp:
- 2015-06-18T10:34:52-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/monom.lisp
r2213 r2214 74 74 to 0. Alternatively, all elements may be specified as a list 75 75 EXPONENTS." 76 (format t "INITIALIZE-INSTANCE called with SELF ~A, DIMENSION ~A, EXPONENTS ~A, EXPONENT ~A.~%" 77 self dimension exponents exponent) 76 (format t "INITIALIZE-INSTANCE called with SELF ~A, DIMENSION ~A(~A), EXPONENTS ~A(~A), EXPONENT ~A(~A).~%" 77 self dimension dimension-suppied-p 78 exponents exponents-supplied-p 79 exponent exponent-supplied-p) 78 80 (let ((new-dimension (cond (dimension-suppied-p dimension) 79 81 (exponents-supplied-p
Note:
See TracChangeset
for help on using the changeset viewer.