Skip to content

Commit

Permalink
Update src/abs.ott
Browse files Browse the repository at this point in the history
Co-authored-by: Karl Palmskog <palmskog@gmail.com>
  • Loading branch information
Aqissiaq and palmskog authored Jan 23, 2024
1 parent a11b9d5 commit 3c436f2
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/abs.ott
Original file line number Diff line number Diff line change
Expand Up @@ -147,7 +147,7 @@ Lemma size_ge_1: forall e0,
1 <= e_size e0.
Proof. destruct e0;cbn;lia. Qed.

Program Fixpoint my_fresh (l : list x) (e0 : e) {measure (e_size e0)} : Prop :=
Program Fixpoint fresh_vars (l : list x) (e0 : e) {measure (e_size e0)} : Prop :=
match e0 with
| e_t _ => True
| e_var x => ~ In x l
Expand Down

0 comments on commit 3c436f2

Please sign in to comment.