diff options
| author |  Amin Timany <amintimany@gmail.com> | 2017-05-02 12:56:14 +0200 |
|---|---|---|
| committer |  Emilio Jesus Gallego Arias <e+git@x80.org> | 2017-06-16 04:51:17 +0200 |
| commit | 4bf85270a36a0a3f9517d8bce92d843f882af00a (patch) | |
| tree | 5bb66264002d6b1a0cedbf499d49753d3f4905c1 /kernel/univ.ml | |
| parent | fece24ec8aa88950477ccfed70b511f05b438718 (diff) | |
Simplify Univ.ml
Diffstat (limited to 'kernel/univ.ml')
| -rw-r--r-- | kernel/univ.ml | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/kernel/univ.ml b/kernel/univ.ml index 5de45cf2b..eb45f022e 100644 --- a/kernel/univ.ml +++ b/kernel/univ.ml @@ -1091,10 +1091,6 @@ struct 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' - let dest x = x - - let size ((x,_), _) = Instance.length x - end type universe_info_ind = UInfoInd.t |