TUPLE: v+ { x read-only } { y read-only } ; C: v+ M: v+ length x>> length ; inline M: v+ nth-unsafe [ x>> ] [ y>> ] bi [ nth-unsafe ] bi-curry@ bi + ; inline INSTANCE: v+ sequence TUPLE: v*n { x read-only } { y read-only } ; C: v*n M: v*n length x>> length ; inline M: v*n nth-unsafe [ x>> nth-unsafe ] [ y>> ] bi * ; inline INSTANCE: v*n sequence [ { float-array float-array } declare 5.0 float-array{ } clone-like ] optimized.