feat: add finals questions
This commit is contained in:
@@ -1536,9 +1536,41 @@ Proof.
|
||||
rewrite -> (S_run_one bcis n H_fdel_one).
|
||||
reflexivity. }
|
||||
split.
|
||||
{ intros n n' H_fdel_many.
|
||||
rewrite -> (S_run_many bcis n n' H_fdel_many).
|
||||
{ intros n n' ds'' H_fdel_many.
|
||||
rewrite -> (S_run_many bcis n n' ds'' H_fdel_many ).
|
||||
reflexivity. }
|
||||
intros s H_fdel_KO.
|
||||
rewrite -> (S_run_KO bcis s H_fdel_KO).
|
||||
reflexivity.
|
||||
- intro S_run.
|
||||
assert (S_run := S_run fetch_decode_execute_loop fetch_decode_execute_loop_satifies_the_specification).
|
||||
intros fdel S_fdel.
|
||||
split.
|
||||
{ intros bcis H_fdel_nil.
|
||||
rewrite -> (there_is_at_most_one_fetch_decode_execute_loop fdel fetch_decode_execute_loop S_fdel fetch_decode_execute_loop_satifies_the_specification bcis) in H_fdel_nil.
|
||||
destruct (S_run bcis) as [S_run_nil _].
|
||||
rewrite -> (S_run_nil H_fdel_nil).
|
||||
reflexivity.
|
||||
}
|
||||
split.
|
||||
{ intros bcis n H_fdel_one.
|
||||
rewrite -> (there_is_at_most_one_fetch_decode_execute_loop fdel fetch_decode_execute_loop S_fdel fetch_decode_execute_loop_satifies_the_specification bcis) in H_fdel_one.
|
||||
destruct (S_run bcis) as [_ [S_run_one _]].
|
||||
rewrite -> (S_run_one n H_fdel_one).
|
||||
reflexivity.
|
||||
}
|
||||
split.
|
||||
{ intros bcis n n' ds'' H_fdel_many.
|
||||
rewrite -> (there_is_at_most_one_fetch_decode_execute_loop fdel fetch_decode_execute_loop S_fdel fetch_decode_execute_loop_satifies_the_specification bcis) in H_fdel_many.
|
||||
destruct (S_run bcis) as [_ [_ [S_run_many _]]].
|
||||
rewrite -> (S_run_many n n' ds'' H_fdel_many).
|
||||
reflexivity.
|
||||
}
|
||||
intros bcis s H_fdel_KO.
|
||||
rewrite -> (there_is_at_most_one_fetch_decode_execute_loop fdel fetch_decode_execute_loop S_fdel fetch_decode_execute_loop_satifies_the_specification bcis) in H_fdel_KO.
|
||||
destruct (S_run bcis) as [_ [_ [_ S_run_KO]]].
|
||||
rewrite -> (S_run_KO s H_fdel_KO).
|
||||
reflexivity.
|
||||
Qed.
|
||||
|
||||
(* end of term-project.v *)
|
||||
|
||||
Reference in New Issue
Block a user