archive/doc/ltest2.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          '(
  12
  13            "rtest9"
  14            "rtest9a" "rtest10" "rtest11" "rtest12" "rtest13" "rtest13s")
  15          do (test-batch (format nil "~a.mac" v))))
  16
  17
  18
  19
  20
  21
  22
  23
  24
  25
  26
  27
  28
  29
  30
  31
  32
  33
  34
  35
  36
  37
  38
  39
  40