let default_mesh_adder : mesh_adder = fun mdl mesh -> ignore (add_mesh mdl mesh)