sig val goal : Wpo.prover -> Wpo.t -> string end