Skip to content

Commit

Permalink
Merge pull request #1087 from MevenBertrand/correct-noccur-main
Browse files Browse the repository at this point in the history
Correcting the definition of noccur_between in Template – main branch
  • Loading branch information
mattam82 authored Sep 16, 2024
2 parents 1d547df + dcad89f commit b5c0239
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion template-coq/theories/Ast.v
Original file line number Diff line number Diff line change
Expand Up @@ -538,7 +538,7 @@ Notation closed t := (closedn 0 t).

Fixpoint noccur_between k n (t : term) : bool :=
match t with
| tRel i => Nat.ltb i k && Nat.leb (k + n) i
| tRel i => Nat.ltb i k || Nat.leb (k + n) i
| tEvar ev args => List.forallb (noccur_between k n) args
| tLambda _ T M | tProd _ T M => noccur_between k n T && noccur_between (S k) n M
| tApp u v => noccur_between k n u && List.forallb (noccur_between k n) v
Expand Down

0 comments on commit b5c0239

Please sign in to comment.