In[783]=
HB[P_, DD_, d_] := 2P/(PiDD*(DD - (DD^2 - d^2)^(1/2)))
HB[{500, Quantity[1, “Kilograms”]}, {10, Quantity[1, “Millimeters”]},
{1.62, Quantity[1, “Millimeters”]}]
Out[784]= {240.975, Quantity[2/\[Pi], ("Kilograms")/("Millimeters")^2]}
In[783]=
HB[P_, DD_, d_] := 2P/(PiDD*(DD - (DD^2 - d^2)^(1/2)))
HB[{500, Quantity[1, “Kilograms”]}, {10, Quantity[1, “Millimeters”]},
{1.62, Quantity[1, “Millimeters”]}]
Out[784]= {240.975, Quantity[2/\[Pi], ("Kilograms")/("Millimeters")^2]}
Hi Edward,
Because lists are being passed to HB and many operations thread across lists.
Pi * {10, Quantity[1, "Millimeters"]}
(* {10 \[Pi], Quantity[\[Pi], "Millimeters"]} *)
Pass the right quantities instead
HB[Quantity[500, "Kilograms"], Quantity[10, "Millimeters"], Quantity[1.62, "Millimeters"]]
(* Quantity[240.975, ("Kilograms")/("Millimeters")^2] *)
Thank you thank you thank you…