diff options
| author | herbelin | 2001-11-20 23:04:25 +0000 |
|---|---|---|
| committer | herbelin | 2001-11-20 23:04:25 +0000 |
| commit | 109414970c8ce6a7f7fdb9d9819ef39a8095cf2e (patch) | |
| tree | 489824920c82ffbef3803699e0e12aeada51598d /kernel/sign.mli | |
| parent | d9e83b3701f9c90542810feb212aea3a6aa0f141 (diff) | |
Ajout mkArity
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2218 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/sign.mli')
| -rw-r--r-- | kernel/sign.mli | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/kernel/sign.mli b/kernel/sign.mli index fbc682e35f..6667b598c3 100644 --- a/kernel/sign.mli +++ b/kernel/sign.mli @@ -69,6 +69,7 @@ val it_mkProd_or_LetIn : types -> rel_context -> types (* Destructs a term of the form $(x_1:T_1)..(x_n:T_n)s$ into the pair *) type arity = rel_context * sorts val destArity : types -> arity +val mkArity : arity -> types val isArity : types -> bool (* Transforms a product term $(x_1:T_1)..(x_n:T_n)T$ including letins |