isFlag str option = if elem (getFlagOrPrefix str) (long (flags option))
  then True
  else elem (getFlagOrPrefix str) (short (flags option))
isFlag str option = if elem (getFlagOrPrefix str) (long (flags option))
  then True
  else elem (getFlagOrPrefix str) (short (flags option))
isFlag str option = if elem (getFlagOrPrefix str) (long (flags option))
  then True
  else elem (getFlagOrPrefix str) (short (flags option))