commence physics implementation with mass
This commit is contained in:
parent
4137101dbc
commit
253e698cc4
1 changed files with 11 additions and 0 deletions
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