archive/doc/ltests.lisp

   1
   2
   3 (load (pathname "../src/nusum"))
   4 (load (pathname "../src/ode2"))
   5 (load (pathname "../src/elim"))
   6 (load (pathname "../src/trgsmp"))
   7 (setf (get 'maxima::%cosh 'maxima::translated) t);;so that kill won't remprop.
   8 (in-package 'maxima)
   9 (time
  10   (sloop for v in
  11          '("rtest1" "rtest1a" "rtest2" "rtest3" "rtest4" "rtest5"
  12            "rtest6" "rtest6a" "rtest6b" "rtest7" )
  13          do (test-batch (format nil "~a.mac" v))))
  14
  15
  16
  17
  18
  19
  20
  21
  22
  23
  24
  25
  26
  27
  28
  29
  30
  31
  32
  33
  34
  35
  36
  37
  38