Module Archetype.Opt_model

val remove_operations_nil : Model.model -> Model.model
val optimize : (Model.model * 'a) -> Model.model * 'a