anchor.diff:  //Delete
   
   /// Removes given event form given workflow and returns the result
  -let remove_event (wfName : WorkflowName) (event : EventName) (magic : SendFunc<'a>) (repos : Repository) : Result =
  +let remove_event (wfName : WorkflowName) (event : EventName) (magic : SendFunc<Repository>) (repos : Repository) : Result =
       let workflowName, event = event
       let events = 
           match repos.workflows.TryFind(wfName) with
  
positive.code: 
  //Read
  let check_workflow (wfName : WorkflowName) (repos : Repository) : bool =
      failwith "Not implemented yed."
  
  /// Metodes used when finding all executabel event for a user
  let find_executable_with_roles (workflow : Workflow) (roles : Roles) (magic : SendFunc<'a>) (repos : Repository) : ExecutableInWorkflow =
  
negative.code:     Result.Ok({repos with workflows = Map.add wfName (remove_first events event) repos.workflows})
  
  /// Deletes given workflow and returns it if its susesful
  let delete_workflow (wfName : WorkflowName) (magic : SendFunc<Repository>) (repos : Repository) : Result =
      let events = 
          match repos.workflows.TryFind(wfName) with
          | Some(v) -> v
          | None -> failwith "Workflow Does not exist" 
      let rec deleteEvents events=
          match events with
          | h::events ->
              match remove_event wfName h magic repos with  
              |Result.Ok(x) -> 
                  deleteEvents events
              | _ -> []
          | _ -> []
      //call method to remove workflow fom repository?
  