help :: String -> OptBuilding arg a
help d    = OptBuilding (\b -> b {obDescr = Just d})
help :: String -> OptBuilding arg a
help d    = OptBuilding (\b -> b {obDescr = Just d})
help d    = OptBuilding (\b -> b {obDescr = Just d})