Changeset 425

Timestamp:

2015-06-06T19:37:12-07:00 (9 years ago)

Author:

Marek Rychlik

Message:

* empty log message *

File:

• branches/f4grobner/ring.lisp (modified) (3 diffs)

branches/f4grobner/ring.lisp

@@ -1 @@
-;;; -*-  Mode: Lisp; Package: Maxima; Syntax: Common-Lisp; Base: 10 -*- 
+;;; -*-  mode: lisp; package: maxima; syntax: common-lisp; base: 10 -*- 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;;                                                                              
-;;;  Copyright (C) 1999, 2002, 2009, 2015 Marek Rychlik <rychlik@u.arizona.edu>          
+;;;  copyright (c) 1999, 2002, 2009, 2015 marek rychlik <rychlik@u.arizona.edu>          
 ;;;                                                                              
-;;;  This program is free software; you can redistribute it and/or modify        
-;;;  it under the terms of the GNU General Public License as published by        
-;;;  the Free Software Foundation; either version 2 of the License, or           
+;;;  this program is free software; you can redistribute it and/or modify        
+;;;  it under the terms of the gnu general public license as published by        
+;;;  the free software foundation; either version 2 of the license, or           
 ;;;  (at your option) any later version.                                         
 ;;;                                                                              
-;;;  This program is distributed in the hope that it will be useful,             
-;;;  but WITHOUT ANY WARRANTY; without even the implied warranty of              
-;;;  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the               
-;;;  GNU General Public License for more details.                                
+;;;  this program is distributed in the hope that it will be useful,             
+;;;  but without any warranty; without even the implied warranty of              
+;;;  merchantability or fitness for a particular purpose.  see the               
+;;;  gnu general public license for more details.                                
 ;;;                                                                              
-;;;  You should have received a copy of the GNU General Public License           
-;;;  along with this program; if not, write to the Free Software                 
-;;;  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  
+;;;  you should have received a copy of the gnu general public license           
+;;;  along with this program; if not, write to the free software                 
+;;;  foundation, inc., 59 temple place - suite 330, boston, ma 02111-1307, usa.  
 ;;;                                                                              
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -22 +22 @@
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;
-;; Coefficient ring operations
+;; coefficient ring operations
 ;;
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;
-;; These are ALL operations that are performed on the coefficients by
+;; these are all operations that are performed on the coefficients by
 ;; the package, and thus the coefficient ring can be changed by merely
 ;; redefining these operations.
@@ -35 +35 @@
   (:use :cl)
   (:export "RING"
+           "RING-PARSE"
+           "RING-UNIT"
+           "RING-ZEROP"
+           "RING-ADD"
+           "RING-SUB"
+           "RING-UMINUS"
+           "RING-MUL"
+           "RING-DIV"
+           "RING-LCM"
+           "RING-EZGCD"
+           "RING-GCD"
            "MAKE-RING"
            "*RING-OF-INTEGERS*"