move job_cost to job.v

restructuring/behavior/job.v

@@ -3,3 +3,7 @@ From mathcomp Require Export eqtype.
 (* Throughout the library we assume that jobs have decidable equality *)
 
 Definition JobType := eqType.
+
+(* Definition of a generic type of parameter relating jobs to a discrete cost *)
+
+Class JobCost (J : JobType) := job_cost : J -> nat.

restructuring/behavior/schedule/schedule.v

@@ -22,10 +22,6 @@ Class ProcessorState (Job : eqType) (State : Type) :=
 (* A schedule maps an instant to a processor state *)
 Definition schedule (PState : Type) := instant -> PState.
 
-(* Definition of a generic type of parameter relating jobs to a discrete cost *)
-
-Class JobCost (J : JobType) := job_cost : J -> nat.
-
 Section Schedule.
   Context {Job : eqType} {PState : Type}.
   Context `{ProcessorState Job PState}.