runCmd (IfToCaseCmd fileName sr sc er ec) (opt, gOpt)
  = runFunc $ ifToCase opt gOpt fileName (sr,sc) (er,ec)
runCmd (IfToCaseCmd fileName sr sc er ec) (opt, gOpt)
  = runFunc $ ifToCase opt gOpt fileName (sr,sc) (er,ec)
runCmd (IfToCaseCmd fileName sr sc er ec) (opt, gOpt)
  = runFunc $ ifToCase opt gOpt fileName (sr,sc) (er,ec)