Alt
  (Setting
     Nothing
     (Setting
        [ DashedShort 'f' , DashedLong ('f' :| "irst") ]
        []
        False
        (Just _)
        False
        Nothing
        Nothing
        Nothing
        []
        False
        Nothing
        (Just "first")
        Nothing
        (fromList [])))
  (Setting
     Nothing
     (Setting
        [ DashedShort 's' , DashedLong ('s' :| "econd") ]
        []
        False
        (Just _)
        False
        Nothing
        Nothing
        (Just _)
        []
        False
        Nothing
        (Just "second")
        Nothing
        (fromList [])))