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


Ignore:
Timestamp:
2015-06-15T13:07:43-07:00 (10 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/mx-grobner.lisp

    r1816 r1817  
    400400  "Adds two polynomials P and Q")
    401401
    402 #|
    403 (define-op ($poly_subtract poly-sub (p q))
     402(define-op $poly_subtract (poly-sub :ring-and-order p q))
    404403  "Subtracts a polynomial Q from P.")
    405404
    406 (define-op ($poly_multiply poly-mul (p q))
     405(define-op $poly_multiply (poly-mul :ring-and-order p q)
    407406  "Returns the product of polynomials P and Q.")
    408407
Note: See TracChangeset for help on using the changeset viewer.