{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE TypeOperators #-}
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Network.Google.Resource.Container.Projects.Zones.Clusters.NodePools.Delete
(
ProjectsZonesClustersNodePoolsDeleteResource
, projectsZonesClustersNodePoolsDelete
, ProjectsZonesClustersNodePoolsDelete
, pzcnpdXgafv
, pzcnpdUploadProtocol
, pzcnpdAccessToken
, pzcnpdUploadType
, pzcnpdZone
, pzcnpdNodePoolId
, pzcnpdName
, pzcnpdClusterId
, pzcnpdProjectId
, pzcnpdCallback
) where
import Network.Google.Container.Types
import Network.Google.Prelude
type ProjectsZonesClustersNodePoolsDeleteResource =
"v1" :>
"projects" :>
Capture "projectId" Text :>
"zones" :>
Capture "zone" Text :>
"clusters" :>
Capture "clusterId" Text :>
"nodePools" :>
Capture "nodePoolId" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "name" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Delete '[JSON] Operation
data ProjectsZonesClustersNodePoolsDelete = ProjectsZonesClustersNodePoolsDelete'
{ _pzcnpdXgafv :: !(Maybe Xgafv)
, _pzcnpdUploadProtocol :: !(Maybe Text)
, _pzcnpdAccessToken :: !(Maybe Text)
, _pzcnpdUploadType :: !(Maybe Text)
, _pzcnpdZone :: !Text
, _pzcnpdNodePoolId :: !Text
, _pzcnpdName :: !(Maybe Text)
, _pzcnpdClusterId :: !Text
, _pzcnpdProjectId :: !Text
, _pzcnpdCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsZonesClustersNodePoolsDelete
:: Text
-> Text
-> Text
-> Text
-> ProjectsZonesClustersNodePoolsDelete
projectsZonesClustersNodePoolsDelete pPzcnpdZone_ pPzcnpdNodePoolId_ pPzcnpdClusterId_ pPzcnpdProjectId_ =
ProjectsZonesClustersNodePoolsDelete'
{ _pzcnpdXgafv = Nothing
, _pzcnpdUploadProtocol = Nothing
, _pzcnpdAccessToken = Nothing
, _pzcnpdUploadType = Nothing
, _pzcnpdZone = pPzcnpdZone_
, _pzcnpdNodePoolId = pPzcnpdNodePoolId_
, _pzcnpdName = Nothing
, _pzcnpdClusterId = pPzcnpdClusterId_
, _pzcnpdProjectId = pPzcnpdProjectId_
, _pzcnpdCallback = Nothing
}
pzcnpdXgafv :: Lens' ProjectsZonesClustersNodePoolsDelete (Maybe Xgafv)
pzcnpdXgafv
= lens _pzcnpdXgafv (\ s a -> s{_pzcnpdXgafv = a})
pzcnpdUploadProtocol :: Lens' ProjectsZonesClustersNodePoolsDelete (Maybe Text)
pzcnpdUploadProtocol
= lens _pzcnpdUploadProtocol
(\ s a -> s{_pzcnpdUploadProtocol = a})
pzcnpdAccessToken :: Lens' ProjectsZonesClustersNodePoolsDelete (Maybe Text)
pzcnpdAccessToken
= lens _pzcnpdAccessToken
(\ s a -> s{_pzcnpdAccessToken = a})
pzcnpdUploadType :: Lens' ProjectsZonesClustersNodePoolsDelete (Maybe Text)
pzcnpdUploadType
= lens _pzcnpdUploadType
(\ s a -> s{_pzcnpdUploadType = a})
pzcnpdZone :: Lens' ProjectsZonesClustersNodePoolsDelete Text
pzcnpdZone
= lens _pzcnpdZone (\ s a -> s{_pzcnpdZone = a})
pzcnpdNodePoolId :: Lens' ProjectsZonesClustersNodePoolsDelete Text
pzcnpdNodePoolId
= lens _pzcnpdNodePoolId
(\ s a -> s{_pzcnpdNodePoolId = a})
pzcnpdName :: Lens' ProjectsZonesClustersNodePoolsDelete (Maybe Text)
pzcnpdName
= lens _pzcnpdName (\ s a -> s{_pzcnpdName = a})
pzcnpdClusterId :: Lens' ProjectsZonesClustersNodePoolsDelete Text
pzcnpdClusterId
= lens _pzcnpdClusterId
(\ s a -> s{_pzcnpdClusterId = a})
pzcnpdProjectId :: Lens' ProjectsZonesClustersNodePoolsDelete Text
pzcnpdProjectId
= lens _pzcnpdProjectId
(\ s a -> s{_pzcnpdProjectId = a})
pzcnpdCallback :: Lens' ProjectsZonesClustersNodePoolsDelete (Maybe Text)
pzcnpdCallback
= lens _pzcnpdCallback
(\ s a -> s{_pzcnpdCallback = a})
instance GoogleRequest
ProjectsZonesClustersNodePoolsDelete where
type Rs ProjectsZonesClustersNodePoolsDelete =
Operation
type Scopes ProjectsZonesClustersNodePoolsDelete =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient
ProjectsZonesClustersNodePoolsDelete'{..}
= go _pzcnpdProjectId _pzcnpdZone _pzcnpdClusterId
_pzcnpdNodePoolId
_pzcnpdXgafv
_pzcnpdUploadProtocol
_pzcnpdAccessToken
_pzcnpdUploadType
_pzcnpdName
_pzcnpdCallback
(Just AltJSON)
containerService
where go
= buildClient
(Proxy ::
Proxy ProjectsZonesClustersNodePoolsDeleteResource)
mempty