addForce :: Vec3 Double -> Body -> Body
addForce f b = b { bForce = bForce b + f }
addForce :: Vec3 Double -> Body -> Body
addForce f b = b { bForce = bForce b + f }
addForce f b = b { bForce = bForce b + f }