Returning the Type: The vector_type Callback

The vector_type procedure returns the type ID for the target type. This is a trivial process because the type ID was previously set by the vector_validate procedure.

proc vector_type {instance_id} {
    global _vector_type_info 
    return [lindex $_vector_type_info($instance_id) 0]
}