let      of_array = function
  | [|x; y|] -> create x y
  | _        -> invalid_arg "Osg.Vec2.of_array"