mirror of
https://github.com/achlipala/frap.git
synced 2024-11-28 07:16:20 +00:00
Unnecessary Fixpoint
This commit is contained in:
parent
dd266f2d8c
commit
51a7fae33e
2 changed files with 2 additions and 2 deletions
|
@ -901,7 +901,7 @@ Compute tempVar 2.
|
||||||
* lack of clashes. We also prove some properties that will come in handy
|
* lack of clashes. We also prove some properties that will come in handy
|
||||||
* later. *)
|
* later. *)
|
||||||
|
|
||||||
Fixpoint noUnderscoreVar (x : var) : bool :=
|
Definition noUnderscoreVar (x : var) : bool :=
|
||||||
match x with
|
match x with
|
||||||
| String "_" _ => false
|
| String "_" _ => false
|
||||||
| _ => true
|
| _ => true
|
||||||
|
|
|
@ -613,7 +613,7 @@ Compute tempVar 0.
|
||||||
Compute tempVar 1.
|
Compute tempVar 1.
|
||||||
Compute tempVar 2.
|
Compute tempVar 2.
|
||||||
|
|
||||||
Fixpoint noUnderscoreVar (x : var) : bool :=
|
Definition noUnderscoreVar (x : var) : bool :=
|
||||||
match x with
|
match x with
|
||||||
| String "_" _ => false
|
| String "_" _ => false
|
||||||
| _ => true
|
| _ => true
|
||||||
|
|
Loading…
Reference in a new issue