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 2050 for branches/f4grobner


Ignore:
Timestamp:
2015-06-17T18:44:11-07:00 (10 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/ring.lisp

    r2048 r2050  
    124124    (error "Integer is atomic, so it cannot be subscripted")))
    125125
    126 (defgeneric (setf ring-elt) (new-value object index)
    127   (:method (new-value (object integer) index)
    128     (error "Integer is atomic, so it cannot be subscripted")))
     126(defgeneric (setf ring-elt) (new-value object index))
    129127
    130 (defgeneric total-degree (object)
    131   (:method ((object integer))
    132     (error "Integer has no degree")))
     128(defgeneric total-degree (object))
    133129
    134130(defgeneric ring-divides-p (object1 object2)
Note: See TracChangeset for help on using the changeset viewer.