Changeset 98 in CGBLisp for trunk/src/modular.lisp
- Timestamp:
- Feb 2, 2009, 11:55:20 AM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/modular.lisp
r86 r98 1 1 ;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: Grobner; Base: 10 -*- 2 2 #| 3 $Id: modular.lisp,v 1.4 2009/01/22 04:03:50 marek Exp $4 3 *--------------------------------------------------------------------------* 5 4 | Copyright (C) 1994, Marek Rychlik (e-mail: rychlik@math.arizona.edu) | … … 17 16 (in-package "MODULAR") 18 17 19 (proclaim '(optimize (speed 3) (space 0) (safety 0) (debug 3)))18 (proclaim '(optimize (speed 0) (space 0) (safety 3) (debug 3))) 20 19 21 20 (defun modular-inverse (x p)
Note:
See TracChangeset
for help on using the changeset viewer.