baruchel/coqbooks
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Update

Browse Source
This commit is contained in:
Thomas Baruchel 2023-02-03 17:21:27 +01:00
parent 86908a4339
commit 98131965ff
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/thue_morse3.v
View File

@ -2456,7 +2456,6 @@ Proof.
reflexivity. reflexivity.
rewrite Nat.mul_comm. replace (2^3) with 8. rewrite Nat.mul_comm. replace (2^3) with 8.
replace 4 with (length (hd++a) mod 8) at 3. replace 4 with (length (hd++a) mod 8) at 3.
rewrite <- Nat.div_mod_eq. rewrite <- H0 at 1. rewrite <- Nat.div_mod_eq. rewrite <- H0 at 1.
@ -2471,10 +2470,13 @@ Proof.
rewrite <- app_assoc. reflexivity. reflexivity. rewrite <- app_assoc. reflexivity. reflexivity.
rewrite H2 in H1. rewrite H3 in H1. simpl in H1. rewrite H2 in H1. rewrite H3 in H1. simpl in H1.
inversion H1. contradiction H4. destruct H1. assert (Some false = Some true).
apply H4. reflexivity. inversion H5.
rewrite Nat.add_comm.
rewrite Nat.sub_add. reflexivity.
apply Nat.lt_le_incl. assumption.
Qed.