external to_array : t -> float array = "vec4_to_array"