Update
This commit is contained in:
parent
98843bb92d
commit
7b5ca73448
@ -2138,7 +2138,9 @@ Proof.
|
||||
++ [b6; b5; b5; b3; b2; b1; b0; b] ++ tl)
|
||||
with ((hd ++ [b; b0; b1; b2; b3; b5; b5; b6; b6])
|
||||
++ [b5] ++ [b5] ++ [b3] ++ [b2;b1;b0;b] ++ tl) in H.
|
||||
apply tm_step_cubefree in H.
|
||||
apply tm_step_cubefree in H. destruct b5; destruct b3.
|
||||
contradiction H. reflexivity. easy. easy. contradiction H. reflexivity.
|
||||
apply Nat.lt_0_1. rewrite <- app_assoc. reflexivity.
|
||||
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user