From 0752f867e7561e7161883c8467a028031e60ac2a Mon Sep 17 00:00:00 2001 From: corbinea Date: Fri, 6 Feb 2004 13:58:34 +0000 Subject: correction de bugs de congruence et firstorder (inductifs) git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5303 85f007b7-540e-0410-9357-904b9bb8a0f7 --- contrib/first-order/formula.mli | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'contrib/first-order/formula.mli') diff --git a/contrib/first-order/formula.mli b/contrib/first-order/formula.mli index 9e027e240..5fa1323c8 100644 --- a/contrib/first-order/formula.mli +++ b/contrib/first-order/formula.mli @@ -26,9 +26,10 @@ type ('a,'b) sum = Left of 'a | Right of 'b type counter = bool -> metavariable -val construct_nhyps : inductive -> int array +val construct_nhyps : inductive -> Proof_type.goal Tacmach.sigma -> int array -val ind_hyps : int -> inductive -> constr list -> Sign.rel_context array +val ind_hyps : int -> inductive -> constr list -> + Proof_type.goal Tacmach.sigma -> Sign.rel_context array type atoms = {positive:constr list;negative:constr list} -- cgit v1.2.3