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.

Ignore:
Timestamp:
2016-06-05T13:06:41-07:00 (8 years ago)
Author:
Marek Rychlik
Message:

Now classes INTEGER-RING and RATIONAL-FIELD are a part of the RING package

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/rational-field.lisp

    r4321 r4325  
    2020;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    2121
    22 (defpackage "RATIONAL-FIELD"
    23   (:use :cl :copy :ring)
    24   (:export "RATIONAL-FIELD"
    25            "RATIONAL-FIELD-VALUE"
    26            "ADD-TO"
    27            "SUBTRACT-FROM"
    28            "MULTIPLY-BY"
    29            "DIVIDE-BY"
    30            "UNARY-MINUS"
    31            "UNARY-INVERSE"
    32            "UNIVERSAL-EQUALP"
    33            "UNIVERSAL-ZEROP"
    34            "->SEXP"
    35            "MAKE-ZERO-FOR"
    36            "MAKE-UNIT-FOR")
    37   (:documentation "Wraps rationals into an object."))
    38 
    39 (in-package "RATIONAL-FIELD")
     22(in-package "RING")
    4023
    4124(defclass rational-field (ring)
Note: See TracChangeset for help on using the changeset viewer.