AS-PAIR x y
Combine X and Y values into a pair.
AS-PAIR is a function value.
as-pair: func [ "Combine X and Y values into a pair." x [number!] y [number!] ][ add 1x0 * x 0x1 * y ]