May

        v;

    fi);

zipped vv is list?<~double[]> -> ~double[] =

    case vv of

    [v]: v;

    maxindex,

    minindex,

    unityNormalised,

    zipped,

    unzipped,

} as {

    maxindex is vector_t -> number,

    minindex is vector_t -> number,

    unityNormalised is vector_t -> vector_t,

    zipped is list?<vector_t> -> vector_t,

    unzipped is number -> vector_t -> array<vector_t>,

}