+ (* CALL auto on every goal, easy way of testing it *)
+ let auto =
+ GrafiteAst.AutoBatch
+ (loc, ([],["depth","1";"timeout","1";"type","1"])) in
+ (try
+ let auto = apply_tactic ~disambiguate_tactic ("",0,auto) in
+ let _ = eval_tactical status (tactic_of_ast' auto) in ()
+ with _ -> ());