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


Ignore:
Timestamp:
2015-06-15T07:57:36-07:00 (9 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/f4grobner/mx-grobner.lisp

    r1722 r1723  
    269269
    270270
    271 #|
    272 
    273 
    274271;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    275272;;
     
    300297
    301298
     299(defvar *ring-and-order* nil)
     300
    302301;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    303302;;
     
    307306;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    308307
     308#|
    309309(defmacro with-monomial-order ((order) &body body)
    310310  "Evaluate BODY with monomial order set to ORDER."
     
    330330         (*elimination-order* (or (find-order ,elimination-order) *elimination-order*)))
    331331     . ,body))
     332
     333|#
    332334
    333335
Note: See TracChangeset for help on using the changeset viewer.