{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.RDS.Types.OptionGroupOptionSetting where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import Amazonka.RDS.Types.MinimumEngineVersionPerAllowedValue
data OptionGroupOptionSetting = OptionGroupOptionSetting'
{
OptionGroupOptionSetting -> Maybe Text
applyType :: Prelude.Maybe Prelude.Text,
OptionGroupOptionSetting
-> Maybe [MinimumEngineVersionPerAllowedValue]
minimumEngineVersionPerAllowedValue :: Prelude.Maybe [MinimumEngineVersionPerAllowedValue],
OptionGroupOptionSetting -> Maybe Text
settingName :: Prelude.Maybe Prelude.Text,
OptionGroupOptionSetting -> Maybe Text
defaultValue :: Prelude.Maybe Prelude.Text,
OptionGroupOptionSetting -> Maybe Bool
isModifiable :: Prelude.Maybe Prelude.Bool,
OptionGroupOptionSetting -> Maybe Text
settingDescription :: Prelude.Maybe Prelude.Text,
OptionGroupOptionSetting -> Maybe Text
allowedValues :: Prelude.Maybe Prelude.Text,
OptionGroupOptionSetting -> Maybe Bool
isRequired :: Prelude.Maybe Prelude.Bool
}
deriving (OptionGroupOptionSetting -> OptionGroupOptionSetting -> Bool
(OptionGroupOptionSetting -> OptionGroupOptionSetting -> Bool)
-> (OptionGroupOptionSetting -> OptionGroupOptionSetting -> Bool)
-> Eq OptionGroupOptionSetting
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OptionGroupOptionSetting -> OptionGroupOptionSetting -> Bool
$c/= :: OptionGroupOptionSetting -> OptionGroupOptionSetting -> Bool
== :: OptionGroupOptionSetting -> OptionGroupOptionSetting -> Bool
$c== :: OptionGroupOptionSetting -> OptionGroupOptionSetting -> Bool
Prelude.Eq, ReadPrec [OptionGroupOptionSetting]
ReadPrec OptionGroupOptionSetting
Int -> ReadS OptionGroupOptionSetting
ReadS [OptionGroupOptionSetting]
(Int -> ReadS OptionGroupOptionSetting)
-> ReadS [OptionGroupOptionSetting]
-> ReadPrec OptionGroupOptionSetting
-> ReadPrec [OptionGroupOptionSetting]
-> Read OptionGroupOptionSetting
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [OptionGroupOptionSetting]
$creadListPrec :: ReadPrec [OptionGroupOptionSetting]
readPrec :: ReadPrec OptionGroupOptionSetting
$creadPrec :: ReadPrec OptionGroupOptionSetting
readList :: ReadS [OptionGroupOptionSetting]
$creadList :: ReadS [OptionGroupOptionSetting]
readsPrec :: Int -> ReadS OptionGroupOptionSetting
$creadsPrec :: Int -> ReadS OptionGroupOptionSetting
Prelude.Read, Int -> OptionGroupOptionSetting -> ShowS
[OptionGroupOptionSetting] -> ShowS
OptionGroupOptionSetting -> String
(Int -> OptionGroupOptionSetting -> ShowS)
-> (OptionGroupOptionSetting -> String)
-> ([OptionGroupOptionSetting] -> ShowS)
-> Show OptionGroupOptionSetting
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OptionGroupOptionSetting] -> ShowS
$cshowList :: [OptionGroupOptionSetting] -> ShowS
show :: OptionGroupOptionSetting -> String
$cshow :: OptionGroupOptionSetting -> String
showsPrec :: Int -> OptionGroupOptionSetting -> ShowS
$cshowsPrec :: Int -> OptionGroupOptionSetting -> ShowS
Prelude.Show, (forall x.
OptionGroupOptionSetting -> Rep OptionGroupOptionSetting x)
-> (forall x.
Rep OptionGroupOptionSetting x -> OptionGroupOptionSetting)
-> Generic OptionGroupOptionSetting
forall x.
Rep OptionGroupOptionSetting x -> OptionGroupOptionSetting
forall x.
OptionGroupOptionSetting -> Rep OptionGroupOptionSetting x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep OptionGroupOptionSetting x -> OptionGroupOptionSetting
$cfrom :: forall x.
OptionGroupOptionSetting -> Rep OptionGroupOptionSetting x
Prelude.Generic)
newOptionGroupOptionSetting ::
OptionGroupOptionSetting
newOptionGroupOptionSetting :: OptionGroupOptionSetting
newOptionGroupOptionSetting =
OptionGroupOptionSetting' :: Maybe Text
-> Maybe [MinimumEngineVersionPerAllowedValue]
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> OptionGroupOptionSetting
OptionGroupOptionSetting'
{ $sel:applyType:OptionGroupOptionSetting' :: Maybe Text
applyType =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:minimumEngineVersionPerAllowedValue:OptionGroupOptionSetting' :: Maybe [MinimumEngineVersionPerAllowedValue]
minimumEngineVersionPerAllowedValue =
Maybe [MinimumEngineVersionPerAllowedValue]
forall a. Maybe a
Prelude.Nothing,
$sel:settingName:OptionGroupOptionSetting' :: Maybe Text
settingName = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:defaultValue:OptionGroupOptionSetting' :: Maybe Text
defaultValue = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:isModifiable:OptionGroupOptionSetting' :: Maybe Bool
isModifiable = Maybe Bool
forall a. Maybe a
Prelude.Nothing,
$sel:settingDescription:OptionGroupOptionSetting' :: Maybe Text
settingDescription = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:allowedValues:OptionGroupOptionSetting' :: Maybe Text
allowedValues = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:isRequired:OptionGroupOptionSetting' :: Maybe Bool
isRequired = Maybe Bool
forall a. Maybe a
Prelude.Nothing
}
optionGroupOptionSetting_applyType :: Lens.Lens' OptionGroupOptionSetting (Prelude.Maybe Prelude.Text)
optionGroupOptionSetting_applyType :: (Maybe Text -> f (Maybe Text))
-> OptionGroupOptionSetting -> f OptionGroupOptionSetting
optionGroupOptionSetting_applyType = (OptionGroupOptionSetting -> Maybe Text)
-> (OptionGroupOptionSetting
-> Maybe Text -> OptionGroupOptionSetting)
-> Lens
OptionGroupOptionSetting
OptionGroupOptionSetting
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OptionGroupOptionSetting' {Maybe Text
applyType :: Maybe Text
$sel:applyType:OptionGroupOptionSetting' :: OptionGroupOptionSetting -> Maybe Text
applyType} -> Maybe Text
applyType) (\s :: OptionGroupOptionSetting
s@OptionGroupOptionSetting' {} Maybe Text
a -> OptionGroupOptionSetting
s {$sel:applyType:OptionGroupOptionSetting' :: Maybe Text
applyType = Maybe Text
a} :: OptionGroupOptionSetting)
optionGroupOptionSetting_minimumEngineVersionPerAllowedValue :: Lens.Lens' OptionGroupOptionSetting (Prelude.Maybe [MinimumEngineVersionPerAllowedValue])
optionGroupOptionSetting_minimumEngineVersionPerAllowedValue :: (Maybe [MinimumEngineVersionPerAllowedValue]
-> f (Maybe [MinimumEngineVersionPerAllowedValue]))
-> OptionGroupOptionSetting -> f OptionGroupOptionSetting
optionGroupOptionSetting_minimumEngineVersionPerAllowedValue = (OptionGroupOptionSetting
-> Maybe [MinimumEngineVersionPerAllowedValue])
-> (OptionGroupOptionSetting
-> Maybe [MinimumEngineVersionPerAllowedValue]
-> OptionGroupOptionSetting)
-> Lens
OptionGroupOptionSetting
OptionGroupOptionSetting
(Maybe [MinimumEngineVersionPerAllowedValue])
(Maybe [MinimumEngineVersionPerAllowedValue])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OptionGroupOptionSetting' {Maybe [MinimumEngineVersionPerAllowedValue]
minimumEngineVersionPerAllowedValue :: Maybe [MinimumEngineVersionPerAllowedValue]
$sel:minimumEngineVersionPerAllowedValue:OptionGroupOptionSetting' :: OptionGroupOptionSetting
-> Maybe [MinimumEngineVersionPerAllowedValue]
minimumEngineVersionPerAllowedValue} -> Maybe [MinimumEngineVersionPerAllowedValue]
minimumEngineVersionPerAllowedValue) (\s :: OptionGroupOptionSetting
s@OptionGroupOptionSetting' {} Maybe [MinimumEngineVersionPerAllowedValue]
a -> OptionGroupOptionSetting
s {$sel:minimumEngineVersionPerAllowedValue:OptionGroupOptionSetting' :: Maybe [MinimumEngineVersionPerAllowedValue]
minimumEngineVersionPerAllowedValue = Maybe [MinimumEngineVersionPerAllowedValue]
a} :: OptionGroupOptionSetting) ((Maybe [MinimumEngineVersionPerAllowedValue]
-> f (Maybe [MinimumEngineVersionPerAllowedValue]))
-> OptionGroupOptionSetting -> f OptionGroupOptionSetting)
-> ((Maybe [MinimumEngineVersionPerAllowedValue]
-> f (Maybe [MinimumEngineVersionPerAllowedValue]))
-> Maybe [MinimumEngineVersionPerAllowedValue]
-> f (Maybe [MinimumEngineVersionPerAllowedValue]))
-> (Maybe [MinimumEngineVersionPerAllowedValue]
-> f (Maybe [MinimumEngineVersionPerAllowedValue]))
-> OptionGroupOptionSetting
-> f OptionGroupOptionSetting
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
[MinimumEngineVersionPerAllowedValue]
[MinimumEngineVersionPerAllowedValue]
[MinimumEngineVersionPerAllowedValue]
[MinimumEngineVersionPerAllowedValue]
-> Iso
(Maybe [MinimumEngineVersionPerAllowedValue])
(Maybe [MinimumEngineVersionPerAllowedValue])
(Maybe [MinimumEngineVersionPerAllowedValue])
(Maybe [MinimumEngineVersionPerAllowedValue])
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso
[MinimumEngineVersionPerAllowedValue]
[MinimumEngineVersionPerAllowedValue]
[MinimumEngineVersionPerAllowedValue]
[MinimumEngineVersionPerAllowedValue]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
optionGroupOptionSetting_settingName :: Lens.Lens' OptionGroupOptionSetting (Prelude.Maybe Prelude.Text)
optionGroupOptionSetting_settingName :: (Maybe Text -> f (Maybe Text))
-> OptionGroupOptionSetting -> f OptionGroupOptionSetting
optionGroupOptionSetting_settingName = (OptionGroupOptionSetting -> Maybe Text)
-> (OptionGroupOptionSetting
-> Maybe Text -> OptionGroupOptionSetting)
-> Lens
OptionGroupOptionSetting
OptionGroupOptionSetting
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OptionGroupOptionSetting' {Maybe Text
settingName :: Maybe Text
$sel:settingName:OptionGroupOptionSetting' :: OptionGroupOptionSetting -> Maybe Text
settingName} -> Maybe Text
settingName) (\s :: OptionGroupOptionSetting
s@OptionGroupOptionSetting' {} Maybe Text
a -> OptionGroupOptionSetting
s {$sel:settingName:OptionGroupOptionSetting' :: Maybe Text
settingName = Maybe Text
a} :: OptionGroupOptionSetting)
optionGroupOptionSetting_defaultValue :: Lens.Lens' OptionGroupOptionSetting (Prelude.Maybe Prelude.Text)
optionGroupOptionSetting_defaultValue :: (Maybe Text -> f (Maybe Text))
-> OptionGroupOptionSetting -> f OptionGroupOptionSetting
optionGroupOptionSetting_defaultValue = (OptionGroupOptionSetting -> Maybe Text)
-> (OptionGroupOptionSetting
-> Maybe Text -> OptionGroupOptionSetting)
-> Lens
OptionGroupOptionSetting
OptionGroupOptionSetting
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OptionGroupOptionSetting' {Maybe Text
defaultValue :: Maybe Text
$sel:defaultValue:OptionGroupOptionSetting' :: OptionGroupOptionSetting -> Maybe Text
defaultValue} -> Maybe Text
defaultValue) (\s :: OptionGroupOptionSetting
s@OptionGroupOptionSetting' {} Maybe Text
a -> OptionGroupOptionSetting
s {$sel:defaultValue:OptionGroupOptionSetting' :: Maybe Text
defaultValue = Maybe Text
a} :: OptionGroupOptionSetting)
optionGroupOptionSetting_isModifiable :: Lens.Lens' OptionGroupOptionSetting (Prelude.Maybe Prelude.Bool)
optionGroupOptionSetting_isModifiable :: (Maybe Bool -> f (Maybe Bool))
-> OptionGroupOptionSetting -> f OptionGroupOptionSetting
optionGroupOptionSetting_isModifiable = (OptionGroupOptionSetting -> Maybe Bool)
-> (OptionGroupOptionSetting
-> Maybe Bool -> OptionGroupOptionSetting)
-> Lens
OptionGroupOptionSetting
OptionGroupOptionSetting
(Maybe Bool)
(Maybe Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OptionGroupOptionSetting' {Maybe Bool
isModifiable :: Maybe Bool
$sel:isModifiable:OptionGroupOptionSetting' :: OptionGroupOptionSetting -> Maybe Bool
isModifiable} -> Maybe Bool
isModifiable) (\s :: OptionGroupOptionSetting
s@OptionGroupOptionSetting' {} Maybe Bool
a -> OptionGroupOptionSetting
s {$sel:isModifiable:OptionGroupOptionSetting' :: Maybe Bool
isModifiable = Maybe Bool
a} :: OptionGroupOptionSetting)
optionGroupOptionSetting_settingDescription :: Lens.Lens' OptionGroupOptionSetting (Prelude.Maybe Prelude.Text)
optionGroupOptionSetting_settingDescription :: (Maybe Text -> f (Maybe Text))
-> OptionGroupOptionSetting -> f OptionGroupOptionSetting
optionGroupOptionSetting_settingDescription = (OptionGroupOptionSetting -> Maybe Text)
-> (OptionGroupOptionSetting
-> Maybe Text -> OptionGroupOptionSetting)
-> Lens
OptionGroupOptionSetting
OptionGroupOptionSetting
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OptionGroupOptionSetting' {Maybe Text
settingDescription :: Maybe Text
$sel:settingDescription:OptionGroupOptionSetting' :: OptionGroupOptionSetting -> Maybe Text
settingDescription} -> Maybe Text
settingDescription) (\s :: OptionGroupOptionSetting
s@OptionGroupOptionSetting' {} Maybe Text
a -> OptionGroupOptionSetting
s {$sel:settingDescription:OptionGroupOptionSetting' :: Maybe Text
settingDescription = Maybe Text
a} :: OptionGroupOptionSetting)
optionGroupOptionSetting_allowedValues :: Lens.Lens' OptionGroupOptionSetting (Prelude.Maybe Prelude.Text)
optionGroupOptionSetting_allowedValues :: (Maybe Text -> f (Maybe Text))
-> OptionGroupOptionSetting -> f OptionGroupOptionSetting
optionGroupOptionSetting_allowedValues = (OptionGroupOptionSetting -> Maybe Text)
-> (OptionGroupOptionSetting
-> Maybe Text -> OptionGroupOptionSetting)
-> Lens
OptionGroupOptionSetting
OptionGroupOptionSetting
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OptionGroupOptionSetting' {Maybe Text
allowedValues :: Maybe Text
$sel:allowedValues:OptionGroupOptionSetting' :: OptionGroupOptionSetting -> Maybe Text
allowedValues} -> Maybe Text
allowedValues) (\s :: OptionGroupOptionSetting
s@OptionGroupOptionSetting' {} Maybe Text
a -> OptionGroupOptionSetting
s {$sel:allowedValues:OptionGroupOptionSetting' :: Maybe Text
allowedValues = Maybe Text
a} :: OptionGroupOptionSetting)
optionGroupOptionSetting_isRequired :: Lens.Lens' OptionGroupOptionSetting (Prelude.Maybe Prelude.Bool)
optionGroupOptionSetting_isRequired :: (Maybe Bool -> f (Maybe Bool))
-> OptionGroupOptionSetting -> f OptionGroupOptionSetting
optionGroupOptionSetting_isRequired = (OptionGroupOptionSetting -> Maybe Bool)
-> (OptionGroupOptionSetting
-> Maybe Bool -> OptionGroupOptionSetting)
-> Lens
OptionGroupOptionSetting
OptionGroupOptionSetting
(Maybe Bool)
(Maybe Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\OptionGroupOptionSetting' {Maybe Bool
isRequired :: Maybe Bool
$sel:isRequired:OptionGroupOptionSetting' :: OptionGroupOptionSetting -> Maybe Bool
isRequired} -> Maybe Bool
isRequired) (\s :: OptionGroupOptionSetting
s@OptionGroupOptionSetting' {} Maybe Bool
a -> OptionGroupOptionSetting
s {$sel:isRequired:OptionGroupOptionSetting' :: Maybe Bool
isRequired = Maybe Bool
a} :: OptionGroupOptionSetting)
instance Core.FromXML OptionGroupOptionSetting where
parseXML :: [Node] -> Either String OptionGroupOptionSetting
parseXML [Node]
x =
Maybe Text
-> Maybe [MinimumEngineVersionPerAllowedValue]
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> OptionGroupOptionSetting
OptionGroupOptionSetting'
(Maybe Text
-> Maybe [MinimumEngineVersionPerAllowedValue]
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> OptionGroupOptionSetting)
-> Either String (Maybe Text)
-> Either
String
(Maybe [MinimumEngineVersionPerAllowedValue]
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> OptionGroupOptionSetting)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"ApplyType")
Either
String
(Maybe [MinimumEngineVersionPerAllowedValue]
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> OptionGroupOptionSetting)
-> Either String (Maybe [MinimumEngineVersionPerAllowedValue])
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> OptionGroupOptionSetting)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( [Node]
x [Node] -> Text -> Either String (Maybe [Node])
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"MinimumEngineVersionPerAllowedValue"
Either String (Maybe [Node]) -> [Node] -> Either String [Node]
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ [Node]
forall a. Monoid a => a
Prelude.mempty
Either String [Node]
-> ([Node]
-> Either String (Maybe [MinimumEngineVersionPerAllowedValue]))
-> Either String (Maybe [MinimumEngineVersionPerAllowedValue])
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
Prelude.>>= ([Node] -> Either String [MinimumEngineVersionPerAllowedValue])
-> [Node]
-> Either String (Maybe [MinimumEngineVersionPerAllowedValue])
forall (f :: * -> *) a b.
Applicative f =>
([a] -> f b) -> [a] -> f (Maybe b)
Core.may
( Text
-> [Node] -> Either String [MinimumEngineVersionPerAllowedValue]
forall a. FromXML a => Text -> [Node] -> Either String [a]
Core.parseXMLList
Text
"MinimumEngineVersionPerAllowedValue"
)
)
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> OptionGroupOptionSetting)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> OptionGroupOptionSetting)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"SettingName")
Either
String
(Maybe Text
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> OptionGroupOptionSetting)
-> Either String (Maybe Text)
-> Either
String
(Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> OptionGroupOptionSetting)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"DefaultValue")
Either
String
(Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> OptionGroupOptionSetting)
-> Either String (Maybe Bool)
-> Either
String
(Maybe Text
-> Maybe Text -> Maybe Bool -> OptionGroupOptionSetting)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Bool)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"IsModifiable")
Either
String
(Maybe Text
-> Maybe Text -> Maybe Bool -> OptionGroupOptionSetting)
-> Either String (Maybe Text)
-> Either
String (Maybe Text -> Maybe Bool -> OptionGroupOptionSetting)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"SettingDescription")
Either
String (Maybe Text -> Maybe Bool -> OptionGroupOptionSetting)
-> Either String (Maybe Text)
-> Either String (Maybe Bool -> OptionGroupOptionSetting)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"AllowedValues")
Either String (Maybe Bool -> OptionGroupOptionSetting)
-> Either String (Maybe Bool)
-> Either String OptionGroupOptionSetting
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Bool)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"IsRequired")
instance Prelude.Hashable OptionGroupOptionSetting
instance Prelude.NFData OptionGroupOptionSetting