module Stratosphere.Macie.FindingsFilter.CriterionAdditionalPropertiesProperty (
        CriterionAdditionalPropertiesProperty(..),
        mkCriterionAdditionalPropertiesProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data CriterionAdditionalPropertiesProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-macie-findingsfilter-criterionadditionalproperties.html>
    CriterionAdditionalPropertiesProperty {CriterionAdditionalPropertiesProperty -> ()
haddock_workaround_ :: (),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-macie-findingsfilter-criterionadditionalproperties.html#cfn-macie-findingsfilter-criterionadditionalproperties-eq>
                                           CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
eq :: (Prelude.Maybe (ValueList Prelude.Text)),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-macie-findingsfilter-criterionadditionalproperties.html#cfn-macie-findingsfilter-criterionadditionalproperties-gt>
                                           CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
gt :: (Prelude.Maybe (Value Prelude.Integer)),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-macie-findingsfilter-criterionadditionalproperties.html#cfn-macie-findingsfilter-criterionadditionalproperties-gte>
                                           CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
gte :: (Prelude.Maybe (Value Prelude.Integer)),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-macie-findingsfilter-criterionadditionalproperties.html#cfn-macie-findingsfilter-criterionadditionalproperties-lt>
                                           CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lt :: (Prelude.Maybe (Value Prelude.Integer)),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-macie-findingsfilter-criterionadditionalproperties.html#cfn-macie-findingsfilter-criterionadditionalproperties-lte>
                                           CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lte :: (Prelude.Maybe (Value Prelude.Integer)),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-macie-findingsfilter-criterionadditionalproperties.html#cfn-macie-findingsfilter-criterionadditionalproperties-neq>
                                           CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
neq :: (Prelude.Maybe (ValueList Prelude.Text))}
  deriving stock (CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty -> Bool
(CriterionAdditionalPropertiesProperty
 -> CriterionAdditionalPropertiesProperty -> Bool)
-> (CriterionAdditionalPropertiesProperty
    -> CriterionAdditionalPropertiesProperty -> Bool)
-> Eq CriterionAdditionalPropertiesProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty -> Bool
== :: CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty -> Bool
$c/= :: CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty -> Bool
/= :: CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty -> Bool
Prelude.Eq, Int -> CriterionAdditionalPropertiesProperty -> ShowS
[CriterionAdditionalPropertiesProperty] -> ShowS
CriterionAdditionalPropertiesProperty -> String
(Int -> CriterionAdditionalPropertiesProperty -> ShowS)
-> (CriterionAdditionalPropertiesProperty -> String)
-> ([CriterionAdditionalPropertiesProperty] -> ShowS)
-> Show CriterionAdditionalPropertiesProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CriterionAdditionalPropertiesProperty -> ShowS
showsPrec :: Int -> CriterionAdditionalPropertiesProperty -> ShowS
$cshow :: CriterionAdditionalPropertiesProperty -> String
show :: CriterionAdditionalPropertiesProperty -> String
$cshowList :: [CriterionAdditionalPropertiesProperty] -> ShowS
showList :: [CriterionAdditionalPropertiesProperty] -> ShowS
Prelude.Show)
mkCriterionAdditionalPropertiesProperty ::
  CriterionAdditionalPropertiesProperty
mkCriterionAdditionalPropertiesProperty :: CriterionAdditionalPropertiesProperty
mkCriterionAdditionalPropertiesProperty
  = CriterionAdditionalPropertiesProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), eq :: Maybe (ValueList Text)
eq = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
       gt :: Maybe (Value Integer)
gt = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, gte :: Maybe (Value Integer)
gte = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, lt :: Maybe (Value Integer)
lt = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       lte :: Maybe (Value Integer)
lte = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, neq :: Maybe (ValueList Text)
neq = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties CriterionAdditionalPropertiesProperty where
  toResourceProperties :: CriterionAdditionalPropertiesProperty -> ResourceProperties
toResourceProperties CriterionAdditionalPropertiesProperty {Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: CriterionAdditionalPropertiesProperty -> ()
eq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
gt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
gte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
neq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Macie::FindingsFilter.CriterionAdditionalProperties",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([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
"eq" (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)
eq, Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"gt" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
gt,
                            Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"gte" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
gte, Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"lt" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
lt,
                            Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"lte" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
lte, 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
"neq" (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)
neq])}
instance JSON.ToJSON CriterionAdditionalPropertiesProperty where
  toJSON :: CriterionAdditionalPropertiesProperty -> Value
toJSON CriterionAdditionalPropertiesProperty {Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: CriterionAdditionalPropertiesProperty -> ()
eq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
gt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
gte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
neq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([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
"eq" (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)
eq, Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"gt" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
gt,
               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"gte" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
gte, Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"lt" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
lt,
               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"lte" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
lte, 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
"neq" (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)
neq]))
instance Property "eq" CriterionAdditionalPropertiesProperty where
  type PropertyType "eq" CriterionAdditionalPropertiesProperty = ValueList Prelude.Text
  set :: PropertyType "eq" CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
set PropertyType "eq" CriterionAdditionalPropertiesProperty
newValue CriterionAdditionalPropertiesProperty {Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: CriterionAdditionalPropertiesProperty -> ()
eq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
gt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
gte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
neq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
    = CriterionAdditionalPropertiesProperty
        {eq :: Maybe (ValueList Text)
eq = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "eq" CriterionAdditionalPropertiesProperty
ValueList Text
newValue, Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
haddock_workaround_ :: ()
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
instance Property "gt" CriterionAdditionalPropertiesProperty where
  type PropertyType "gt" CriterionAdditionalPropertiesProperty = Value Prelude.Integer
  set :: PropertyType "gt" CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
set PropertyType "gt" CriterionAdditionalPropertiesProperty
newValue CriterionAdditionalPropertiesProperty {Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: CriterionAdditionalPropertiesProperty -> ()
eq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
gt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
gte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
neq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
    = CriterionAdditionalPropertiesProperty
        {gt :: Maybe (Value Integer)
gt = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "gt" CriterionAdditionalPropertiesProperty
Value Integer
newValue, Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
instance Property "gte" CriterionAdditionalPropertiesProperty where
  type PropertyType "gte" CriterionAdditionalPropertiesProperty = Value Prelude.Integer
  set :: PropertyType "gte" CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
set PropertyType "gte" CriterionAdditionalPropertiesProperty
newValue CriterionAdditionalPropertiesProperty {Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: CriterionAdditionalPropertiesProperty -> ()
eq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
gt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
gte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
neq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
    = CriterionAdditionalPropertiesProperty
        {gte :: Maybe (Value Integer)
gte = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "gte" CriterionAdditionalPropertiesProperty
Value Integer
newValue, Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
instance Property "lt" CriterionAdditionalPropertiesProperty where
  type PropertyType "lt" CriterionAdditionalPropertiesProperty = Value Prelude.Integer
  set :: PropertyType "lt" CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
set PropertyType "lt" CriterionAdditionalPropertiesProperty
newValue CriterionAdditionalPropertiesProperty {Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: CriterionAdditionalPropertiesProperty -> ()
eq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
gt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
gte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
neq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
    = CriterionAdditionalPropertiesProperty
        {lt :: Maybe (Value Integer)
lt = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "lt" CriterionAdditionalPropertiesProperty
Value Integer
newValue, Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
instance Property "lte" CriterionAdditionalPropertiesProperty where
  type PropertyType "lte" CriterionAdditionalPropertiesProperty = Value Prelude.Integer
  set :: PropertyType "lte" CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
set PropertyType "lte" CriterionAdditionalPropertiesProperty
newValue CriterionAdditionalPropertiesProperty {Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: CriterionAdditionalPropertiesProperty -> ()
eq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
gt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
gte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
neq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
    = CriterionAdditionalPropertiesProperty
        {lte :: Maybe (Value Integer)
lte = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "lte" CriterionAdditionalPropertiesProperty
Value Integer
newValue, Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
instance Property "neq" CriterionAdditionalPropertiesProperty where
  type PropertyType "neq" CriterionAdditionalPropertiesProperty = ValueList Prelude.Text
  set :: PropertyType "neq" CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
-> CriterionAdditionalPropertiesProperty
set PropertyType "neq" CriterionAdditionalPropertiesProperty
newValue CriterionAdditionalPropertiesProperty {Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: CriterionAdditionalPropertiesProperty -> ()
eq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
gt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
gte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lt :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
lte :: CriterionAdditionalPropertiesProperty -> Maybe (Value Integer)
neq :: CriterionAdditionalPropertiesProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
neq :: Maybe (ValueList Text)
..}
    = CriterionAdditionalPropertiesProperty
        {neq :: Maybe (ValueList Text)
neq = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "neq" CriterionAdditionalPropertiesProperty
ValueList Text
newValue, Maybe (ValueList Text)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
haddock_workaround_ :: ()
eq :: Maybe (ValueList Text)
gt :: Maybe (Value Integer)
gte :: Maybe (Value Integer)
lt :: Maybe (Value Integer)
lte :: Maybe (Value Integer)
..}