Hi

Hope that You are doing fine. I am stuck at this problem if you have any idea kindly help me out.

I want to output the schedule for a given task and method for one hyper period....like (o, just (T4 3 1 3 1), (1, Just (T2 5 1 51) etc

 

Regards

Nowshad

data Task = T4 Phase Period Execution Deadline

  | T2 Period Execution

    deriving (Show ,Eq)

type Phase     = TimeUnit

type Period    = TimeUnit

type Execution = TimeUnit

type Deadline  = TimeUnit

type TimeUnit  = Int

data Method = RM

    | DM

    | EDF

      deriving (Show , Eq)

 periodicSchedule :: Method -> [Task] -> [(TimeUnit, Maybe Task)]