let wp_prover_get () =
match Wp_parameters.Prover.get () with
| "alt-ergo" -> AltErgo (Wp_parameters.Arrays.get ())
| "coqide" -> Prover "coqide"
| "coq" -> Wp_parameters.Prover.set "coqide" ; Prover "coqide"
| "simplify" -> Prover "simplify"
| "z3" -> Prover "z3"
| "none" -> NoProver
| _ -> Unknown