aboutsummaryrefslogtreecommitdiffhomepage
path: root/kernel/univ.ml
diff options
context:
space:
mode:
authorGravatar Gaëtan Gilbert <gaetan.gilbert@skyskimmer.net>2017-10-07 11:35:34 +0200
committerGravatar Gaëtan Gilbert <gaetan.gilbert@skyskimmer.net>2018-02-10 01:34:19 +0100
commite6bffa602c0d744a24d7ea7418020ebd8b7dfbbf (patch)
treeb71c3cc2254dd657cb899cc689a834413da27a72 /kernel/univ.ml
parent47e43e229ab02a4dedc2405fed3960a4bf476b58 (diff)
Fix typo in Univ.CumulativityInfo
Diffstat (limited to 'kernel/univ.ml')
-rw-r--r--kernel/univ.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/univ.ml b/kernel/univ.ml
index f72f6f26a..50692ca59 100644
--- a/kernel/univ.ml
+++ b/kernel/univ.ml
@@ -968,7 +968,7 @@ struct
(univcst, UContext.make (Instance.append inst freshunivs,
create_trivial_subtyping inst freshunivs))
- let subtyping_susbst (univcst, subtypcst) =
+ let subtyping_subst (univcst, subtypcst) =
let (ctx, ctx') = (halve_context (UContext.instance subtypcst))in
Array.fold_left2 (fun subst l1 l2 -> LMap.add l1 l2 subst) LMap.empty ctx ctx'