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 2726


Ignore:
Timestamp:
2015-06-20T17:34:26-07:00 (9 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/polynomial.lisp

    r2716 r2726  
    153153     self))
    154154
    155 (def-additive-operation-method add-to
    156     "Adds to polynomial SELF another polynomial OTHER.
     155(eval-when (:compile-toplevel :load-toplevel :execute)
     156  (def-additive-operation-method add-to
     157      "Adds to polynomial SELF another polynomial OTHER.
    157158This operation destructively modifies both polynomials.
    158159The result is stored in SELF. This implementation does
    159160no consing, entirely reusing the sells of SELF and OTHER.")
    160161
    161 (def-additive-operation-method subtract-from
    162     "Subtracts from polynomial SELF another polynomial OTHER.
     162  (def-additive-operation-method subtract-from
     163      "Subtracts from polynomial SELF another polynomial OTHER.
    163164This operation destructively modifies both polynomials.
    164165The result is stored in SELF. This implementation does
    165166no consing, entirely reusing the sells of SELF and OTHER.")
     167  )
    166168
    167169(defmethod unary-minus ((self poly))
Note: See TracChangeset for help on using the changeset viewer.