This is just an initial commit.  It is a copy of the corresponding code for
unit vectors, with just a few names exchanged.  The actual functionality
will come in subsequent commits.

[[Imported from SVN: r9076]]