commence physics implementation with mass
This commit is contained in:
parent
4137101dbc
commit
253e698cc4
11
src/Classes/Physics/Mass.hs
Normal file
11
src/Classes/Physics/Mass.hs
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
module Classes.Physics.Mass where
|
||||||
|
|
||||||
|
-- | This typeclass is a centerpiece of the physics implementation and is used
|
||||||
|
-- to implement the basic mass properties of a (very simplified) physical body.
|
||||||
|
class Mass m where
|
||||||
|
|
||||||
|
-- | The mass of the object
|
||||||
|
mass :: m -> Double
|
||||||
|
|
||||||
|
-- | The scaling factor for how much this object is affected by gravity.
|
||||||
|
gravScale :: m -> Double
|
Loading…
Reference in a new issue