Update
This commit is contained in:
parent
24d88f1928
commit
43d97734b2
@ -425,9 +425,8 @@ Proof.
|
|||||||
apply length_zero_iff_nil in I. rewrite I. reflexivity.
|
apply length_zero_iff_nil in I. rewrite I. reflexivity.
|
||||||
destruct u0. reflexivity. destruct v0.
|
destruct u0. reflexivity. destruct v0.
|
||||||
apply PeanoNat.Nat.neq_succ_0 in J; contradiction J.
|
apply PeanoNat.Nat.neq_succ_0 in J; contradiction J.
|
||||||
destruct b; simpl; rewrite K; rewrite IHw.
|
destruct b; simpl; rewrite K; rewrite IHw;
|
||||||
reflexivity. inversion I; reflexivity. inversion J; reflexivity.
|
inversion I; inversion J; reflexivity.
|
||||||
reflexivity. inversion I; reflexivity. inversion J; reflexivity.
|
|
||||||
rewrite H4; try rewrite H1; try rewrite H; reflexivity.
|
rewrite H4; try rewrite H1; try rewrite H; reflexivity.
|
||||||
Qed.
|
Qed.
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user