package.lisp @ e05ab7ec7e6c default tip
Remove some of the bitrot. It still doesn't really work.
| author | Steve Losh <steve@stevelosh.com> |
|---|---|
| date | Mon, 07 Jan 2019 18:25:15 -0500 |
| parents | ae02fff6fa65 |
| children | (none) |
;;;; Generic stuff (defpackage #:coding-math.utils (:use #:cl #:sketch #:iterate #:coding-math.quickutils) (:shadowing-import-from #:iterate #:in) (:export #:in-context #:scancode-case #:with-vals #:setf-slots #:symbolicate #:ensure-car #:ensure-cadr #:with-place #:draw-axes #:graph-function)) (defpackage #:coding-math.math (:use #:cl #:coding-math.quickutils #:coding-math.utils) (:export #:distance #:random-range #:random-around #:random-dist #:wrap-zero #:wrap-range #:wrapf #:outsidep #:insidep #:round-to-places #:round-to-nearest #:ranges-overlap-p )) (defpackage #:coding-math.fps (:use #:cl #:sketch #:coding-math.quickutils #:coding-math.math #:coding-math.utils) (:export #:with-fps #:draw-fps)) (defpackage #:coding-math.tween (:use #:cl #:coding-math.quickutils #:coding-math.math #:coding-math.utils) (:export #:tween-linear #:tween-quadratic-in #:tween-quadratic-out #:tween-quadratic-inout #:tween-cubic-in #:tween-cubic-out #:tween-cubic-inout #:tween-quartic-in #:tween-quartic-out #:tween-quartic-inout #:tween-quintic-in #:tween-quintic-out #:tween-quintic-inout #:tween-place! #:tween-places! #:update-tweens! )) (defpackage #:coding-math.vectors (:use #:cl) (:export #:vec2 #:vec2f #:vec2d #:vec2i #:vec2-add #:vec2f-add #:vec2d-add #:vec2i-add #:vec2-sub #:vec2f-sub #:vec2d-sub #:vec2i-sub #:vec2-mul #:vec2f-mul #:vec2d-mul #:vec2i-mul #:vec2-div #:vec2f-div #:vec2d-div #:vec2i-div #:vec2-add! #:vec2f-add! #:vec2d-add! #:vec2i-add! #:vec2-sub! #:vec2f-sub! #:vec2d-sub! #:vec2i-sub! #:vec2-mul! #:vec2f-mul! #:vec2d-mul! #:vec2i-mul! #:vec2-div! #:vec2f-div! #:vec2d-div! #:vec2i-div! #:vec2-magdir #:vec2f-magdir #:vec2d-magdir #:vec2i-magdir #:vec2-eql #:vec2f-eql #:vec2d-eql #:vec2i-eql #:vec2-magnitude #:vec2f-magnitude #:vec2d-magnitude #:vec2i-magnitude #:vec2-length #:vec2f-length #:vec2d-length #:vec2i-length #:vec2-angle #:vec2f-angle #:vec2d-angle #:vec2i-angle #:vec2-direction #:vec2f-direction #:vec2d-direction #:vec2i-direction #:vec2-x #:vec2f-x #:vec2d-x #:vec2i-x #:vec2-y #:vec2f-y #:vec2d-y #:vec2i-y ) ) ;;;; 2D stuff (defpackage #:coding-math.2d.vectors (:use #:cl #:coding-math.math #:coding-math.quickutils #:coding-math.utils) (:export #:vec #:vec-x #:vec-y #:make-vec #:make-vec-md #:make-vec-ma #:make-random-vec #:vec-magnitude #:vec-direction #:vec-angle #:vec-add #:vec-sub #:vec-mul #:vec-div #:vec-rotate #:vec-lerp #:vec-add! #:vec-sub! #:vec-mul! #:vec-div! #:vec-rotate! #:vec-to-string #:with-vec #:with-vecs #:vec-to-list #:vec-set-angle #:vec-set-direction #:vec-set-magnitude )) (defpackage #:coding-math.2d.hitboxes (:use #:cl #:sketch #:coding-math.2d.vectors #:coding-math.math #:coding-math.quickutils #:coding-math.utils) (:export #:hitbox-x #:hitbox-y #:hitbox-radius #:hitbox-width #:hitbox-height #:drag-requested-p #:drag-location-vec #:circles-collide-p #:circle-point-collide-p #:rect-point-collide-p #:rects-collide-p)) (defpackage #:coding-math.2d.particles (:use #:cl #:coding-math.math #:coding-math.2d.vectors #:coding-math.2d.hitboxes #:coding-math.quickutils #:coding-math.utils) (:export #:particle #:particle-vel #:particle-pos #:particle-grv #:particle-radius #:particle-mass #:particle-friction #:particle-speed #:particle-direction #:make-particle #:particle-x #:particle-y #:particle-wrap! #:particle-update! #:particle-accelerate! #:particle-angle-to #:particle-distance-to #:particle-gravitate-to! #:particle-gravitate-add! #:particle-gravitate-remove! #:particle-ease-to! #:particle-spring-to! #:particle-spring-add! #:particle-spring-remove!)) (defpackage #:coding-math.2d.points (:use #:cl #:sketch #:coding-math.math #:coding-math.2d.vectors #:coding-math.quickutils #:coding-math.utils) (:export #:quadratic-bezier #:fast-quadratic-bezier #:cubic-bezier #:quadratic-bezier-curve #:draw-function #:multicurve )) (defpackage #:coding-math.2d.lines (:use #:cl #:sketch #:coding-math.math #:coding-math.2d.vectors #:coding-math.quickutils #:coding-math.utils) (:export #:std-intersection-point #:mxb-intersection-point #:xys-intersection-point #:xys-segments-intersection-point #:xys-to-mxb #:xys-to-std #:std-to-xys #:std-to-mxb #:mxb-to-xys #:mxb-to-std )) (defpackage #:coding-math.2d.demo (:use #:cl #:cl-arrows #:sketch #:iterate #:coding-math.quickutils #:coding-math.utils #:coding-math.fps #:coding-math.math #:coding-math.tween #:coding-math.2d.points #:coding-math.2d.lines #:coding-math.2d.hitboxes #:coding-math.2d.particles #:coding-math.vectors ) (:shadowing-import-from #:iterate #:in) (:shadow #:point)) (defpackage #:coding-math.2d.ballistics (:use #:cl #:sketch #:coding-math.quickutils #:coding-math.tween #:coding-math.2d.particles #:coding-math.2d.hitboxes #:coding-math.utils #:coding-math.math #:coding-math.fps)) ;;;; 3D stuff (defpackage #:coding-math.3d.vectors (:use #:cl #:sb-cga #:coding-math.math #:coding-math.utils #:coding-math.quickutils) (:export #:vec-x #:vec-y #:vec-z #:vec-r #:vec-a #:vec-h #:random-vec #:zero-vec #:with-vec #:with-vecs #:angle-between)) (defpackage #:coding-math.3d.coordinates (:use #:cl #:sb-cga #:coding-math.math #:coding-math.3d.vectors #:coding-math.utils #:coding-math.quickutils) (:export #:cartesian-to-cylindrical #:cylindrical-to-cartesian #:cylindrical-to-cartesian-cga )) (defpackage #:coding-math.3d.demo (:use #:cl #:iterate #:sketch #:coding-math.quickutils #:coding-math.utils #:coding-math.fps #:coding-math.math #:coding-math.tween #:coding-math.3d.vectors #:coding-math.3d.coordinates ) (:import-from :sb-cga :vec) (:shadowing-import-from #:iterate #:in) (:shadow #:point))