(* Pressure conversion from SI to medical units *)
HgSpecificGravity=13.5;
BloodSpecificGravity=1;

(* Human dimensions *)
HumanHeartToHeadDistance=0.3 m;
HumanHeelToHeartDistance=1.5 m;
HumanSystolicBloodPressure=120 mmHg;
HumanDiastolicBloodPressure=80 mmHg;
HumanHeartMass=0.25 kg;
HumanCardiacStrokeVolume=70 10^(-6) m^3;
ΔPHuman=HumanSystolicBloodPressure-HumanDiastolicBloodPressure;
HumanHeartMass/(ΔPHuman HumanCardiacStrokeVolume)

(* Giraffe dimensions *)
GiraffeHeartToHeadDistance=2 m;
GiraffeHeelToHeartDistance=2.5 m;
GiraffeDiastolovBloodPressure=250 mmHg;

(* Scaling laws for cardiac parameters *)
ΔPGiraffe = ΔPHuman (GiraffeHeartToHeadDistance/HumanHeartToHeadDistance)
ΔPGiraffe = 1000 (BloodSpecificGravity/HgSpecificGravity)GiraffeHeartToHeadDistance
GiraffeHeartMass = HumanHeartMass (GiraffeHeelToHeartDistance GiraffeHeartToHeadDistance/HumanHeartToHeadDistance/HumanHeelToHeartDistance)^2
GiraffeCardiacStrokeVolume=HumanCardiacStrokeVolume (GiraffeHeelToHeartDistance^2 GiraffeHeartToHeadDistance/HumanHeelToHeartDistance^2/HumanHeartToHeadDistance)

(* Measured actual cardiac parameters for giraffes *)
CardiacMass=4.5 kg;
ΔP=85 mmHg;
CardiacStrokeVolume=0.00083 m^3;
CardiacMass/(ΔP CardiacStrokeVolume)

(* Elephant *)
CardiacMass=12 Kg;
ΔP=60 mmHg;
CardiacStrokeVolume=0.0025 m^3;
CardiacMass/(ΔP CardiacStrokeVolume)

(* Dog *)
CardiacMass=0.1 kg;
ΔP=60 mmHG;
CardiacStrokeVolume=20 10^(-6) m^3;
CardiacMass/(ΔP CardiacStrokeVolume)