{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.OpsWorks.Types.InstancesCount
-- Copyright   : (c) 2013-2021 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.OpsWorks.Types.InstancesCount where

import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude

-- | Describes how many instances a stack has for each status.
--
-- /See:/ 'newInstancesCount' smart constructor.
data InstancesCount = InstancesCount'
  { -- | The number of instances with @terminating@ status.
    InstancesCount -> Maybe Int
terminating :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @pending@ status.
    InstancesCount -> Maybe Int
pending :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @online@ status.
    InstancesCount -> Maybe Int
online :: Prelude.Maybe Prelude.Int,
    -- | The number of instances in the Unassigning state.
    InstancesCount -> Maybe Int
unassigning :: Prelude.Maybe Prelude.Int,
    -- | The number of instances in the Deregistering state.
    InstancesCount -> Maybe Int
deregistering :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @running_setup@ status.
    InstancesCount -> Maybe Int
runningSetup :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @requested@ status.
    InstancesCount -> Maybe Int
requested :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @stop_failed@ status.
    InstancesCount -> Maybe Int
stopFailed :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @booting@ status.
    InstancesCount -> Maybe Int
booting :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @stopped@ status.
    InstancesCount -> Maybe Int
stopped :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @rebooting@ status.
    InstancesCount -> Maybe Int
rebooting :: Prelude.Maybe Prelude.Int,
    -- | The number of instances in the Assigning state.
    InstancesCount -> Maybe Int
assigning :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @shutting_down@ status.
    InstancesCount -> Maybe Int
shuttingDown :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @setup_failed@ status.
    InstancesCount -> Maybe Int
setupFailed :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @connection_lost@ status.
    InstancesCount -> Maybe Int
connectionLost :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @terminated@ status.
    InstancesCount -> Maybe Int
terminated :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @stopping@ status.
    InstancesCount -> Maybe Int
stopping :: Prelude.Maybe Prelude.Int,
    -- | The number of instances in the Registered state.
    InstancesCount -> Maybe Int
registered :: Prelude.Maybe Prelude.Int,
    -- | The number of instances with @start_failed@ status.
    InstancesCount -> Maybe Int
startFailed :: Prelude.Maybe Prelude.Int,
    -- | The number of instances in the Registering state.
    InstancesCount -> Maybe Int
registering :: Prelude.Maybe Prelude.Int
  }
  deriving (InstancesCount -> InstancesCount -> Bool
(InstancesCount -> InstancesCount -> Bool)
-> (InstancesCount -> InstancesCount -> Bool) -> Eq InstancesCount
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InstancesCount -> InstancesCount -> Bool
$c/= :: InstancesCount -> InstancesCount -> Bool
== :: InstancesCount -> InstancesCount -> Bool
$c== :: InstancesCount -> InstancesCount -> Bool
Prelude.Eq, ReadPrec [InstancesCount]
ReadPrec InstancesCount
Int -> ReadS InstancesCount
ReadS [InstancesCount]
(Int -> ReadS InstancesCount)
-> ReadS [InstancesCount]
-> ReadPrec InstancesCount
-> ReadPrec [InstancesCount]
-> Read InstancesCount
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [InstancesCount]
$creadListPrec :: ReadPrec [InstancesCount]
readPrec :: ReadPrec InstancesCount
$creadPrec :: ReadPrec InstancesCount
readList :: ReadS [InstancesCount]
$creadList :: ReadS [InstancesCount]
readsPrec :: Int -> ReadS InstancesCount
$creadsPrec :: Int -> ReadS InstancesCount
Prelude.Read, Int -> InstancesCount -> ShowS
[InstancesCount] -> ShowS
InstancesCount -> String
(Int -> InstancesCount -> ShowS)
-> (InstancesCount -> String)
-> ([InstancesCount] -> ShowS)
-> Show InstancesCount
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InstancesCount] -> ShowS
$cshowList :: [InstancesCount] -> ShowS
show :: InstancesCount -> String
$cshow :: InstancesCount -> String
showsPrec :: Int -> InstancesCount -> ShowS
$cshowsPrec :: Int -> InstancesCount -> ShowS
Prelude.Show, (forall x. InstancesCount -> Rep InstancesCount x)
-> (forall x. Rep InstancesCount x -> InstancesCount)
-> Generic InstancesCount
forall x. Rep InstancesCount x -> InstancesCount
forall x. InstancesCount -> Rep InstancesCount x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep InstancesCount x -> InstancesCount
$cfrom :: forall x. InstancesCount -> Rep InstancesCount x
Prelude.Generic)

-- |
-- Create a value of 'InstancesCount' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'terminating', 'instancesCount_terminating' - The number of instances with @terminating@ status.
--
-- 'pending', 'instancesCount_pending' - The number of instances with @pending@ status.
--
-- 'online', 'instancesCount_online' - The number of instances with @online@ status.
--
-- 'unassigning', 'instancesCount_unassigning' - The number of instances in the Unassigning state.
--
-- 'deregistering', 'instancesCount_deregistering' - The number of instances in the Deregistering state.
--
-- 'runningSetup', 'instancesCount_runningSetup' - The number of instances with @running_setup@ status.
--
-- 'requested', 'instancesCount_requested' - The number of instances with @requested@ status.
--
-- 'stopFailed', 'instancesCount_stopFailed' - The number of instances with @stop_failed@ status.
--
-- 'booting', 'instancesCount_booting' - The number of instances with @booting@ status.
--
-- 'stopped', 'instancesCount_stopped' - The number of instances with @stopped@ status.
--
-- 'rebooting', 'instancesCount_rebooting' - The number of instances with @rebooting@ status.
--
-- 'assigning', 'instancesCount_assigning' - The number of instances in the Assigning state.
--
-- 'shuttingDown', 'instancesCount_shuttingDown' - The number of instances with @shutting_down@ status.
--
-- 'setupFailed', 'instancesCount_setupFailed' - The number of instances with @setup_failed@ status.
--
-- 'connectionLost', 'instancesCount_connectionLost' - The number of instances with @connection_lost@ status.
--
-- 'terminated', 'instancesCount_terminated' - The number of instances with @terminated@ status.
--
-- 'stopping', 'instancesCount_stopping' - The number of instances with @stopping@ status.
--
-- 'registered', 'instancesCount_registered' - The number of instances in the Registered state.
--
-- 'startFailed', 'instancesCount_startFailed' - The number of instances with @start_failed@ status.
--
-- 'registering', 'instancesCount_registering' - The number of instances in the Registering state.
newInstancesCount ::
  InstancesCount
newInstancesCount :: InstancesCount
newInstancesCount =
  InstancesCount' :: Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> InstancesCount
InstancesCount'
    { $sel:terminating:InstancesCount' :: Maybe Int
terminating = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:pending:InstancesCount' :: Maybe Int
pending = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:online:InstancesCount' :: Maybe Int
online = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:unassigning:InstancesCount' :: Maybe Int
unassigning = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:deregistering:InstancesCount' :: Maybe Int
deregistering = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:runningSetup:InstancesCount' :: Maybe Int
runningSetup = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:requested:InstancesCount' :: Maybe Int
requested = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:stopFailed:InstancesCount' :: Maybe Int
stopFailed = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:booting:InstancesCount' :: Maybe Int
booting = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:stopped:InstancesCount' :: Maybe Int
stopped = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:rebooting:InstancesCount' :: Maybe Int
rebooting = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:assigning:InstancesCount' :: Maybe Int
assigning = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:shuttingDown:InstancesCount' :: Maybe Int
shuttingDown = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:setupFailed:InstancesCount' :: Maybe Int
setupFailed = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:connectionLost:InstancesCount' :: Maybe Int
connectionLost = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:terminated:InstancesCount' :: Maybe Int
terminated = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:stopping:InstancesCount' :: Maybe Int
stopping = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:registered:InstancesCount' :: Maybe Int
registered = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:startFailed:InstancesCount' :: Maybe Int
startFailed = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:registering:InstancesCount' :: Maybe Int
registering = Maybe Int
forall a. Maybe a
Prelude.Nothing
    }

-- | The number of instances with @terminating@ status.
instancesCount_terminating :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_terminating :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_terminating = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
terminating :: Maybe Int
$sel:terminating:InstancesCount' :: InstancesCount -> Maybe Int
terminating} -> Maybe Int
terminating) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:terminating:InstancesCount' :: Maybe Int
terminating = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @pending@ status.
instancesCount_pending :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_pending :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_pending = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
pending :: Maybe Int
$sel:pending:InstancesCount' :: InstancesCount -> Maybe Int
pending} -> Maybe Int
pending) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:pending:InstancesCount' :: Maybe Int
pending = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @online@ status.
instancesCount_online :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_online :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_online = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
online :: Maybe Int
$sel:online:InstancesCount' :: InstancesCount -> Maybe Int
online} -> Maybe Int
online) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:online:InstancesCount' :: Maybe Int
online = Maybe Int
a} :: InstancesCount)

-- | The number of instances in the Unassigning state.
instancesCount_unassigning :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_unassigning :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_unassigning = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
unassigning :: Maybe Int
$sel:unassigning:InstancesCount' :: InstancesCount -> Maybe Int
unassigning} -> Maybe Int
unassigning) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:unassigning:InstancesCount' :: Maybe Int
unassigning = Maybe Int
a} :: InstancesCount)

-- | The number of instances in the Deregistering state.
instancesCount_deregistering :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_deregistering :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_deregistering = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
deregistering :: Maybe Int
$sel:deregistering:InstancesCount' :: InstancesCount -> Maybe Int
deregistering} -> Maybe Int
deregistering) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:deregistering:InstancesCount' :: Maybe Int
deregistering = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @running_setup@ status.
instancesCount_runningSetup :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_runningSetup :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_runningSetup = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
runningSetup :: Maybe Int
$sel:runningSetup:InstancesCount' :: InstancesCount -> Maybe Int
runningSetup} -> Maybe Int
runningSetup) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:runningSetup:InstancesCount' :: Maybe Int
runningSetup = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @requested@ status.
instancesCount_requested :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_requested :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_requested = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
requested :: Maybe Int
$sel:requested:InstancesCount' :: InstancesCount -> Maybe Int
requested} -> Maybe Int
requested) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:requested:InstancesCount' :: Maybe Int
requested = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @stop_failed@ status.
instancesCount_stopFailed :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_stopFailed :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_stopFailed = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
stopFailed :: Maybe Int
$sel:stopFailed:InstancesCount' :: InstancesCount -> Maybe Int
stopFailed} -> Maybe Int
stopFailed) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:stopFailed:InstancesCount' :: Maybe Int
stopFailed = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @booting@ status.
instancesCount_booting :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_booting :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_booting = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
booting :: Maybe Int
$sel:booting:InstancesCount' :: InstancesCount -> Maybe Int
booting} -> Maybe Int
booting) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:booting:InstancesCount' :: Maybe Int
booting = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @stopped@ status.
instancesCount_stopped :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_stopped :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_stopped = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
stopped :: Maybe Int
$sel:stopped:InstancesCount' :: InstancesCount -> Maybe Int
stopped} -> Maybe Int
stopped) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:stopped:InstancesCount' :: Maybe Int
stopped = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @rebooting@ status.
instancesCount_rebooting :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_rebooting :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_rebooting = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
rebooting :: Maybe Int
$sel:rebooting:InstancesCount' :: InstancesCount -> Maybe Int
rebooting} -> Maybe Int
rebooting) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:rebooting:InstancesCount' :: Maybe Int
rebooting = Maybe Int
a} :: InstancesCount)

-- | The number of instances in the Assigning state.
instancesCount_assigning :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_assigning :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_assigning = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
assigning :: Maybe Int
$sel:assigning:InstancesCount' :: InstancesCount -> Maybe Int
assigning} -> Maybe Int
assigning) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:assigning:InstancesCount' :: Maybe Int
assigning = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @shutting_down@ status.
instancesCount_shuttingDown :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_shuttingDown :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_shuttingDown = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
shuttingDown :: Maybe Int
$sel:shuttingDown:InstancesCount' :: InstancesCount -> Maybe Int
shuttingDown} -> Maybe Int
shuttingDown) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:shuttingDown:InstancesCount' :: Maybe Int
shuttingDown = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @setup_failed@ status.
instancesCount_setupFailed :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_setupFailed :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_setupFailed = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
setupFailed :: Maybe Int
$sel:setupFailed:InstancesCount' :: InstancesCount -> Maybe Int
setupFailed} -> Maybe Int
setupFailed) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:setupFailed:InstancesCount' :: Maybe Int
setupFailed = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @connection_lost@ status.
instancesCount_connectionLost :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_connectionLost :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_connectionLost = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
connectionLost :: Maybe Int
$sel:connectionLost:InstancesCount' :: InstancesCount -> Maybe Int
connectionLost} -> Maybe Int
connectionLost) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:connectionLost:InstancesCount' :: Maybe Int
connectionLost = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @terminated@ status.
instancesCount_terminated :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_terminated :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_terminated = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
terminated :: Maybe Int
$sel:terminated:InstancesCount' :: InstancesCount -> Maybe Int
terminated} -> Maybe Int
terminated) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:terminated:InstancesCount' :: Maybe Int
terminated = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @stopping@ status.
instancesCount_stopping :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_stopping :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_stopping = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
stopping :: Maybe Int
$sel:stopping:InstancesCount' :: InstancesCount -> Maybe Int
stopping} -> Maybe Int
stopping) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:stopping:InstancesCount' :: Maybe Int
stopping = Maybe Int
a} :: InstancesCount)

-- | The number of instances in the Registered state.
instancesCount_registered :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_registered :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_registered = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
registered :: Maybe Int
$sel:registered:InstancesCount' :: InstancesCount -> Maybe Int
registered} -> Maybe Int
registered) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:registered:InstancesCount' :: Maybe Int
registered = Maybe Int
a} :: InstancesCount)

-- | The number of instances with @start_failed@ status.
instancesCount_startFailed :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_startFailed :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_startFailed = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
startFailed :: Maybe Int
$sel:startFailed:InstancesCount' :: InstancesCount -> Maybe Int
startFailed} -> Maybe Int
startFailed) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:startFailed:InstancesCount' :: Maybe Int
startFailed = Maybe Int
a} :: InstancesCount)

-- | The number of instances in the Registering state.
instancesCount_registering :: Lens.Lens' InstancesCount (Prelude.Maybe Prelude.Int)
instancesCount_registering :: (Maybe Int -> f (Maybe Int)) -> InstancesCount -> f InstancesCount
instancesCount_registering = (InstancesCount -> Maybe Int)
-> (InstancesCount -> Maybe Int -> InstancesCount)
-> Lens InstancesCount InstancesCount (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InstancesCount' {Maybe Int
registering :: Maybe Int
$sel:registering:InstancesCount' :: InstancesCount -> Maybe Int
registering} -> Maybe Int
registering) (\s :: InstancesCount
s@InstancesCount' {} Maybe Int
a -> InstancesCount
s {$sel:registering:InstancesCount' :: Maybe Int
registering = Maybe Int
a} :: InstancesCount)

instance Core.FromJSON InstancesCount where
  parseJSON :: Value -> Parser InstancesCount
parseJSON =
    String
-> (Object -> Parser InstancesCount)
-> Value
-> Parser InstancesCount
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
      String
"InstancesCount"
      ( \Object
x ->
          Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> InstancesCount
InstancesCount'
            (Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> Maybe Int
 -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Terminating")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Pending")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Online")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Unassigning")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Deregistering")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"RunningSetup")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Requested")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"StopFailed")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Booting")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Stopped")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Rebooting")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Assigning")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"ShuttingDown")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"SetupFailed")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> Maybe Int
      -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"ConnectionLost")
            Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> Maybe Int
   -> InstancesCount)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Int -> Maybe Int -> Maybe Int -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Terminated")
            Parser
  (Maybe Int
   -> Maybe Int -> Maybe Int -> Maybe Int -> InstancesCount)
-> Parser (Maybe Int)
-> Parser (Maybe Int -> Maybe Int -> Maybe Int -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Stopping")
            Parser (Maybe Int -> Maybe Int -> Maybe Int -> InstancesCount)
-> Parser (Maybe Int)
-> Parser (Maybe Int -> Maybe Int -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Registered")
            Parser (Maybe Int -> Maybe Int -> InstancesCount)
-> Parser (Maybe Int) -> Parser (Maybe Int -> InstancesCount)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"StartFailed")
            Parser (Maybe Int -> InstancesCount)
-> Parser (Maybe Int) -> Parser InstancesCount
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Registering")
      )

instance Prelude.Hashable InstancesCount

instance Prelude.NFData InstancesCount