Skip to content
Snippets Groups Projects
Commit 319404c2 authored by Björn Brandenburg's avatar Björn Brandenburg
Browse files

fixup finish_time proof to match changed `completes_at` definition

parent ad62e9b8
No related branches found
No related tags found
No related merge requests found
Pipeline #117640 passed
...@@ -65,14 +65,12 @@ Section JobFinishTime. ...@@ -65,14 +65,12 @@ Section JobFinishTime.
by case: find_ex_minn. by case: find_ex_minn.
Qed. Qed.
(** Third, when excluding the pathological case of a job completing at time (** Third, Prosa's notion of [completes_at] is satisfied at the finish time. *)
zero, Prosa's notion of [completes_at] is satisfied at the finish time. *)
Corollary completes_at_finish_time : Corollary completes_at_finish_time :
finish_time > 0 ->
completes_at sched j finish_time. completes_at sched j finish_time.
Proof. Proof.
move=> GT0.
apply/andP; split; last exact: finished_at_finish_time. apply/andP; split; last exact: finished_at_finish_time.
apply/orP; case FIN: finish_time; [by right|left].
apply: contra_ltnN => [?|]; apply: contra_ltnN => [?|];
first by apply: earliest_finish_time. first by apply: earliest_finish_time.
by lia. by lia.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment