Fix comment

arrival_sequence.v

@@ -46,8 +46,8 @@ Module ArrivalSequence.
     Definition job_arrival {arr_seq: arrival_sequence Job} (j: JobIn arr_seq) :=
       _arrival_time arr_seq j.
 
-    (* Finally, we assume a decidable equality for JobIn. We don't care about
-       its definition. It's just to make JobIn compatible with ssreflect. *)
+    (* Finally, we assume a decidable equality for JobIn, to make it compatible
+       with ssreflect. TODO: Is there a better way to do this? *)
     Definition jobin_eqdef (arr_seq: arrival_sequence Job) :=
       (fun j1 j2: JobIn arr_seq => (JobIn_is_Job j1) == (JobIn_is_Job j2)).
     Axiom eqn_jobin : forall arr_seq, Equality.axiom (jobin_eqdef arr_seq).