Description: Discard velocity component of pv-vector.
The source code for the ANSI C routine Pv2p is available: