show.txt

WithConfig
  _
  Nothing
  (Check
     Nothing
     False
     _
     (Alt
        (Check
           Nothing
           False
           _
           (Setting
              Nothing
              (Setting
                 [ DashedLong ('c' :| "onfig-file") ]
                 [ _ ]
                 False
                 Nothing
                 True
                 (Just ("CONFIG_FILE" :| []))
                 Nothing
                 Nothing
                 (Just "FILE_PATH")
                 (Just "Path to the configuration file"))))
        (Check Nothing False _ (Pure _))))
  (Setting
     Nothing
     (Setting
        []
        []
        False
        Nothing
        False
        Nothing
        (Just
           (ConfigValSetting
              ("big" :| [])
              BimapCodec
              _
              _
              (EitherCodec
                 PossiblyJointUnion
                 NullCodec
                 (ObjectOfCodec
                    (Just "BigConfig")
                    (ApCodec
                       (BimapCodec
                          _
                          _
                          (RequiredKeyCodec
                             "map"
                             Nothing
                             (MapCodec
                                (MapCodec
                                   (BimapCodec
                                      _
                                      _
                                      (IntegerCodec
                                         Nothing
                                         Bounds
                                           { boundsLower = Just (-9223372036854775808)
                                           , boundsUpper = Just 9223372036854775807
                                           }))))))
                       (BimapCodec
                          _ _ (OptionalKeyCodec "sub" Nothing (StringCodec Nothing)))))) :|
              []))
        Nothing
        Nothing
        (Just "big configuration object")))