diff options
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/clenv.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/proofs/clenv.ml b/proofs/clenv.ml index 43a07aa1a5..be9bd638ac 100644 --- a/proofs/clenv.ml +++ b/proofs/clenv.ml @@ -175,6 +175,7 @@ let unify_0 cv_pb mc wc m n = error_cannot_unify (m,n) | LetIn (_,b,_,c), _ -> unirec_rec pb substn (subst1 b c) cN + | _, LetIn (_,b,_,c) -> unirec_rec pb substn cM (subst1 b c) | _ -> error_cannot_unify (m,n) |