correctly (?) compute shaftScale by solving a quadratic

Fixes #126. I hope.

Also removes startTangent and endTangent in favor of the new machinery
in Diagrams.Tangent.