%%HP: T(3)A(D)F(.);
\<< \-> T Y
  \<< T Y CROSS
LASTARG ABS SWAP
ABS * SWAP ABS SWAP
/ ASIN "Degrees"
\->TAG
  \>>
"\<) <-> VECTORS BY X"
\>>
