module Network.Google.Resource.Ml.Projects.Models.List
(
ProjectsModelsListResource
, projectsModelsList
, ProjectsModelsList
, pmlParent
, pmlXgafv
, pmlUploadProtocol
, pmlPp
, pmlAccessToken
, pmlUploadType
, pmlBearerToken
, pmlPageToken
, pmlPageSize
, pmlCallback
) where
import Network.Google.MachineLearning.Types
import Network.Google.Prelude
type ProjectsModelsListResource =
"v1beta1" :>
Capture "parent" Text :>
"models" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "bearer_token" Text :>
QueryParam "pageToken" Text :>
QueryParam "pageSize" (Textual Int32) :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON]
GoogleCloudMlV1beta1__ListModelsResponse
data ProjectsModelsList = ProjectsModelsList'
{ _pmlParent :: !Text
, _pmlXgafv :: !(Maybe Xgafv)
, _pmlUploadProtocol :: !(Maybe Text)
, _pmlPp :: !Bool
, _pmlAccessToken :: !(Maybe Text)
, _pmlUploadType :: !(Maybe Text)
, _pmlBearerToken :: !(Maybe Text)
, _pmlPageToken :: !(Maybe Text)
, _pmlPageSize :: !(Maybe (Textual Int32))
, _pmlCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsModelsList
:: Text
-> ProjectsModelsList
projectsModelsList pPmlParent_ =
ProjectsModelsList'
{ _pmlParent = pPmlParent_
, _pmlXgafv = Nothing
, _pmlUploadProtocol = Nothing
, _pmlPp = True
, _pmlAccessToken = Nothing
, _pmlUploadType = Nothing
, _pmlBearerToken = Nothing
, _pmlPageToken = Nothing
, _pmlPageSize = Nothing
, _pmlCallback = Nothing
}
pmlParent :: Lens' ProjectsModelsList Text
pmlParent
= lens _pmlParent (\ s a -> s{_pmlParent = a})
pmlXgafv :: Lens' ProjectsModelsList (Maybe Xgafv)
pmlXgafv = lens _pmlXgafv (\ s a -> s{_pmlXgafv = a})
pmlUploadProtocol :: Lens' ProjectsModelsList (Maybe Text)
pmlUploadProtocol
= lens _pmlUploadProtocol
(\ s a -> s{_pmlUploadProtocol = a})
pmlPp :: Lens' ProjectsModelsList Bool
pmlPp = lens _pmlPp (\ s a -> s{_pmlPp = a})
pmlAccessToken :: Lens' ProjectsModelsList (Maybe Text)
pmlAccessToken
= lens _pmlAccessToken
(\ s a -> s{_pmlAccessToken = a})
pmlUploadType :: Lens' ProjectsModelsList (Maybe Text)
pmlUploadType
= lens _pmlUploadType
(\ s a -> s{_pmlUploadType = a})
pmlBearerToken :: Lens' ProjectsModelsList (Maybe Text)
pmlBearerToken
= lens _pmlBearerToken
(\ s a -> s{_pmlBearerToken = a})
pmlPageToken :: Lens' ProjectsModelsList (Maybe Text)
pmlPageToken
= lens _pmlPageToken (\ s a -> s{_pmlPageToken = a})
pmlPageSize :: Lens' ProjectsModelsList (Maybe Int32)
pmlPageSize
= lens _pmlPageSize (\ s a -> s{_pmlPageSize = a}) .
mapping _Coerce
pmlCallback :: Lens' ProjectsModelsList (Maybe Text)
pmlCallback
= lens _pmlCallback (\ s a -> s{_pmlCallback = a})
instance GoogleRequest ProjectsModelsList where
type Rs ProjectsModelsList =
GoogleCloudMlV1beta1__ListModelsResponse
type Scopes ProjectsModelsList =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient ProjectsModelsList'{..}
= go _pmlParent _pmlXgafv _pmlUploadProtocol
(Just _pmlPp)
_pmlAccessToken
_pmlUploadType
_pmlBearerToken
_pmlPageToken
_pmlPageSize
_pmlCallback
(Just AltJSON)
machineLearningService
where go
= buildClient
(Proxy :: Proxy ProjectsModelsListResource)
mempty