source: project/ode/trunk/extensions/stalin-dispatch.scm @ 8365

Last change on this file since 8365 was 8365, checked in by Ivan Raikov, 13 years ago

Added stalin-related extension.

File size: 1.1 KB
Line 
1(define (ode-runtime selector)
2  (case selector
3  ((order)               order)
4  ((svec-value-idx)     svec-value-idx)
5  ((svec-abserr-idx)    svec-abserr-idx)
6  ((svec-relerr-idx)    svec-relerr-idx)
7  ((svec-deriv-idx)     svec-deriv-idx)
8  ((is-state?)          is-state?)
9  ((is-asgn?)           is-asgn?)
10  ((eval-poset-foreach) eval-poset-foreach)
11  ((eval-poset-fold)    eval-poset-fold)
12  ((eval-env-ref)       eval-env-ref)
13  ((eval-env-set!)      eval-env-set!)
14  ((solve-env-ref)      solve-env-ref)
15  ((solve-env-set!)     solve-env-set!)
16  ((solve-env-state-fold)     solve-env-state-fold)
17  ((solve-env-state-foreach)  solve-env-state-foreach)
18  ((solve-env-asgn-fold)      solve-env-asgn-fold)
19  ((eval-rhs)       eval-rhs)
20  ((eval-guard)     eval-guard)
21  ((hmax-factor)    hmax-factor)
22  ((hmin-factor)    hmin-factor)
23  ((hscale-factor)  hscale-factor)
24  ((relmax)         relmax)
25  ((relmin)         relmin)
26  ((absmax)         absmax)
27  ((absmin)         absmin)
28  ((maxerror)       maxerror)
29  ((hierror?)       (hierror? relmax absmax hmin))
30  ((lowerror?)      (lowerror? relmin absmin hmax))
31  ((print)          qprint)
32  ))
33
Note: See TracBrowser for help on using the repository browser.