- Timestamp:
- 2015-06-09T14:10:03-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/ring-and-order.lisp
r905 r907 29 29 30 30 (defstruct (ring-and-order 31 (:include ring) 32 ;;(:conc-name ro-) 33 ) 31 (:constructor make-ring-and-order (&key 32 (ring nil ring-supplied-p) 33 (order nil order-supplied-p) 34 (primary-elimination-order nil primary-elimination-order-supplied-p) 35 (secondary_elimination_order nil secondary_elimination_order-supplied-p) 36 (elimination-order nil elimination-order-supplied-p)))) 37 (ring *ring-of-integers* :type ring) 34 38 (order #'lex> :type function) 35 (primary-elimination-order #'lex> :type function)36 (secondary-elimination-order #'lex> :type function)37 39 (elimination-order #'lex> :type function)) 40 41
Note:
See TracChangeset
for help on using the changeset viewer.