- Timestamp:
- 2015-06-18T20:31:31-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/monom.lisp
r2349 r2350 78 78 79 79 (defmethod shared-initialize :after ((self monom) slot-names 80 81 82 dimension83 exponents84 exponent85 86 )80 ;;&rest initargs 81 &key 82 dimension 83 exponents 84 exponent 85 &allow-other-keys 86 ) 87 87 ;;(format t "MONOM::SHARED-INITIALIZE called with:~&SLOT-NAMES: ~W~&INITARGS: ~W.~%" slot-names initargs) 88 88 (let* ((new-dimension (cond (dimension dimension)
Note:
See TracChangeset
for help on using the changeset viewer.