close Warning: Can't synchronize with repository "(default)" (The repository directory has changed, you should resynchronize the repository with: trac-admin $ENV repository resync '(default)'). Look in the Trac log for more information.

Changeset 1987 for branches


Ignore:
Timestamp:
2015-06-16T00:21:01-07:00 (10 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/pol.lisp

    r1986 r1987  
    112112(defmethod print-object ((poly poly) stream)
    113113  (princ (slot-value poly 'termlist)))
     114
     115(defmethod poly-termlist ((poly poly))
     116  (slot-value poly 'termlist))
     117
     118(defmethod (setf poly-termlist) ((poly poly) value)
     119  (setf (slot-value poly 'termlist) value))
    114120
    115121;; Leading term
Note: See TracChangeset for help on using the changeset viewer.