and the final product!
local double dPA;
local double dPin;
dPin=Sheave.GrooveDims.PinDiameter.Value/2;
dPA=Sheave.GrooveDims.GrooveAngle/2;
Sheave.GrooveDims.DiaOverPin=Sheave.PrtSyntax.OutsideDia+(dPin-((Sheave.GrooveDims.GrooveWidth-
(Sheave.GrooveDims.PinDiameter.Value
/cos(dPa*pi/180)))/2)/tan(dPa*pi/180))*2;
Big shout out to Bradls30! you da man.
