commandLineProcess (Delete cfg n) = do 
  putStrLn "delete called"
  mc <- getModelClientConfiguration =<< load [Required cfg] 
  maybe (error "cannot parse config") (flip startDelete n) mc
commandLineProcess (Delete cfg n) = do 
  putStrLn "delete called"
  mc <- getModelClientConfiguration =<< load [Required cfg] 
  maybe (error "cannot parse config") (flip startDelete n) mc
commandLineProcess (Delete cfg n) = do 
  putStrLn "delete called"
  mc <- getModelClientConfiguration =<< load [Required cfg] 
  maybe (error "cannot parse config") (flip startDelete n) mc