Wolfram Computation Meets Knowledge

Wolfram Formula Repository (Under Development)

Indicated Horsepower

Indicated horsepower is the theoretical power produced in a reciprocating engine if it is completely frictionless in converting the expanding gas energy in the cylinders.

The piston area equals \[Pi]/4 times the piston bore squared. The stroke rate equals half the engine rpm. The indicated horsepower is porportional to the product of the piston area, number of cylinders, piston stroke, stroke rate and the mean effective pressure.

Formula

{QuantityVariable["A", "Area"] == (Pi*QuantityVariable["B", "Length"]^2)/4, QuantityVariable["N", "AngularFrequency"] == QuantityVariable["rpm", "AngularFrequency"]/2, QuantityVariable["P", "Power"] == Quantity[1/33000, ("HorsepowerMechanical"*"Minutes")/("Inches"*"PoundsForce"*"Revolutions")]*QuantityVariable["A", "Area"]*QuantityVariable["K", "Unitless"]*QuantityVariable["L", "Length"]*QuantityVariable["N", "AngularFrequency"]*QuantityVariable["P", "Pressure"]}

symbol description physical quantity
A piston area "Area"
B piston bore "Length"
N stroke rate "AngularFrequency"
rpm engine rpm "AngularFrequency"
P indicated horsepower "Power"
K number of cylinders "Unitless"
L piston stroke "Length"
P mean effective pressure "Pressure"

Forms

Examples

Get the resource:

In[1]:=
ResourceObject["Indicated Horsepower"]
Out[1]=

Get the formula:

In[2]:=
FormulaData[ResourceObject["Indicated Horsepower"]]
Out[2]=

Use some values:

In[3]:=
FormulaData[ ResourceObject[ "Indicated Horsepower"], {QuantityVariable["B","Length"] -> Quantity[72, "Millimeters"], QuantityVariable["A","Area"] -> Quantity[400, ("Millimeters")^2]}]
Out[3]=

Publisher Information