module Stratosphere.CloudTrail.EventDataStore.AdvancedFieldSelectorProperty (
AdvancedFieldSelectorProperty(..), mkAdvancedFieldSelectorProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data AdvancedFieldSelectorProperty
=
AdvancedFieldSelectorProperty {AdvancedFieldSelectorProperty -> ()
haddock_workaround_ :: (),
AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
endsWith :: (Prelude.Maybe (ValueList Prelude.Text)),
AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
equals :: (Prelude.Maybe (ValueList Prelude.Text)),
AdvancedFieldSelectorProperty -> Value Text
field :: (Value Prelude.Text),
AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notEndsWith :: (Prelude.Maybe (ValueList Prelude.Text)),
AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notEquals :: (Prelude.Maybe (ValueList Prelude.Text)),
AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notStartsWith :: (Prelude.Maybe (ValueList Prelude.Text)),
AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
startsWith :: (Prelude.Maybe (ValueList Prelude.Text))}
deriving stock (AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> Bool
(AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> Bool)
-> (AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> Bool)
-> Eq AdvancedFieldSelectorProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> Bool
== :: AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> Bool
$c/= :: AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> Bool
/= :: AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> Bool
Prelude.Eq, Int -> AdvancedFieldSelectorProperty -> ShowS
[AdvancedFieldSelectorProperty] -> ShowS
AdvancedFieldSelectorProperty -> String
(Int -> AdvancedFieldSelectorProperty -> ShowS)
-> (AdvancedFieldSelectorProperty -> String)
-> ([AdvancedFieldSelectorProperty] -> ShowS)
-> Show AdvancedFieldSelectorProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AdvancedFieldSelectorProperty -> ShowS
showsPrec :: Int -> AdvancedFieldSelectorProperty -> ShowS
$cshow :: AdvancedFieldSelectorProperty -> String
show :: AdvancedFieldSelectorProperty -> String
$cshowList :: [AdvancedFieldSelectorProperty] -> ShowS
showList :: [AdvancedFieldSelectorProperty] -> ShowS
Prelude.Show)
mkAdvancedFieldSelectorProperty ::
Value Prelude.Text -> AdvancedFieldSelectorProperty
mkAdvancedFieldSelectorProperty :: Value Text -> AdvancedFieldSelectorProperty
mkAdvancedFieldSelectorProperty Value Text
field
= AdvancedFieldSelectorProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), field :: Value Text
field = Value Text
field,
endsWith :: Maybe (ValueList Text)
endsWith = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, equals :: Maybe (ValueList Text)
equals = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
notEndsWith :: Maybe (ValueList Text)
notEndsWith = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, notEquals :: Maybe (ValueList Text)
notEquals = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
notStartsWith :: Maybe (ValueList Text)
notStartsWith = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, startsWith :: Maybe (ValueList Text)
startsWith = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties AdvancedFieldSelectorProperty where
toResourceProperties :: AdvancedFieldSelectorProperty -> ResourceProperties
toResourceProperties AdvancedFieldSelectorProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: AdvancedFieldSelectorProperty -> ()
endsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
equals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
field :: AdvancedFieldSelectorProperty -> Value Text
notEndsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notEquals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notStartsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
startsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::CloudTrail::EventDataStore.AdvancedFieldSelector",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"Field" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
field]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EndsWith" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
endsWith,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Equals" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
equals,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"NotEndsWith" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
notEndsWith,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"NotEquals" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
notEquals,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"NotStartsWith" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
notStartsWith,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"StartsWith" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
startsWith]))}
instance JSON.ToJSON AdvancedFieldSelectorProperty where
toJSON :: AdvancedFieldSelectorProperty -> Value
toJSON AdvancedFieldSelectorProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: AdvancedFieldSelectorProperty -> ()
endsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
equals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
field :: AdvancedFieldSelectorProperty -> Value Text
notEndsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notEquals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notStartsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
startsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
= [(Key, Value)] -> Value
JSON.object
([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"Field" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
field]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EndsWith" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
endsWith,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Equals" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
equals,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"NotEndsWith" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
notEndsWith,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"NotEquals" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
notEquals,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"NotStartsWith" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
notStartsWith,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"StartsWith" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
startsWith])))
instance Property "EndsWith" AdvancedFieldSelectorProperty where
type PropertyType "EndsWith" AdvancedFieldSelectorProperty = ValueList Prelude.Text
set :: PropertyType "EndsWith" AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> AdvancedFieldSelectorProperty
set PropertyType "EndsWith" AdvancedFieldSelectorProperty
newValue AdvancedFieldSelectorProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: AdvancedFieldSelectorProperty -> ()
endsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
equals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
field :: AdvancedFieldSelectorProperty -> Value Text
notEndsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notEquals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notStartsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
startsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
= AdvancedFieldSelectorProperty
{endsWith :: Maybe (ValueList Text)
endsWith = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EndsWith" AdvancedFieldSelectorProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: ()
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
haddock_workaround_ :: ()
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
instance Property "Equals" AdvancedFieldSelectorProperty where
type PropertyType "Equals" AdvancedFieldSelectorProperty = ValueList Prelude.Text
set :: PropertyType "Equals" AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> AdvancedFieldSelectorProperty
set PropertyType "Equals" AdvancedFieldSelectorProperty
newValue AdvancedFieldSelectorProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: AdvancedFieldSelectorProperty -> ()
endsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
equals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
field :: AdvancedFieldSelectorProperty -> Value Text
notEndsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notEquals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notStartsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
startsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
= AdvancedFieldSelectorProperty
{equals :: Maybe (ValueList Text)
equals = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Equals" AdvancedFieldSelectorProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
instance Property "Field" AdvancedFieldSelectorProperty where
type PropertyType "Field" AdvancedFieldSelectorProperty = Value Prelude.Text
set :: PropertyType "Field" AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> AdvancedFieldSelectorProperty
set PropertyType "Field" AdvancedFieldSelectorProperty
newValue AdvancedFieldSelectorProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: AdvancedFieldSelectorProperty -> ()
endsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
equals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
field :: AdvancedFieldSelectorProperty -> Value Text
notEndsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notEquals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notStartsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
startsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
= AdvancedFieldSelectorProperty {field :: Value Text
field = PropertyType "Field" AdvancedFieldSelectorProperty
Value Text
newValue, Maybe (ValueList Text)
()
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
instance Property "NotEndsWith" AdvancedFieldSelectorProperty where
type PropertyType "NotEndsWith" AdvancedFieldSelectorProperty = ValueList Prelude.Text
set :: PropertyType "NotEndsWith" AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> AdvancedFieldSelectorProperty
set PropertyType "NotEndsWith" AdvancedFieldSelectorProperty
newValue AdvancedFieldSelectorProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: AdvancedFieldSelectorProperty -> ()
endsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
equals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
field :: AdvancedFieldSelectorProperty -> Value Text
notEndsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notEquals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notStartsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
startsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
= AdvancedFieldSelectorProperty
{notEndsWith :: Maybe (ValueList Text)
notEndsWith = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "NotEndsWith" AdvancedFieldSelectorProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
instance Property "NotEquals" AdvancedFieldSelectorProperty where
type PropertyType "NotEquals" AdvancedFieldSelectorProperty = ValueList Prelude.Text
set :: PropertyType "NotEquals" AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> AdvancedFieldSelectorProperty
set PropertyType "NotEquals" AdvancedFieldSelectorProperty
newValue AdvancedFieldSelectorProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: AdvancedFieldSelectorProperty -> ()
endsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
equals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
field :: AdvancedFieldSelectorProperty -> Value Text
notEndsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notEquals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notStartsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
startsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
= AdvancedFieldSelectorProperty
{notEquals :: Maybe (ValueList Text)
notEquals = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "NotEquals" AdvancedFieldSelectorProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
instance Property "NotStartsWith" AdvancedFieldSelectorProperty where
type PropertyType "NotStartsWith" AdvancedFieldSelectorProperty = ValueList Prelude.Text
set :: PropertyType "NotStartsWith" AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> AdvancedFieldSelectorProperty
set PropertyType "NotStartsWith" AdvancedFieldSelectorProperty
newValue AdvancedFieldSelectorProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: AdvancedFieldSelectorProperty -> ()
endsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
equals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
field :: AdvancedFieldSelectorProperty -> Value Text
notEndsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notEquals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notStartsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
startsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
= AdvancedFieldSelectorProperty
{notStartsWith :: Maybe (ValueList Text)
notStartsWith = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "NotStartsWith" AdvancedFieldSelectorProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
instance Property "StartsWith" AdvancedFieldSelectorProperty where
type PropertyType "StartsWith" AdvancedFieldSelectorProperty = ValueList Prelude.Text
set :: PropertyType "StartsWith" AdvancedFieldSelectorProperty
-> AdvancedFieldSelectorProperty -> AdvancedFieldSelectorProperty
set PropertyType "StartsWith" AdvancedFieldSelectorProperty
newValue AdvancedFieldSelectorProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: AdvancedFieldSelectorProperty -> ()
endsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
equals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
field :: AdvancedFieldSelectorProperty -> Value Text
notEndsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notEquals :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
notStartsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
startsWith :: AdvancedFieldSelectorProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
startsWith :: Maybe (ValueList Text)
..}
= AdvancedFieldSelectorProperty
{startsWith :: Maybe (ValueList Text)
startsWith = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "StartsWith" AdvancedFieldSelectorProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
haddock_workaround_ :: ()
endsWith :: Maybe (ValueList Text)
equals :: Maybe (ValueList Text)
field :: Value Text
notEndsWith :: Maybe (ValueList Text)
notEquals :: Maybe (ValueList Text)
notStartsWith :: Maybe (ValueList Text)
..}