-
Notifications
You must be signed in to change notification settings - Fork 1
/
package.lisp
58 lines (57 loc) · 1.69 KB
/
package.lisp
1
2
3
4
5
6
7
8
9
10
11
12
13
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
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
;;;; package.lisp
(defpackage #:cl-dynamics-engine
(:use #:cl #:sb-cga #:alexandria)
(:shadowing-import-from :sb-cga :rotate)
(:import-from #:%ode
#:+contact-mu2+
#:+contact-axis-dep+
#:+contact-f-dir1+
#:+contact-bounce+
#:+contact-soft-erp+
#:+contact-soft-cfm+
#:+contact-motion1+
#:+contact-motion2+
#:+contact-motion-n+
#:+contact-slip1+
#:+contact-slip2+
#:+contact-rolling+
#:+contact-approx0+
#:+contact-approx1-1+
#:+contact-approx1-2+
#:+contact-approx1-N+
#:+contact-approx1+)
(:export #:with-ode
#:with-world
#:with-hash-space
#:id
#:make-sphere-body-of-mass
#:make-box-body-of-mass
#:colliding-world-step
#:collide-world-step
#:body-position
#:quaternion
#:add-sphere-geometry
#:add-box-geometry
#:+contact-bounce+
#:+contact-soft-cfm+
#:joint-create-contact
#:joint-attach
#:contact
#:surface-parameters
#:mu
#:bounce
#:bounce-vel
#:soft-cfm
#:surface
#:mode
#:dimensions
#:make-contact-joint
#:make-hash-space
#:make-simple-space
#:add-force
#:make-ball-joint
#:make-hinge-joint
#:anchor-point
#:make-angular-motor
#:make-linear-motor))
(in-package #:cl-dynamics-engine)