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 614


Ignore:
Timestamp:
2015-06-07T00:03:38-07:00 (9 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/5am-tests.lisp

    r613 r614  
    127127      (priority-queue-remove q))))
    128128
     129#|
     130(test grobner
     131  "Grobner"
     132  (is (equal (grobner
     133|#
     134
     135(test parser
     136  "Parser"
     137  (let (($f '((MLIST SIMP) ((MPLUS SIMP) $X ((MTIMES SIMP) -1 $Y)) ((MPLUS SIMP) $X $Y)))
     138        ($v ((MLIST SIMP) $X $Y)))
     139    (parse-poly-list $f $v)))
     140
    129141
    130142(run! 'ngrobner-suite)
Note: See TracChangeset for help on using the changeset viewer.