- Timestamp:
- 2015-06-06T23:33:30-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/5am-tests.lisp
r596 r597 42 42 43 43 (defpackage #:ngrobner-tests 44 (:use :cl :it.bese.fiveam :ngrobner :priority-queue :monomial ))44 (:use :cl :it.bese.fiveam :ngrobner :priority-queue :monomial :utils)) 45 45 46 46 (in-package #:ngrobner-tests) … … 63 63 (test makelist-1 64 64 "makelist-1 test" 65 (is (equal ( ngrobner:makelist-1 (* 2 i) i 0 10) '(0 2 4 6 8 10 12 14 16 18 20)))66 (is (equal ( ngrobner:makelist-1 (* 2 i) i 0 10 3) '(0 6 12 18))))65 (is (equal (makelist-1 (* 2 i) i 0 10) '(0 2 4 6 8 10 12 14 16 18 20))) 66 (is (equal (makelist-1 (* 2 i) i 0 10 3) '(0 6 12 18)))) 67 67 68 68 (test makelist
Note:
See TracChangeset
for help on using the changeset viewer.