+ let bench =
+ if Helm_registry.get_bool "matita.bench" then " -bench" else ""
+ in
+ let system =
+ if Helm_registry.get_bool "matita.system" then " -system" else ""
+ in
+ let noinnertypes =
+ if Helm_registry.get_bool "matita.noinnertypes" then " -noinnertypes" else ""
+ in
+ already_defined ^ bench ^ system ^ noinnertypes