diff options
| author | herbelin | 1999-12-11 01:25:22 +0000 |
|---|---|---|
| committer | herbelin | 1999-12-11 01:25:22 +0000 |
| commit | 20445e418ffee0c0dc1398c80af4a2b75abe9ac3 (patch) | |
| tree | c019077ca3898406ef9f251b26dba4ec06d24d2d /kernel/term.mli | |
| parent | d73ae1a52442841ec8c067de7048db977b299a85 (diff) | |
Intégration initiale du Cases
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@234 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/term.mli')
| -rw-r--r-- | kernel/term.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/kernel/term.mli b/kernel/term.mli index ff296c2dd3..9935aebe53 100644 --- a/kernel/term.mli +++ b/kernel/term.mli @@ -359,6 +359,9 @@ val lam_it : constr -> (name * constr) list -> constr val to_lambda : int -> constr -> constr val to_prod : int -> constr -> constr +(* pseudo-reduction rule *) +(* prod_applist (x1:B1;...;xn:Bn)B a1...an --> B[a1...an] *) +val prod_applist : constr -> constr list -> constr (*s Other term destructors. *) |