diff options
| author | barras | 2001-11-12 12:38:08 +0000 |
|---|---|---|
| committer | barras | 2001-11-12 12:38:08 +0000 |
| commit | 865d3a274dc618a4eff13b309109aa559077a933 (patch) | |
| tree | dac5bc457e5ad9b955b21012b230ed97de22d92b /kernel/term.mli | |
| parent | da33e695040678d74622213af2cd43d32140d186 (diff) | |
Suites modifs du noyau. Univ devient purement fonctionnel.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2183 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/term.mli')
| -rw-r--r-- | kernel/term.mli | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/kernel/term.mli b/kernel/term.mli index 0ce4f3d4af..66cc90fb37 100644 --- a/kernel/term.mli +++ b/kernel/term.mli @@ -29,7 +29,6 @@ val type_0 : sorts type sorts_family = InProp | InSet | InType val family_of_sort : sorts -> sorts_family -val new_sort_in_family : sorts_family -> sorts (*s Useful types *) @@ -344,11 +343,6 @@ val prod_applist : constr -> constr list -> constr (*s Other term destructors. *) -(* Destructs a term of the form $(x_1:T_1)..(x_n:T_n)s$ into the pair *) -type arity = rel_declaration list * sorts -val destArity : constr -> arity -val isArity : constr -> bool - (* Transforms a product term $(x_1:T_1)..(x_n:T_n)T$ into the pair $([(x_n,T_n);...;(x_1,T_1)],T)$, where $T$ is not a product. It includes also local definitions *) |