obd 0.2.0.0 → 0.2.0.1
raw patch · 2 files changed
+3/−3 lines, 2 files
Files
- obd.cabal +1/−1
- src/System/Hardware/ELM327/Car/MAP.hs +2/−2
obd.cabal view
@@ -1,5 +1,5 @@ name: obd-version: 0.2.0.0+version: 0.2.0.1 synopsis: Communicate to OBD interfaces over ELM327 description: Haskell library to communicate with OBD-II over ELM327,
src/System/Hardware/ELM327/Car/MAP.hs view
@@ -34,8 +34,8 @@ -- | Create a car that uses the intake manifold absolute pressure (MAP) -- to calculate fuel consumption. mapCar :: MonadIO m => MAPProperties -> Car (ConT m)-mapCar p = (\c -> (Car.massAirFlowRate .~ massAirFlowRate' p c) c) .- (\c -> (Car.engineFuelRate .~ engineFuelRate' p c) c) $+mapCar p = (\c -> (Car.engineFuelRate .~ engineFuelRate' p c) c) .+ (\c -> (Car.massAirFlowRate .~ massAirFlowRate' p c) c) $ defaultCar -- | Calculate MAF from RPM, MAP and IAT