diff options
| author |  filliatr <filliatr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 1999-08-26 16:26:54 +0000 |
|---|---|---|
| committer | filliatr <filliatr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 1999-08-26 16:26:54 +0000 |
| commit | dd279791aca531cd0f38ce79b675c68e08a4ff63 (patch) | |
| tree | 32115bf156935bcb902d50fe3222e818ed692a1f /kernel/typeops.mli | |
| parent | 15ed739c91a22e91ae88d54215f6862fc1074a88 (diff) | |
environnement sur
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@28 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/typeops.mli')
| -rw-r--r-- | kernel/typeops.mli | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/kernel/typeops.mli b/kernel/typeops.mli index 1a3b729c2..5ddb8031e 100644 --- a/kernel/typeops.mli +++ b/kernel/typeops.mli @@ -16,6 +16,7 @@ val make_judge : constr -> typed_type -> unsafe_judgment val j_val_only : unsafe_judgment -> constr val typed_type_of_judgment : 'a unsafe_env -> unsafe_judgment -> typed_type +val assumption_of_judgement : 'a unsafe_env -> unsafe_judgment -> typed_type val relative : 'a unsafe_env -> int -> unsafe_judgment @@ -32,8 +33,6 @@ val type_of_prop_or_set : contents -> unsafe_judgment val type_of_type : universe -> universes -> unsafe_judgment * universes -val assumption_of_judgement : 'a unsafe_env -> unsafe_judgment -> typed_type - val abs_rel : 'a unsafe_env -> name -> typed_type -> unsafe_judgment -> unsafe_judgment * universes |