options :: [OptDescr HamletOptions]
options =
  [
    Option ['e'] ["eval"]
        (ReqArg EvalOptions "SFEN")
        "Eval given board and turn in SFEN",
    Option ['h'] ["hash"]
        (ReqArg HashOptions "SFEN")
        "Show hash of given board factors"
  ]
options :: [OptDescr HamletOptions]
options =
  [
    Option ['e'] ["eval"]
        (ReqArg EvalOptions "SFEN")
        "Eval given board and turn in SFEN",
    Option ['h'] ["hash"]
        (ReqArg HashOptions "SFEN")
        "Show hash of given board factors"
  ]
options =
  [
    Option ['e'] ["eval"]
        (ReqArg EvalOptions "SFEN")
        "Eval given board and turn in SFEN",
    Option ['h'] ["hash"]
        (ReqArg HashOptions "SFEN")
        "Show hash of given board factors"
  ]