packages feed

gogol-factchecktools (empty) → 0.5.0

raw patch · 15 files changed

+2794/−0 lines, 15 filesdep +basedep +gogol-coresetup-changed

Dependencies added: base, gogol-core

Files

+ LICENSE view
@@ -0,0 +1,367 @@+Mozilla Public License Version 2.0+==================================++1. Definitions+--------------++1.1. "Contributor"+    means each individual or legal entity that creates, contributes to+    the creation of, or owns Covered Software.++1.2. "Contributor Version"+    means the combination of the Contributions of others (if any) used+    by a Contributor and that particular Contributor's Contribution.++1.3. "Contribution"+    means Covered Software of a particular Contributor.++1.4. "Covered Software"+    means Source Code Form to which the initial Contributor has attached+    the notice in Exhibit A, the Executable Form of such Source Code+    Form, and Modifications of such Source Code Form, in each case+    including portions thereof.++1.5. "Incompatible With Secondary Licenses"+    means++    (a) that the initial Contributor has attached the notice described+        in Exhibit B to the Covered Software; or++    (b) that the Covered Software was made available under the terms of+        version 1.1 or earlier of the License, but not also under the+        terms of a Secondary License.++1.6. "Executable Form"+    means any form of the work other than Source Code Form.++1.7. "Larger Work"+    means a work that combines Covered Software with other material, in+    a separate file or files, that is not Covered Software.++1.8. "License"+    means this document.++1.9. "Licensable"+    means having the right to grant, to the maximum extent possible,+    whether at the time of the initial grant or subsequently, any and+    all of the rights conveyed by this License.++1.10. "Modifications"+    means any of the following:++    (a) any file in Source Code Form that results from an addition to,+        deletion from, or modification of the contents of Covered+        Software; or++    (b) any new file in Source Code Form that contains any Covered+        Software.++1.11. "Patent Claims" of a Contributor+    means any patent claim(s), including without limitation, method,+    process, and apparatus claims, in any patent Licensable by such+    Contributor that would be infringed, but for the grant of the+    License, by the making, using, selling, offering for sale, having+    made, import, or transfer of either its Contributions or its+    Contributor Version.++1.12. "Secondary License"+    means either the GNU General Public License, Version 2.0, the GNU+    Lesser General Public License, Version 2.1, the GNU Affero General+    Public License, Version 3.0, or any later versions of those+    licenses.++1.13. "Source Code Form"+    means the form of the work preferred for making modifications.++1.14. "You" (or "Your")+    means an individual or a legal entity exercising rights under this+    License. For legal entities, "You" includes any entity that+    controls, is controlled by, or is under common control with You. For+    purposes of this definition, "control" means (a) the power, direct+    or indirect, to cause the direction or management of such entity,+    whether by contract or otherwise, or (b) ownership of more than+    fifty percent (50%) of the outstanding shares or beneficial+    ownership of such entity.++2. License Grants and Conditions+--------------------------------++2.1. Grants++Each Contributor hereby grants You a world-wide, royalty-free,+non-exclusive license:++(a) under intellectual property rights (other than patent or trademark)+    Licensable by such Contributor to use, reproduce, make available,+    modify, display, perform, distribute, and otherwise exploit its+    Contributions, either on an unmodified basis, with Modifications, or+    as part of a Larger Work; and++(b) under Patent Claims of such Contributor to make, use, sell, offer+    for sale, have made, import, and otherwise transfer either its+    Contributions or its Contributor Version.++2.2. Effective Date++The licenses granted in Section 2.1 with respect to any Contribution+become effective for each Contribution on the date the Contributor first+distributes such Contribution.++2.3. Limitations on Grant Scope++The licenses granted in this Section 2 are the only rights granted under+this License. No additional rights or licenses will be implied from the+distribution or licensing of Covered Software under this License.+Notwithstanding Section 2.1(b) above, no patent license is granted by a+Contributor:++(a) for any code that a Contributor has removed from Covered Software;+    or++(b) for infringements caused by: (i) Your and any other third party's+    modifications of Covered Software, or (ii) the combination of its+    Contributions with other software (except as part of its Contributor+    Version); or++(c) under Patent Claims infringed by Covered Software in the absence of+    its Contributions.++This License does not grant any rights in the trademarks, service marks,+or logos of any Contributor (except as may be necessary to comply with+the notice requirements in Section 3.4).++2.4. Subsequent Licenses++No Contributor makes additional grants as a result of Your choice to+distribute the Covered Software under a subsequent version of this+License (see Section 10.2) or under the terms of a Secondary License (if+permitted under the terms of Section 3.3).++2.5. Representation++Each Contributor represents that the Contributor believes its+Contributions are its original creation(s) or it has sufficient rights+to grant the rights to its Contributions conveyed by this License.++2.6. Fair Use++This License is not intended to limit any rights You have under+applicable copyright doctrines of fair use, fair dealing, or other+equivalents.++2.7. Conditions++Sections 3.1, 3.2, 3.3, and 3.4 are conditions of the licenses granted+in Section 2.1.++3. Responsibilities+-------------------++3.1. Distribution of Source Form++All distribution of Covered Software in Source Code Form, including any+Modifications that You create or to which You contribute, must be under+the terms of this License. You must inform recipients that the Source+Code Form of the Covered Software is governed by the terms of this+License, and how they can obtain a copy of this License. You may not+attempt to alter or restrict the recipients' rights in the Source Code+Form.++3.2. Distribution of Executable Form++If You distribute Covered Software in Executable Form then:++(a) such Covered Software must also be made available in Source Code+    Form, as described in Section 3.1, and You must inform recipients of+    the Executable Form how they can obtain a copy of such Source Code+    Form by reasonable means in a timely manner, at a charge no more+    than the cost of distribution to the recipient; and++(b) You may distribute such Executable Form under the terms of this+    License, or sublicense it under different terms, provided that the+    license for the Executable Form does not attempt to limit or alter+    the recipients' rights in the Source Code Form under this License.++3.3. Distribution of a Larger Work++You may create and distribute a Larger Work under terms of Your choice,+provided that You also comply with the requirements of this License for+the Covered Software. If the Larger Work is a combination of Covered+Software with a work governed by one or more Secondary Licenses, and the+Covered Software is not Incompatible With Secondary Licenses, this+License permits You to additionally distribute such Covered Software+under the terms of such Secondary License(s), so that the recipient of+the Larger Work may, at their option, further distribute the Covered+Software under the terms of either this License or such Secondary+License(s).++3.4. Notices++You may not remove or alter the substance of any license notices+(including copyright notices, patent notices, disclaimers of warranty,+or limitations of liability) contained within the Source Code Form of+the Covered Software, except that You may alter any license notices to+the extent required to remedy known factual inaccuracies.++3.5. Application of Additional Terms++You may choose to offer, and to charge a fee for, warranty, support,+indemnity or liability obligations to one or more recipients of Covered+Software. However, You may do so only on Your own behalf, and not on+behalf of any Contributor. You must make it absolutely clear that any+such warranty, support, indemnity, or liability obligation is offered by+You alone, and You hereby agree to indemnify every Contributor for any+liability incurred by such Contributor as a result of warranty, support,+indemnity or liability terms You offer. You may include additional+disclaimers of warranty and limitations of liability specific to any+jurisdiction.++4. Inability to Comply Due to Statute or Regulation+---------------------------------------------------++If it is impossible for You to comply with any of the terms of this+License with respect to some or all of the Covered Software due to+statute, judicial order, or regulation then You must: (a) comply with+the terms of this License to the maximum extent possible; and (b)+describe the limitations and the code they affect. Such description must+be placed in a text file included with all distributions of the Covered+Software under this License. Except to the extent prohibited by statute+or regulation, such description must be sufficiently detailed for a+recipient of ordinary skill to be able to understand it.++5. Termination+--------------++5.1. The rights granted under this License will terminate automatically+if You fail to comply with any of its terms. However, if You become+compliant, then the rights granted under this License from a particular+Contributor are reinstated (a) provisionally, unless and until such+Contributor explicitly and finally terminates Your grants, and (b) on an+ongoing basis, if such Contributor fails to notify You of the+non-compliance by some reasonable means prior to 60 days after You have+come back into compliance. Moreover, Your grants from a particular+Contributor are reinstated on an ongoing basis if such Contributor+notifies You of the non-compliance by some reasonable means, this is the+first time You have received notice of non-compliance with this License+from such Contributor, and You become compliant prior to 30 days after+Your receipt of the notice.++5.2. If You initiate litigation against any entity by asserting a patent+infringement claim (excluding declaratory judgment actions,+counter-claims, and cross-claims) alleging that a Contributor Version+directly or indirectly infringes any patent, then the rights granted to+You by any and all Contributors for the Covered Software under Section+2.1 of this License shall terminate.++5.3. In the event of termination under Sections 5.1 or 5.2 above, all+end user license agreements (excluding distributors and resellers) which+have been validly granted by You or Your distributors under this License+prior to termination shall survive termination.++************************************************************************+*                                                                      *+*  6. Disclaimer of Warranty                                           *+*  -------------------------                                           *+*                                                                      *+*  Covered Software is provided under this License on an "as is"       *+*  basis, without warranty of any kind, either expressed, implied, or  *+*  statutory, including, without limitation, warranties that the       *+*  Covered Software is free of defects, merchantable, fit for a        *+*  particular purpose or non-infringing. The entire risk as to the     *+*  quality and performance of the Covered Software is with You.        *+*  Should any Covered Software prove defective in any respect, You     *+*  (not any Contributor) assume the cost of any necessary servicing,   *+*  repair, or correction. This disclaimer of warranty constitutes an   *+*  essential part of this License. No use of any Covered Software is   *+*  authorized under this License except under this disclaimer.         *+*                                                                      *+************************************************************************++************************************************************************+*                                                                      *+*  7. Limitation of Liability                                          *+*  --------------------------                                          *+*                                                                      *+*  Under no circumstances and under no legal theory, whether tort      *+*  (including negligence), contract, or otherwise, shall any           *+*  Contributor, or anyone who distributes Covered Software as          *+*  permitted above, be liable to You for any direct, indirect,         *+*  special, incidental, or consequential damages of any character      *+*  including, without limitation, damages for lost profits, loss of    *+*  goodwill, work stoppage, computer failure or malfunction, or any    *+*  and all other commercial damages or losses, even if such party      *+*  shall have been informed of the possibility of such damages. This   *+*  limitation of liability shall not apply to liability for death or   *+*  personal injury resulting from such party's negligence to the       *+*  extent applicable law prohibits such limitation. Some               *+*  jurisdictions do not allow the exclusion or limitation of           *+*  incidental or consequential damages, so this exclusion and          *+*  limitation may not apply to You.                                    *+*                                                                      *+************************************************************************++8. Litigation+-------------++Any litigation relating to this License may be brought only in the+courts of a jurisdiction where the defendant maintains its principal+place of business and such litigation shall be governed by laws of that+jurisdiction, without reference to its conflict-of-law provisions.+Nothing in this Section shall prevent a party's ability to bring+cross-claims or counter-claims.++9. Miscellaneous+----------------++This License represents the complete agreement concerning the subject+matter hereof. If any provision of this License is held to be+unenforceable, such provision shall be reformed only to the extent+necessary to make it enforceable. Any law or regulation which provides+that the language of a contract shall be construed against the drafter+shall not be used to construe this License against a Contributor.++10. Versions of the License+---------------------------++10.1. New Versions++Mozilla Foundation is the license steward. Except as provided in Section+10.3, no one other than the license steward has the right to modify or+publish new versions of this License. Each version will be given a+distinguishing version number.++10.2. Effect of New Versions++You may distribute the Covered Software under the terms of the version+of the License under which You originally received the Covered Software,+or under the terms of any subsequent version published by the license+steward.++10.3. Modified Versions++If you create software not governed by this License, and you want to+create a new license for such software, you may create and use a+modified version of this License if you rename the license and remove+any references to the name of the license steward (except to note that+such modified license differs from this License).++10.4. Distributing Source Code Form that is Incompatible With Secondary+Licenses++If You choose to distribute Source Code Form that is Incompatible With+Secondary Licenses under the terms of this version of the License, the+notice described in Exhibit B of this License must be attached.++Exhibit A - Source Code Form License Notice+-------------------------------------------++  This Source Code Form is subject to the terms of the Mozilla Public+  License, v. 2.0. If a copy of the MPL was not distributed with this+  file, You can obtain one at http://mozilla.org/MPL/2.0/.++If it is not possible or desirable to put the notice in a particular+file, then You may include the notice in a location (such as a LICENSE+file in a relevant directory) where a recipient would be likely to look+for such a notice.++You may add additional accurate notices of copyright ownership.
+ README.md view
@@ -0,0 +1,28 @@+# gogol-factchecktools++* [Version](#version)+* [Description](#description)+* [Contribute](#contribute)+* [Licence](#licence)+++## Version++`0.5.0`+++## Description++A client library for the Google Fact Check Tools.+++## Contribute++For any problems, comments, or feedback please create an issue [here on GitHub](https://github.com/brendanhay/gogol/issues).++> _Note:_ this library is an auto-generated Haskell package. Please see `gogol-gen` for more information.+++## Licence++`gogol-factchecktools` is released under the [Mozilla Public License Version 2.0](http://www.mozilla.org/MPL/).
+ Setup.hs view
@@ -0,0 +1,2 @@+import           Distribution.Simple+main = defaultMain
+ gen/Network/Google/FactCheckTools.hs view
@@ -0,0 +1,160 @@+{-# LANGUAGE DataKinds         #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# LANGUAGE TypeOperators     #-}++{-# OPTIONS_GHC -fno-warn-unused-imports    #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}++-- |+-- Module      : Network.Google.FactCheckTools+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- -- |+--+-- /See:/ <https://developers.google.com/fact-check/tools/api/ Fact Check Tools API Reference>+module Network.Google.FactCheckTools+    (+    -- * Service Configuration+      factCheckToolsService++    -- * OAuth Scopes+    , userInfoEmailScope++    -- * API Declaration+    , FactCheckToolsAPI++    -- * Resources++    -- ** factchecktools.claims.search+    , module Network.Google.Resource.FactCheckTools.Claims.Search++    -- ** factchecktools.pages.create+    , module Network.Google.Resource.FactCheckTools.Pages.Create++    -- ** factchecktools.pages.delete+    , module Network.Google.Resource.FactCheckTools.Pages.Delete++    -- ** factchecktools.pages.get+    , module Network.Google.Resource.FactCheckTools.Pages.Get++    -- ** factchecktools.pages.list+    , module Network.Google.Resource.FactCheckTools.Pages.List++    -- ** factchecktools.pages.update+    , module Network.Google.Resource.FactCheckTools.Pages.Update++    -- * Types++    -- ** GoogleFactcheckingFactchecktoolsV1alpha1Claim+    , GoogleFactcheckingFactchecktoolsV1alpha1Claim+    , googleFactcheckingFactchecktoolsV1alpha1Claim+    , gffvcText+    , gffvcClaimReview+    , gffvcClaimDate+    , gffvcClaimant++    -- ** GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating+    , googleFactcheckingFactchecktoolsV1alpha1ClaimRating+    , gffvcrWorstRating+    , gffvcrRatingValue+    , gffvcrImageURL+    , gffvcrBestRating+    , gffvcrTextualRating++    -- ** GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor+    , googleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor+    , gffvcraImageURL+    , gffvcraName++    -- ** GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse+    , GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse+    , googleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse+    , gffvfccsrNextPageToken+    , gffvfccsrClaims++    -- ** GoogleProtobufEmpty+    , GoogleProtobufEmpty+    , googleProtobufEmpty++    -- ** GoogleFactcheckingFactchecktoolsV1alpha1Publisher+    , GoogleFactcheckingFactchecktoolsV1alpha1Publisher+    , googleFactcheckingFactchecktoolsV1alpha1Publisher+    , gffvpName+    , gffvpSite++    -- ** GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor+    , googleFactcheckingFactchecktoolsV1alpha1ClaimAuthor+    , gffvcaSameAs+    , gffvcaImageURL+    , gffvcaName+    , gffvcaJobTitle++    -- ** Xgafv+    , Xgafv (..)++    -- ** GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview+    , googleFactcheckingFactchecktoolsV1alpha1ClaimReview+    , gLanguageCode+    , gURL+    , gTextualRating+    , gTitle+    , gPublisher+    , gReviewDate++    -- ** GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup+    , googleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup+    , gffvcrmRating+    , gffvcrmClaimAuthor+    , gffvcrmURL+    , gffvcrmClaimAppearances+    , gffvcrmClaimLocation+    , gffvcrmClaimFirstAppearance+    , gffvcrmClaimDate+    , gffvcrmClaimReviewed++    -- ** GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+    , googleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+    , gffvcrmpVersionId+    , gffvcrmpPublishDate+    , gffvcrmpName+    , gffvcrmpClaimReviewAuthor+    , gffvcrmpPageURL+    , gffvcrmpClaimReviewMarkups++    -- ** GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse+    , GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse+    , googleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse+    , gffvlcrmprNextPageToken+    , gffvlcrmprClaimReviewMarkupPages+    ) where++import           Network.Google.FactCheckTools.Types+import           Network.Google.Prelude+import           Network.Google.Resource.FactCheckTools.Claims.Search+import           Network.Google.Resource.FactCheckTools.Pages.Create+import           Network.Google.Resource.FactCheckTools.Pages.Delete+import           Network.Google.Resource.FactCheckTools.Pages.Get+import           Network.Google.Resource.FactCheckTools.Pages.List+import           Network.Google.Resource.FactCheckTools.Pages.Update++{- $resources+TODO+-}++-- | Represents the entirety of the methods and resources available for the Fact Check Tools API service.+type FactCheckToolsAPI =+     PagesListResource :<|> PagesGetResource :<|>+       PagesCreateResource+       :<|> PagesDeleteResource+       :<|> PagesUpdateResource+       :<|> ClaimsSearchResource
+ gen/Network/Google/FactCheckTools/Types.hs view
@@ -0,0 +1,127 @@+{-# LANGUAGE DataKinds          #-}+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE NoImplicitPrelude  #-}+{-# LANGUAGE OverloadedStrings  #-}++{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- |+-- Module      : Network.Google.FactCheckTools.Types+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+module Network.Google.FactCheckTools.Types+    (+    -- * Service Configuration+      factCheckToolsService++    -- * OAuth Scopes+    , userInfoEmailScope++    -- * GoogleFactcheckingFactchecktoolsV1alpha1Claim+    , GoogleFactcheckingFactchecktoolsV1alpha1Claim+    , googleFactcheckingFactchecktoolsV1alpha1Claim+    , gffvcText+    , gffvcClaimReview+    , gffvcClaimDate+    , gffvcClaimant++    -- * GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating+    , googleFactcheckingFactchecktoolsV1alpha1ClaimRating+    , gffvcrWorstRating+    , gffvcrRatingValue+    , gffvcrImageURL+    , gffvcrBestRating+    , gffvcrTextualRating++    -- * GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor+    , googleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor+    , gffvcraImageURL+    , gffvcraName++    -- * GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse+    , GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse+    , googleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse+    , gffvfccsrNextPageToken+    , gffvfccsrClaims++    -- * GoogleProtobufEmpty+    , GoogleProtobufEmpty+    , googleProtobufEmpty++    -- * GoogleFactcheckingFactchecktoolsV1alpha1Publisher+    , GoogleFactcheckingFactchecktoolsV1alpha1Publisher+    , googleFactcheckingFactchecktoolsV1alpha1Publisher+    , gffvpName+    , gffvpSite++    -- * GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor+    , googleFactcheckingFactchecktoolsV1alpha1ClaimAuthor+    , gffvcaSameAs+    , gffvcaImageURL+    , gffvcaName+    , gffvcaJobTitle++    -- * Xgafv+    , Xgafv (..)++    -- * GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview+    , googleFactcheckingFactchecktoolsV1alpha1ClaimReview+    , gLanguageCode+    , gURL+    , gTextualRating+    , gTitle+    , gPublisher+    , gReviewDate++    -- * GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup+    , googleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup+    , gffvcrmRating+    , gffvcrmClaimAuthor+    , gffvcrmURL+    , gffvcrmClaimAppearances+    , gffvcrmClaimLocation+    , gffvcrmClaimFirstAppearance+    , gffvcrmClaimDate+    , gffvcrmClaimReviewed++    -- * GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+    , GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+    , googleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+    , gffvcrmpVersionId+    , gffvcrmpPublishDate+    , gffvcrmpName+    , gffvcrmpClaimReviewAuthor+    , gffvcrmpPageURL+    , gffvcrmpClaimReviewMarkups++    -- * GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse+    , GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse+    , googleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse+    , gffvlcrmprNextPageToken+    , gffvlcrmprClaimReviewMarkupPages+    ) where++import           Network.Google.FactCheckTools.Types.Product+import           Network.Google.FactCheckTools.Types.Sum+import           Network.Google.Prelude++-- | Default request referring to version 'v1alpha1' of the Fact Check Tools API. This contains the host and root path used as a starting point for constructing service requests.+factCheckToolsService :: ServiceConfig+factCheckToolsService+  = defaultService+      (ServiceId "factchecktools:v1alpha1")+      "factchecktools.googleapis.com"++-- | View your email address+userInfoEmailScope :: Proxy '["https://www.googleapis.com/auth/userinfo.email"]+userInfoEmailScope = Proxy
+ gen/Network/Google/FactCheckTools/Types/Product.hs view
@@ -0,0 +1,941 @@+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE NoImplicitPrelude  #-}+{-# LANGUAGE OverloadedStrings  #-}+{-# LANGUAGE RecordWildCards    #-}++{-# OPTIONS_GHC -fno-warn-unused-binds   #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- |+-- Module      : Network.Google.FactCheckTools.Types.Product+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+module Network.Google.FactCheckTools.Types.Product where++import           Network.Google.FactCheckTools.Types.Sum+import           Network.Google.Prelude++-- | Information about the claim.+--+-- /See:/ 'googleFactcheckingFactchecktoolsV1alpha1Claim' smart constructor.+data GoogleFactcheckingFactchecktoolsV1alpha1Claim =+  GoogleFactcheckingFactchecktoolsV1alpha1Claim'+    { _gffvcText        :: !(Maybe Text)+    , _gffvcClaimReview :: !(Maybe [GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview])+    , _gffvcClaimDate   :: !(Maybe DateTime')+    , _gffvcClaimant    :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleFactcheckingFactchecktoolsV1alpha1Claim' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gffvcText'+--+-- * 'gffvcClaimReview'+--+-- * 'gffvcClaimDate'+--+-- * 'gffvcClaimant'+googleFactcheckingFactchecktoolsV1alpha1Claim+    :: GoogleFactcheckingFactchecktoolsV1alpha1Claim+googleFactcheckingFactchecktoolsV1alpha1Claim =+  GoogleFactcheckingFactchecktoolsV1alpha1Claim'+    { _gffvcText = Nothing+    , _gffvcClaimReview = Nothing+    , _gffvcClaimDate = Nothing+    , _gffvcClaimant = Nothing+    }+++-- | The claim text. For instance, \"Crime has doubled in the last 2 years.\"+gffvcText :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1Claim (Maybe Text)+gffvcText+  = lens _gffvcText (\ s a -> s{_gffvcText = a})++-- | One or more reviews of this claim (namely, a fact-checking article).+gffvcClaimReview :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1Claim [GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview]+gffvcClaimReview+  = lens _gffvcClaimReview+      (\ s a -> s{_gffvcClaimReview = a})+      . _Default+      . _Coerce++-- | The date that the claim was made.+gffvcClaimDate :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1Claim (Maybe UTCTime)+gffvcClaimDate+  = lens _gffvcClaimDate+      (\ s a -> s{_gffvcClaimDate = a})+      . mapping _DateTime++-- | A person or organization stating the claim. For instance, \"John Doe\".+gffvcClaimant :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1Claim (Maybe Text)+gffvcClaimant+  = lens _gffvcClaimant+      (\ s a -> s{_gffvcClaimant = a})++instance FromJSON+           GoogleFactcheckingFactchecktoolsV1alpha1Claim+         where+        parseJSON+          = withObject+              "GoogleFactcheckingFactchecktoolsV1alpha1Claim"+              (\ o ->+                 GoogleFactcheckingFactchecktoolsV1alpha1Claim' <$>+                   (o .:? "text") <*> (o .:? "claimReview" .!= mempty)+                     <*> (o .:? "claimDate")+                     <*> (o .:? "claimant"))++instance ToJSON+           GoogleFactcheckingFactchecktoolsV1alpha1Claim+         where+        toJSON+          GoogleFactcheckingFactchecktoolsV1alpha1Claim'{..}+          = object+              (catMaybes+                 [("text" .=) <$> _gffvcText,+                  ("claimReview" .=) <$> _gffvcClaimReview,+                  ("claimDate" .=) <$> _gffvcClaimDate,+                  ("claimant" .=) <$> _gffvcClaimant])++-- | Information about the claim rating.+--+-- /See:/ 'googleFactcheckingFactchecktoolsV1alpha1ClaimRating' smart constructor.+data GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating'+    { _gffvcrWorstRating   :: !(Maybe (Textual Int32))+    , _gffvcrRatingValue   :: !(Maybe (Textual Int32))+    , _gffvcrImageURL      :: !(Maybe Text)+    , _gffvcrBestRating    :: !(Maybe (Textual Int32))+    , _gffvcrTextualRating :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gffvcrWorstRating'+--+-- * 'gffvcrRatingValue'+--+-- * 'gffvcrImageURL'+--+-- * 'gffvcrBestRating'+--+-- * 'gffvcrTextualRating'+googleFactcheckingFactchecktoolsV1alpha1ClaimRating+    :: GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating+googleFactcheckingFactchecktoolsV1alpha1ClaimRating =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating'+    { _gffvcrWorstRating = Nothing+    , _gffvcrRatingValue = Nothing+    , _gffvcrImageURL = Nothing+    , _gffvcrBestRating = Nothing+    , _gffvcrTextualRating = Nothing+    }+++-- | For numeric ratings, the worst value possible in the scale from worst to+-- best.+-- Corresponds to \`ClaimReview.reviewRating.worstRating\`.+gffvcrWorstRating :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating (Maybe Int32)+gffvcrWorstRating+  = lens _gffvcrWorstRating+      (\ s a -> s{_gffvcrWorstRating = a})+      . mapping _Coerce++-- | A numeric rating of this claim, in the range worstRating — bestRating+-- inclusive.+-- Corresponds to \`ClaimReview.reviewRating.ratingValue\`.+gffvcrRatingValue :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating (Maybe Int32)+gffvcrRatingValue+  = lens _gffvcrRatingValue+      (\ s a -> s{_gffvcrRatingValue = a})+      . mapping _Coerce++-- | Corresponds to \`ClaimReview.reviewRating.image\`.+gffvcrImageURL :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating (Maybe Text)+gffvcrImageURL+  = lens _gffvcrImageURL+      (\ s a -> s{_gffvcrImageURL = a})++-- | For numeric ratings, the best value possible in the scale from worst to+-- best.+-- Corresponds to \`ClaimReview.reviewRating.bestRating\`.+gffvcrBestRating :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating (Maybe Int32)+gffvcrBestRating+  = lens _gffvcrBestRating+      (\ s a -> s{_gffvcrBestRating = a})+      . mapping _Coerce++-- | The truthfulness rating as a human-readible short word or phrase.+-- Corresponds to \`ClaimReview.reviewRating.alternateName\`.+gffvcrTextualRating :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating (Maybe Text)+gffvcrTextualRating+  = lens _gffvcrTextualRating+      (\ s a -> s{_gffvcrTextualRating = a})++instance FromJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating+         where+        parseJSON+          = withObject+              "GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating"+              (\ o ->+                 GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating'+                   <$>+                   (o .:? "worstRating") <*> (o .:? "ratingValue") <*>+                     (o .:? "imageUrl")+                     <*> (o .:? "bestRating")+                     <*> (o .:? "textualRating"))++instance ToJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating+         where+        toJSON+          GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating'{..}+          = object+              (catMaybes+                 [("worstRating" .=) <$> _gffvcrWorstRating,+                  ("ratingValue" .=) <$> _gffvcrRatingValue,+                  ("imageUrl" .=) <$> _gffvcrImageURL,+                  ("bestRating" .=) <$> _gffvcrBestRating,+                  ("textualRating" .=) <$> _gffvcrTextualRating])++-- | Information about the claim review author.+--+-- /See:/ 'googleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor' smart constructor.+data GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor'+    { _gffvcraImageURL :: !(Maybe Text)+    , _gffvcraName     :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gffvcraImageURL'+--+-- * 'gffvcraName'+googleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor+    :: GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor+googleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor'+    {_gffvcraImageURL = Nothing, _gffvcraName = Nothing}+++-- | Corresponds to \`ClaimReview.author.image\`.+gffvcraImageURL :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor (Maybe Text)+gffvcraImageURL+  = lens _gffvcraImageURL+      (\ s a -> s{_gffvcraImageURL = a})++-- | Name of the organization that is publishing the fact check.+-- Corresponds to \`ClaimReview.author.name\`.+gffvcraName :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor (Maybe Text)+gffvcraName+  = lens _gffvcraName (\ s a -> s{_gffvcraName = a})++instance FromJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor+         where+        parseJSON+          = withObject+              "GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor"+              (\ o ->+                 GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor'+                   <$> (o .:? "imageUrl") <*> (o .:? "name"))++instance ToJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor+         where+        toJSON+          GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor'{..}+          = object+              (catMaybes+                 [("imageUrl" .=) <$> _gffvcraImageURL,+                  ("name" .=) <$> _gffvcraName])++-- | Response from searching fact-checked claims.+--+-- /See:/ 'googleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse' smart constructor.+data GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse =+  GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse'+    { _gffvfccsrNextPageToken :: !(Maybe Text)+    , _gffvfccsrClaims        :: !(Maybe [GoogleFactcheckingFactchecktoolsV1alpha1Claim])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gffvfccsrNextPageToken'+--+-- * 'gffvfccsrClaims'+googleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse+    :: GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse+googleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse =+  GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse'+    {_gffvfccsrNextPageToken = Nothing, _gffvfccsrClaims = Nothing}+++-- | The next pagination token in the Search response. It should be used as+-- the \`page_token\` for the following request. An empty value means no+-- more results.+gffvfccsrNextPageToken :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse (Maybe Text)+gffvfccsrNextPageToken+  = lens _gffvfccsrNextPageToken+      (\ s a -> s{_gffvfccsrNextPageToken = a})++-- | The list of claims and all of their associated information.+gffvfccsrClaims :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse [GoogleFactcheckingFactchecktoolsV1alpha1Claim]+gffvfccsrClaims+  = lens _gffvfccsrClaims+      (\ s a -> s{_gffvfccsrClaims = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse+         where+        parseJSON+          = withObject+              "GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse"+              (\ o ->+                 GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse'+                   <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "claims" .!= mempty))++instance ToJSON+           GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse+         where+        toJSON+          GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _gffvfccsrNextPageToken,+                  ("claims" .=) <$> _gffvfccsrClaims])++-- | A generic empty message that you can re-use to avoid defining duplicated+-- empty messages in your APIs. A typical example is to use it as the+-- request or the response type of an API method. For instance: service Foo+-- { rpc Bar(google.protobuf.Empty) returns (google.protobuf.Empty); } The+-- JSON representation for \`Empty\` is empty JSON object \`{}\`.+--+-- /See:/ 'googleProtobufEmpty' smart constructor.+data GoogleProtobufEmpty =+  GoogleProtobufEmpty'+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleProtobufEmpty' with the minimum fields required to make a request.+--+googleProtobufEmpty+    :: GoogleProtobufEmpty+googleProtobufEmpty = GoogleProtobufEmpty'+++instance FromJSON GoogleProtobufEmpty where+        parseJSON+          = withObject "GoogleProtobufEmpty"+              (\ o -> pure GoogleProtobufEmpty')++instance ToJSON GoogleProtobufEmpty where+        toJSON = const emptyObject++-- | Information about the publisher.+--+-- /See:/ 'googleFactcheckingFactchecktoolsV1alpha1Publisher' smart constructor.+data GoogleFactcheckingFactchecktoolsV1alpha1Publisher =+  GoogleFactcheckingFactchecktoolsV1alpha1Publisher'+    { _gffvpName :: !(Maybe Text)+    , _gffvpSite :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleFactcheckingFactchecktoolsV1alpha1Publisher' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gffvpName'+--+-- * 'gffvpSite'+googleFactcheckingFactchecktoolsV1alpha1Publisher+    :: GoogleFactcheckingFactchecktoolsV1alpha1Publisher+googleFactcheckingFactchecktoolsV1alpha1Publisher =+  GoogleFactcheckingFactchecktoolsV1alpha1Publisher'+    {_gffvpName = Nothing, _gffvpSite = Nothing}+++-- | The name of this publisher. For instance, \"Awesome Fact Checks\".+gffvpName :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1Publisher (Maybe Text)+gffvpName+  = lens _gffvpName (\ s a -> s{_gffvpName = a})++-- | Host-level site name, without the protocol or \"www\" prefix. For+-- instance, \"awesomefactchecks.com\". This value of this field is based+-- purely on the claim review URL.+gffvpSite :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1Publisher (Maybe Text)+gffvpSite+  = lens _gffvpSite (\ s a -> s{_gffvpSite = a})++instance FromJSON+           GoogleFactcheckingFactchecktoolsV1alpha1Publisher+         where+        parseJSON+          = withObject+              "GoogleFactcheckingFactchecktoolsV1alpha1Publisher"+              (\ o ->+                 GoogleFactcheckingFactchecktoolsV1alpha1Publisher'+                   <$> (o .:? "name") <*> (o .:? "site"))++instance ToJSON+           GoogleFactcheckingFactchecktoolsV1alpha1Publisher+         where+        toJSON+          GoogleFactcheckingFactchecktoolsV1alpha1Publisher'{..}+          = object+              (catMaybes+                 [("name" .=) <$> _gffvpName,+                  ("site" .=) <$> _gffvpSite])++-- | Information about the claim author.+--+-- /See:/ 'googleFactcheckingFactchecktoolsV1alpha1ClaimAuthor' smart constructor.+data GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor'+    { _gffvcaSameAs   :: !(Maybe Text)+    , _gffvcaImageURL :: !(Maybe Text)+    , _gffvcaName     :: !(Maybe Text)+    , _gffvcaJobTitle :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gffvcaSameAs'+--+-- * 'gffvcaImageURL'+--+-- * 'gffvcaName'+--+-- * 'gffvcaJobTitle'+googleFactcheckingFactchecktoolsV1alpha1ClaimAuthor+    :: GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor+googleFactcheckingFactchecktoolsV1alpha1ClaimAuthor =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor'+    { _gffvcaSameAs = Nothing+    , _gffvcaImageURL = Nothing+    , _gffvcaName = Nothing+    , _gffvcaJobTitle = Nothing+    }+++-- | Corresponds to \`ClaimReview.itemReviewed.author.sameAs\`.+gffvcaSameAs :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor (Maybe Text)+gffvcaSameAs+  = lens _gffvcaSameAs (\ s a -> s{_gffvcaSameAs = a})++-- | Corresponds to \`ClaimReview.itemReviewed.author.image\`.+gffvcaImageURL :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor (Maybe Text)+gffvcaImageURL+  = lens _gffvcaImageURL+      (\ s a -> s{_gffvcaImageURL = a})++-- | A person or organization stating the claim. For instance, \"John Doe\".+-- Corresponds to \`ClaimReview.itemReviewed.author.name\`.+gffvcaName :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor (Maybe Text)+gffvcaName+  = lens _gffvcaName (\ s a -> s{_gffvcaName = a})++-- | Corresponds to \`ClaimReview.itemReviewed.author.jobTitle\`.+gffvcaJobTitle :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor (Maybe Text)+gffvcaJobTitle+  = lens _gffvcaJobTitle+      (\ s a -> s{_gffvcaJobTitle = a})++instance FromJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor+         where+        parseJSON+          = withObject+              "GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor"+              (\ o ->+                 GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor'+                   <$>+                   (o .:? "sameAs") <*> (o .:? "imageUrl") <*>+                     (o .:? "name")+                     <*> (o .:? "jobTitle"))++instance ToJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor+         where+        toJSON+          GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor'{..}+          = object+              (catMaybes+                 [("sameAs" .=) <$> _gffvcaSameAs,+                  ("imageUrl" .=) <$> _gffvcaImageURL,+                  ("name" .=) <$> _gffvcaName,+                  ("jobTitle" .=) <$> _gffvcaJobTitle])++-- | Information about a claim review.+--+-- /See:/ 'googleFactcheckingFactchecktoolsV1alpha1ClaimReview' smart constructor.+data GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview'+    { _gLanguageCode  :: !(Maybe Text)+    , _gURL           :: !(Maybe Text)+    , _gTextualRating :: !(Maybe Text)+    , _gTitle         :: !(Maybe Text)+    , _gPublisher     :: !(Maybe GoogleFactcheckingFactchecktoolsV1alpha1Publisher)+    , _gReviewDate    :: !(Maybe DateTime')+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gLanguageCode'+--+-- * 'gURL'+--+-- * 'gTextualRating'+--+-- * 'gTitle'+--+-- * 'gPublisher'+--+-- * 'gReviewDate'+googleFactcheckingFactchecktoolsV1alpha1ClaimReview+    :: GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview+googleFactcheckingFactchecktoolsV1alpha1ClaimReview =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview'+    { _gLanguageCode = Nothing+    , _gURL = Nothing+    , _gTextualRating = Nothing+    , _gTitle = Nothing+    , _gPublisher = Nothing+    , _gReviewDate = Nothing+    }+++-- | The language this review was written in. For instance, \"en\" or \"de\".+gLanguageCode :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview (Maybe Text)+gLanguageCode+  = lens _gLanguageCode+      (\ s a -> s{_gLanguageCode = a})++-- | The URL of this claim review.+gURL :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview (Maybe Text)+gURL = lens _gURL (\ s a -> s{_gURL = a})++-- | Textual rating. For instance, \"Mostly false\".+gTextualRating :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview (Maybe Text)+gTextualRating+  = lens _gTextualRating+      (\ s a -> s{_gTextualRating = a})++-- | The title of this claim review, if it can be determined.+gTitle :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview (Maybe Text)+gTitle = lens _gTitle (\ s a -> s{_gTitle = a})++-- | The publisher of this claim review.+gPublisher :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview (Maybe GoogleFactcheckingFactchecktoolsV1alpha1Publisher)+gPublisher+  = lens _gPublisher (\ s a -> s{_gPublisher = a})++-- | The date the claim was reviewed.+gReviewDate :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview (Maybe UTCTime)+gReviewDate+  = lens _gReviewDate (\ s a -> s{_gReviewDate = a}) .+      mapping _DateTime++instance FromJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview+         where+        parseJSON+          = withObject+              "GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview"+              (\ o ->+                 GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview'+                   <$>+                   (o .:? "languageCode") <*> (o .:? "url") <*>+                     (o .:? "textualRating")+                     <*> (o .:? "title")+                     <*> (o .:? "publisher")+                     <*> (o .:? "reviewDate"))++instance ToJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview+         where+        toJSON+          GoogleFactcheckingFactchecktoolsV1alpha1ClaimReview'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gLanguageCode,+                  ("url" .=) <$> _gURL,+                  ("textualRating" .=) <$> _gTextualRating,+                  ("title" .=) <$> _gTitle,+                  ("publisher" .=) <$> _gPublisher,+                  ("reviewDate" .=) <$> _gReviewDate])++-- | Fields for an individual \`ClaimReview\` element. Except for+-- sub-messages that group fields together, each of these fields correspond+-- those in https:\/\/schema.org\/ClaimReview. We list the precise mapping+-- for each field.+--+-- /See:/ 'googleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup' smart constructor.+data GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup'+    { _gffvcrmRating               :: !(Maybe GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating)+    , _gffvcrmClaimAuthor          :: !(Maybe GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor)+    , _gffvcrmURL                  :: !(Maybe Text)+    , _gffvcrmClaimAppearances     :: !(Maybe [Text])+    , _gffvcrmClaimLocation        :: !(Maybe Text)+    , _gffvcrmClaimFirstAppearance :: !(Maybe Text)+    , _gffvcrmClaimDate            :: !(Maybe Text)+    , _gffvcrmClaimReviewed        :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gffvcrmRating'+--+-- * 'gffvcrmClaimAuthor'+--+-- * 'gffvcrmURL'+--+-- * 'gffvcrmClaimAppearances'+--+-- * 'gffvcrmClaimLocation'+--+-- * 'gffvcrmClaimFirstAppearance'+--+-- * 'gffvcrmClaimDate'+--+-- * 'gffvcrmClaimReviewed'+googleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup+    :: GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup+googleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup'+    { _gffvcrmRating = Nothing+    , _gffvcrmClaimAuthor = Nothing+    , _gffvcrmURL = Nothing+    , _gffvcrmClaimAppearances = Nothing+    , _gffvcrmClaimLocation = Nothing+    , _gffvcrmClaimFirstAppearance = Nothing+    , _gffvcrmClaimDate = Nothing+    , _gffvcrmClaimReviewed = Nothing+    }+++-- | Info about the rating of this claim review.+gffvcrmRating :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup (Maybe GoogleFactcheckingFactchecktoolsV1alpha1ClaimRating)+gffvcrmRating+  = lens _gffvcrmRating+      (\ s a -> s{_gffvcrmRating = a})++-- | Info about the author of this claim.+gffvcrmClaimAuthor :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup (Maybe GoogleFactcheckingFactchecktoolsV1alpha1ClaimAuthor)+gffvcrmClaimAuthor+  = lens _gffvcrmClaimAuthor+      (\ s a -> s{_gffvcrmClaimAuthor = a})++-- | This field is optional, and will default to the page URL. We provide+-- this field to allow you the override the default value, but the only+-- permitted override is the page URL plus an optional anchor link (\"page+-- jump\").+-- Corresponds to \`ClaimReview.url\`+gffvcrmURL :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup (Maybe Text)+gffvcrmURL+  = lens _gffvcrmURL (\ s a -> s{_gffvcrmURL = a})++-- | A list of links to works in which this claim appears, aside from the one+-- specified in \`claim_first_appearance\`.+-- Corresponds to+-- \`ClaimReview.itemReviewed[\'type=Claim].appearance.url\`.+gffvcrmClaimAppearances :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup [Text]+gffvcrmClaimAppearances+  = lens _gffvcrmClaimAppearances+      (\ s a -> s{_gffvcrmClaimAppearances = a})+      . _Default+      . _Coerce++-- | The location where this claim was made.+-- Corresponds to \`ClaimReview.itemReviewed.name\`.+gffvcrmClaimLocation :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup (Maybe Text)+gffvcrmClaimLocation+  = lens _gffvcrmClaimLocation+      (\ s a -> s{_gffvcrmClaimLocation = a})++-- | A link to a work in which this claim first appears.+-- Corresponds to+-- \`ClaimReview.itemReviewed[\'type=Claim].firstAppearance.url\`.+gffvcrmClaimFirstAppearance :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup (Maybe Text)+gffvcrmClaimFirstAppearance+  = lens _gffvcrmClaimFirstAppearance+      (\ s a -> s{_gffvcrmClaimFirstAppearance = a})++-- | The date when the claim was made or entered public discourse.+-- Corresponds to \`ClaimReview.itemReviewed.datePublished\`.+gffvcrmClaimDate :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup (Maybe Text)+gffvcrmClaimDate+  = lens _gffvcrmClaimDate+      (\ s a -> s{_gffvcrmClaimDate = a})++-- | A short summary of the claim being evaluated.+-- Corresponds to \`ClaimReview.claimReviewed\`.+gffvcrmClaimReviewed :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup (Maybe Text)+gffvcrmClaimReviewed+  = lens _gffvcrmClaimReviewed+      (\ s a -> s{_gffvcrmClaimReviewed = a})++instance FromJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup+         where+        parseJSON+          = withObject+              "GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup"+              (\ o ->+                 GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup'+                   <$>+                   (o .:? "rating") <*> (o .:? "claimAuthor") <*>+                     (o .:? "url")+                     <*> (o .:? "claimAppearances" .!= mempty)+                     <*> (o .:? "claimLocation")+                     <*> (o .:? "claimFirstAppearance")+                     <*> (o .:? "claimDate")+                     <*> (o .:? "claimReviewed"))++instance ToJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup+         where+        toJSON+          GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup'{..}+          = object+              (catMaybes+                 [("rating" .=) <$> _gffvcrmRating,+                  ("claimAuthor" .=) <$> _gffvcrmClaimAuthor,+                  ("url" .=) <$> _gffvcrmURL,+                  ("claimAppearances" .=) <$> _gffvcrmClaimAppearances,+                  ("claimLocation" .=) <$> _gffvcrmClaimLocation,+                  ("claimFirstAppearance" .=) <$>+                    _gffvcrmClaimFirstAppearance,+                  ("claimDate" .=) <$> _gffvcrmClaimDate,+                  ("claimReviewed" .=) <$> _gffvcrmClaimReviewed])++-- | Holds one or more instances of \`ClaimReview\` markup for a webpage.+--+-- /See:/ 'googleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage' smart constructor.+data GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage'+    { _gffvcrmpVersionId          :: !(Maybe Text)+    , _gffvcrmpPublishDate        :: !(Maybe Text)+    , _gffvcrmpName               :: !(Maybe Text)+    , _gffvcrmpClaimReviewAuthor  :: !(Maybe GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor)+    , _gffvcrmpPageURL            :: !(Maybe Text)+    , _gffvcrmpClaimReviewMarkups :: !(Maybe [GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gffvcrmpVersionId'+--+-- * 'gffvcrmpPublishDate'+--+-- * 'gffvcrmpName'+--+-- * 'gffvcrmpClaimReviewAuthor'+--+-- * 'gffvcrmpPageURL'+--+-- * 'gffvcrmpClaimReviewMarkups'+googleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+    :: GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+googleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage =+  GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage'+    { _gffvcrmpVersionId = Nothing+    , _gffvcrmpPublishDate = Nothing+    , _gffvcrmpName = Nothing+    , _gffvcrmpClaimReviewAuthor = Nothing+    , _gffvcrmpPageURL = Nothing+    , _gffvcrmpClaimReviewMarkups = Nothing+    }+++-- | The version ID for this markup. Except for update requests, this field+-- is output-only and should not be set by the user.+gffvcrmpVersionId :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage (Maybe Text)+gffvcrmpVersionId+  = lens _gffvcrmpVersionId+      (\ s a -> s{_gffvcrmpVersionId = a})++-- | The date when the fact check was published. Similar to the URL,+-- semantically this is a page-level field, and each \`ClaimReview\` on+-- this page will contain the same value.+-- Corresponds to \`ClaimReview.datePublished\`+gffvcrmpPublishDate :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage (Maybe Text)+gffvcrmpPublishDate+  = lens _gffvcrmpPublishDate+      (\ s a -> s{_gffvcrmpPublishDate = a})++-- | The name of this \`ClaimReview\` markup page resource, in the form of+-- \`pages\/{page_id}\`. Except for update requests, this field is+-- output-only and should not be set by the user.+gffvcrmpName :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage (Maybe Text)+gffvcrmpName+  = lens _gffvcrmpName (\ s a -> s{_gffvcrmpName = a})++-- | Info about the author of this claim review. Similar to the above,+-- semantically these are page-level fields, and each \`ClaimReview\` on+-- this page will contain the same values.+gffvcrmpClaimReviewAuthor :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage (Maybe GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewAuthor)+gffvcrmpClaimReviewAuthor+  = lens _gffvcrmpClaimReviewAuthor+      (\ s a -> s{_gffvcrmpClaimReviewAuthor = a})++-- | The URL of the page associated with this \`ClaimReview\` markup. While+-- every individual \`ClaimReview\` has its own URL field, semantically+-- this is a page-level field, and each \`ClaimReview\` on this page will+-- use this value unless individually overridden.+-- Corresponds to \`ClaimReview.url\`+gffvcrmpPageURL :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage (Maybe Text)+gffvcrmpPageURL+  = lens _gffvcrmpPageURL+      (\ s a -> s{_gffvcrmpPageURL = a})++-- | A list of individual claim reviews for this page. Each item in the list+-- corresponds to one \`ClaimReview\` element.+gffvcrmpClaimReviewMarkups :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage [GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkup]+gffvcrmpClaimReviewMarkups+  = lens _gffvcrmpClaimReviewMarkups+      (\ s a -> s{_gffvcrmpClaimReviewMarkups = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+         where+        parseJSON+          = withObject+              "GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage"+              (\ o ->+                 GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage'+                   <$>+                   (o .:? "versionId") <*> (o .:? "publishDate") <*>+                     (o .:? "name")+                     <*> (o .:? "claimReviewAuthor")+                     <*> (o .:? "pageUrl")+                     <*> (o .:? "claimReviewMarkups" .!= mempty))++instance ToJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+         where+        toJSON+          GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage'{..}+          = object+              (catMaybes+                 [("versionId" .=) <$> _gffvcrmpVersionId,+                  ("publishDate" .=) <$> _gffvcrmpPublishDate,+                  ("name" .=) <$> _gffvcrmpName,+                  ("claimReviewAuthor" .=) <$>+                    _gffvcrmpClaimReviewAuthor,+                  ("pageUrl" .=) <$> _gffvcrmpPageURL,+                  ("claimReviewMarkups" .=) <$>+                    _gffvcrmpClaimReviewMarkups])++-- | Response from listing \`ClaimReview\` markup.+--+-- /See:/ 'googleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse' smart constructor.+data GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse =+  GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse'+    { _gffvlcrmprNextPageToken          :: !(Maybe Text)+    , _gffvlcrmprClaimReviewMarkupPages :: !(Maybe [GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gffvlcrmprNextPageToken'+--+-- * 'gffvlcrmprClaimReviewMarkupPages'+googleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse+    :: GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse+googleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse =+  GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse'+    { _gffvlcrmprNextPageToken = Nothing+    , _gffvlcrmprClaimReviewMarkupPages = Nothing+    }+++-- | The next pagination token in the Search response. It should be used as+-- the \`page_token\` for the following request. An empty value means no+-- more results.+gffvlcrmprNextPageToken :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse (Maybe Text)+gffvlcrmprNextPageToken+  = lens _gffvlcrmprNextPageToken+      (\ s a -> s{_gffvlcrmprNextPageToken = a})++-- | The result list of pages of \`ClaimReview\` markup.+gffvlcrmprClaimReviewMarkupPages :: Lens' GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse [GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage]+gffvlcrmprClaimReviewMarkupPages+  = lens _gffvlcrmprClaimReviewMarkupPages+      (\ s a -> s{_gffvlcrmprClaimReviewMarkupPages = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse+         where+        parseJSON+          = withObject+              "GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse"+              (\ o ->+                 GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse'+                   <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "claimReviewMarkupPages" .!= mempty))++instance ToJSON+           GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse+         where+        toJSON+          GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _gffvlcrmprNextPageToken,+                  ("claimReviewMarkupPages" .=) <$>+                    _gffvlcrmprClaimReviewMarkupPages])
+ gen/Network/Google/FactCheckTools/Types/Sum.hs view
@@ -0,0 +1,48 @@+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE LambdaCase         #-}+{-# LANGUAGE NoImplicitPrelude  #-}+{-# LANGUAGE OverloadedStrings  #-}++{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- |+-- Module      : Network.Google.FactCheckTools.Types.Sum+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+module Network.Google.FactCheckTools.Types.Sum where++import           Network.Google.Prelude hiding (Bytes)++-- | V1 error format.+data Xgafv+    = X1+      -- ^ @1@+      -- v1 error format+    | X2+      -- ^ @2@+      -- v2 error format+      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable Xgafv++instance FromHttpApiData Xgafv where+    parseQueryParam = \case+        "1" -> Right X1+        "2" -> Right X2+        x -> Left ("Unable to parse Xgafv from: " <> x)++instance ToHttpApiData Xgafv where+    toQueryParam = \case+        X1 -> "1"+        X2 -> "2"++instance FromJSON Xgafv where+    parseJSON = parseJSONText "Xgafv"++instance ToJSON Xgafv where+    toJSON = toJSONText
+ gen/Network/Google/Resource/FactCheckTools/Claims/Search.hs view
@@ -0,0 +1,236 @@+{-# 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.FactCheckTools.Claims.Search+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Search through fact-checked claims.+--+-- /See:/ <https://developers.google.com/fact-check/tools/api/ Fact Check Tools API Reference> for @factchecktools.claims.search@.+module Network.Google.Resource.FactCheckTools.Claims.Search+    (+    -- * REST Resource+      ClaimsSearchResource++    -- * Creating a Request+    , claimsSearch+    , ClaimsSearch++    -- * Request Lenses+    , csXgafv+    , csLanguageCode+    , csUploadProtocol+    , csOffSet+    , csMaxAgeDays+    , csAccessToken+    , csUploadType+    , csReviewPublisherSiteFilter+    , csQuery+    , csPageToken+    , csPageSize+    , csCallback+    ) where++import           Network.Google.FactCheckTools.Types+import           Network.Google.Prelude++-- | A resource alias for @factchecktools.claims.search@ method which the+-- 'ClaimsSearch' request conforms to.+type ClaimsSearchResource =+     "v1alpha1" :>+       "claims:search" :>+         QueryParam "$.xgafv" Xgafv :>+           QueryParam "languageCode" Text :>+             QueryParam "upload_protocol" Text :>+               QueryParam "offset" (Textual Int32) :>+                 QueryParam "maxAgeDays" (Textual Int32) :>+                   QueryParam "access_token" Text :>+                     QueryParam "uploadType" Text :>+                       QueryParam "reviewPublisherSiteFilter" Text :>+                         QueryParam "query" Text :>+                           QueryParam "pageToken" Text :>+                             QueryParam "pageSize" (Textual Int32) :>+                               QueryParam "callback" Text :>+                                 QueryParam "alt" AltJSON :>+                                   Get '[JSON]+                                     GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse++-- | Search through fact-checked claims.+--+-- /See:/ 'claimsSearch' smart constructor.+data ClaimsSearch =+  ClaimsSearch'+    { _csXgafv                     :: !(Maybe Xgafv)+    , _csLanguageCode              :: !(Maybe Text)+    , _csUploadProtocol            :: !(Maybe Text)+    , _csOffSet                    :: !(Maybe (Textual Int32))+    , _csMaxAgeDays                :: !(Maybe (Textual Int32))+    , _csAccessToken               :: !(Maybe Text)+    , _csUploadType                :: !(Maybe Text)+    , _csReviewPublisherSiteFilter :: !(Maybe Text)+    , _csQuery                     :: !(Maybe Text)+    , _csPageToken                 :: !(Maybe Text)+    , _csPageSize                  :: !(Maybe (Textual Int32))+    , _csCallback                  :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'ClaimsSearch' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'csXgafv'+--+-- * 'csLanguageCode'+--+-- * 'csUploadProtocol'+--+-- * 'csOffSet'+--+-- * 'csMaxAgeDays'+--+-- * 'csAccessToken'+--+-- * 'csUploadType'+--+-- * 'csReviewPublisherSiteFilter'+--+-- * 'csQuery'+--+-- * 'csPageToken'+--+-- * 'csPageSize'+--+-- * 'csCallback'+claimsSearch+    :: ClaimsSearch+claimsSearch =+  ClaimsSearch'+    { _csXgafv = Nothing+    , _csLanguageCode = Nothing+    , _csUploadProtocol = Nothing+    , _csOffSet = Nothing+    , _csMaxAgeDays = Nothing+    , _csAccessToken = Nothing+    , _csUploadType = Nothing+    , _csReviewPublisherSiteFilter = Nothing+    , _csQuery = Nothing+    , _csPageToken = Nothing+    , _csPageSize = Nothing+    , _csCallback = Nothing+    }+++-- | V1 error format.+csXgafv :: Lens' ClaimsSearch (Maybe Xgafv)+csXgafv = lens _csXgafv (\ s a -> s{_csXgafv = a})++-- | The BCP-47 language code, such as \"en-US\" or \"sr-Latn\". Can be used+-- to restrict results by language, though we do not currently consider the+-- region.+csLanguageCode :: Lens' ClaimsSearch (Maybe Text)+csLanguageCode+  = lens _csLanguageCode+      (\ s a -> s{_csLanguageCode = a})++-- | Upload protocol for media (e.g. \"raw\", \"multipart\").+csUploadProtocol :: Lens' ClaimsSearch (Maybe Text)+csUploadProtocol+  = lens _csUploadProtocol+      (\ s a -> s{_csUploadProtocol = a})++-- | An integer that specifies the current offset (that is, starting result+-- location) in search results. This field is only considered if+-- \`page_token\` is unset. For example, 0 means to return results starting+-- from the first matching result, and 10 means to return from the 11th+-- result.+csOffSet :: Lens' ClaimsSearch (Maybe Int32)+csOffSet+  = lens _csOffSet (\ s a -> s{_csOffSet = a}) .+      mapping _Coerce++-- | The maximum age of the returned search results, in days. Age is+-- determined by either claim date or review date, whichever is newer.+csMaxAgeDays :: Lens' ClaimsSearch (Maybe Int32)+csMaxAgeDays+  = lens _csMaxAgeDays (\ s a -> s{_csMaxAgeDays = a})+      . mapping _Coerce++-- | OAuth access token.+csAccessToken :: Lens' ClaimsSearch (Maybe Text)+csAccessToken+  = lens _csAccessToken+      (\ s a -> s{_csAccessToken = a})++-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+csUploadType :: Lens' ClaimsSearch (Maybe Text)+csUploadType+  = lens _csUploadType (\ s a -> s{_csUploadType = a})++-- | The review publisher site to filter results by, e.g. nytimes.com.+csReviewPublisherSiteFilter :: Lens' ClaimsSearch (Maybe Text)+csReviewPublisherSiteFilter+  = lens _csReviewPublisherSiteFilter+      (\ s a -> s{_csReviewPublisherSiteFilter = a})++-- | Textual query string. Required unless \`review_publisher_site_filter\`+-- is specified.+csQuery :: Lens' ClaimsSearch (Maybe Text)+csQuery = lens _csQuery (\ s a -> s{_csQuery = a})++-- | The pagination token. You may provide the \`next_page_token\` returned+-- from a previous List request, if any, in order to get the next page. All+-- other fields must have the same values as in the previous request.+csPageToken :: Lens' ClaimsSearch (Maybe Text)+csPageToken+  = lens _csPageToken (\ s a -> s{_csPageToken = a})++-- | The pagination size. We will return up to that many results. Defaults to+-- 10 if not set.+csPageSize :: Lens' ClaimsSearch (Maybe Int32)+csPageSize+  = lens _csPageSize (\ s a -> s{_csPageSize = a}) .+      mapping _Coerce++-- | JSONP+csCallback :: Lens' ClaimsSearch (Maybe Text)+csCallback+  = lens _csCallback (\ s a -> s{_csCallback = a})++instance GoogleRequest ClaimsSearch where+        type Rs ClaimsSearch =+             GoogleFactcheckingFactchecktoolsV1alpha1FactCheckedClaimSearchResponse+        type Scopes ClaimsSearch = '[]+        requestClient ClaimsSearch'{..}+          = go _csXgafv _csLanguageCode _csUploadProtocol+              _csOffSet+              _csMaxAgeDays+              _csAccessToken+              _csUploadType+              _csReviewPublisherSiteFilter+              _csQuery+              _csPageToken+              _csPageSize+              _csCallback+              (Just AltJSON)+              factCheckToolsService+          where go+                  = buildClient (Proxy :: Proxy ClaimsSearchResource)+                      mempty
+ gen/Network/Google/Resource/FactCheckTools/Pages/Create.hs view
@@ -0,0 +1,153 @@+{-# 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.FactCheckTools.Pages.Create+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Create \`ClaimReview\` markup on a page.+--+-- /See:/ <https://developers.google.com/fact-check/tools/api/ Fact Check Tools API Reference> for @factchecktools.pages.create@.+module Network.Google.Resource.FactCheckTools.Pages.Create+    (+    -- * REST Resource+      PagesCreateResource++    -- * Creating a Request+    , pagesCreate+    , PagesCreate++    -- * Request Lenses+    , pcXgafv+    , pcUploadProtocol+    , pcAccessToken+    , pcUploadType+    , pcPayload+    , pcCallback+    ) where++import           Network.Google.FactCheckTools.Types+import           Network.Google.Prelude++-- | A resource alias for @factchecktools.pages.create@ method which the+-- 'PagesCreate' request conforms to.+type PagesCreateResource =+     "v1alpha1" :>+       "pages" :>+         QueryParam "$.xgafv" Xgafv :>+           QueryParam "upload_protocol" Text :>+             QueryParam "access_token" Text :>+               QueryParam "uploadType" Text :>+                 QueryParam "callback" Text :>+                   QueryParam "alt" AltJSON :>+                     ReqBody '[JSON]+                       GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+                       :>+                       Post '[JSON]+                         GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage++-- | Create \`ClaimReview\` markup on a page.+--+-- /See:/ 'pagesCreate' smart constructor.+data PagesCreate =+  PagesCreate'+    { _pcXgafv          :: !(Maybe Xgafv)+    , _pcUploadProtocol :: !(Maybe Text)+    , _pcAccessToken    :: !(Maybe Text)+    , _pcUploadType     :: !(Maybe Text)+    , _pcPayload        :: !GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+    , _pcCallback       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'PagesCreate' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'pcXgafv'+--+-- * 'pcUploadProtocol'+--+-- * 'pcAccessToken'+--+-- * 'pcUploadType'+--+-- * 'pcPayload'+--+-- * 'pcCallback'+pagesCreate+    :: GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage -- ^ 'pcPayload'+    -> PagesCreate+pagesCreate pPcPayload_ =+  PagesCreate'+    { _pcXgafv = Nothing+    , _pcUploadProtocol = Nothing+    , _pcAccessToken = Nothing+    , _pcUploadType = Nothing+    , _pcPayload = pPcPayload_+    , _pcCallback = Nothing+    }+++-- | V1 error format.+pcXgafv :: Lens' PagesCreate (Maybe Xgafv)+pcXgafv = lens _pcXgafv (\ s a -> s{_pcXgafv = a})++-- | Upload protocol for media (e.g. \"raw\", \"multipart\").+pcUploadProtocol :: Lens' PagesCreate (Maybe Text)+pcUploadProtocol+  = lens _pcUploadProtocol+      (\ s a -> s{_pcUploadProtocol = a})++-- | OAuth access token.+pcAccessToken :: Lens' PagesCreate (Maybe Text)+pcAccessToken+  = lens _pcAccessToken+      (\ s a -> s{_pcAccessToken = a})++-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+pcUploadType :: Lens' PagesCreate (Maybe Text)+pcUploadType+  = lens _pcUploadType (\ s a -> s{_pcUploadType = a})++-- | Multipart request metadata.+pcPayload :: Lens' PagesCreate GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+pcPayload+  = lens _pcPayload (\ s a -> s{_pcPayload = a})++-- | JSONP+pcCallback :: Lens' PagesCreate (Maybe Text)+pcCallback+  = lens _pcCallback (\ s a -> s{_pcCallback = a})++instance GoogleRequest PagesCreate where+        type Rs PagesCreate =+             GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+        type Scopes PagesCreate =+             '["https://www.googleapis.com/auth/userinfo.email"]+        requestClient PagesCreate'{..}+          = go _pcXgafv _pcUploadProtocol _pcAccessToken+              _pcUploadType+              _pcCallback+              (Just AltJSON)+              _pcPayload+              factCheckToolsService+          where go+                  = buildClient (Proxy :: Proxy PagesCreateResource)+                      mempty
+ gen/Network/Google/Resource/FactCheckTools/Pages/Delete.hs view
@@ -0,0 +1,147 @@+{-# 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.FactCheckTools.Pages.Delete+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Delete all \`ClaimReview\` markup on a page.+--+-- /See:/ <https://developers.google.com/fact-check/tools/api/ Fact Check Tools API Reference> for @factchecktools.pages.delete@.+module Network.Google.Resource.FactCheckTools.Pages.Delete+    (+    -- * REST Resource+      PagesDeleteResource++    -- * Creating a Request+    , pagesDelete+    , PagesDelete++    -- * Request Lenses+    , pdXgafv+    , pdUploadProtocol+    , pdAccessToken+    , pdUploadType+    , pdName+    , pdCallback+    ) where++import           Network.Google.FactCheckTools.Types+import           Network.Google.Prelude++-- | A resource alias for @factchecktools.pages.delete@ method which the+-- 'PagesDelete' request conforms to.+type PagesDeleteResource =+     "v1alpha1" :>+       Capture "name" Text :>+         QueryParam "$.xgafv" Xgafv :>+           QueryParam "upload_protocol" Text :>+             QueryParam "access_token" Text :>+               QueryParam "uploadType" Text :>+                 QueryParam "callback" Text :>+                   QueryParam "alt" AltJSON :>+                     Delete '[JSON] GoogleProtobufEmpty++-- | Delete all \`ClaimReview\` markup on a page.+--+-- /See:/ 'pagesDelete' smart constructor.+data PagesDelete =+  PagesDelete'+    { _pdXgafv          :: !(Maybe Xgafv)+    , _pdUploadProtocol :: !(Maybe Text)+    , _pdAccessToken    :: !(Maybe Text)+    , _pdUploadType     :: !(Maybe Text)+    , _pdName           :: !Text+    , _pdCallback       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'PagesDelete' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'pdXgafv'+--+-- * 'pdUploadProtocol'+--+-- * 'pdAccessToken'+--+-- * 'pdUploadType'+--+-- * 'pdName'+--+-- * 'pdCallback'+pagesDelete+    :: Text -- ^ 'pdName'+    -> PagesDelete+pagesDelete pPdName_ =+  PagesDelete'+    { _pdXgafv = Nothing+    , _pdUploadProtocol = Nothing+    , _pdAccessToken = Nothing+    , _pdUploadType = Nothing+    , _pdName = pPdName_+    , _pdCallback = Nothing+    }+++-- | V1 error format.+pdXgafv :: Lens' PagesDelete (Maybe Xgafv)+pdXgafv = lens _pdXgafv (\ s a -> s{_pdXgafv = a})++-- | Upload protocol for media (e.g. \"raw\", \"multipart\").+pdUploadProtocol :: Lens' PagesDelete (Maybe Text)+pdUploadProtocol+  = lens _pdUploadProtocol+      (\ s a -> s{_pdUploadProtocol = a})++-- | OAuth access token.+pdAccessToken :: Lens' PagesDelete (Maybe Text)+pdAccessToken+  = lens _pdAccessToken+      (\ s a -> s{_pdAccessToken = a})++-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+pdUploadType :: Lens' PagesDelete (Maybe Text)+pdUploadType+  = lens _pdUploadType (\ s a -> s{_pdUploadType = a})++-- | The name of the resource to delete, in the form of \`pages\/{page_id}\`.+pdName :: Lens' PagesDelete Text+pdName = lens _pdName (\ s a -> s{_pdName = a})++-- | JSONP+pdCallback :: Lens' PagesDelete (Maybe Text)+pdCallback+  = lens _pdCallback (\ s a -> s{_pdCallback = a})++instance GoogleRequest PagesDelete where+        type Rs PagesDelete = GoogleProtobufEmpty+        type Scopes PagesDelete =+             '["https://www.googleapis.com/auth/userinfo.email"]+        requestClient PagesDelete'{..}+          = go _pdName _pdXgafv _pdUploadProtocol+              _pdAccessToken+              _pdUploadType+              _pdCallback+              (Just AltJSON)+              factCheckToolsService+          where go+                  = buildClient (Proxy :: Proxy PagesDeleteResource)+                      mempty
+ gen/Network/Google/Resource/FactCheckTools/Pages/Get.hs view
@@ -0,0 +1,149 @@+{-# 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.FactCheckTools.Pages.Get+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Get all \`ClaimReview\` markup on a page.+--+-- /See:/ <https://developers.google.com/fact-check/tools/api/ Fact Check Tools API Reference> for @factchecktools.pages.get@.+module Network.Google.Resource.FactCheckTools.Pages.Get+    (+    -- * REST Resource+      PagesGetResource++    -- * Creating a Request+    , pagesGet+    , PagesGet++    -- * Request Lenses+    , pgXgafv+    , pgUploadProtocol+    , pgAccessToken+    , pgUploadType+    , pgName+    , pgCallback+    ) where++import           Network.Google.FactCheckTools.Types+import           Network.Google.Prelude++-- | A resource alias for @factchecktools.pages.get@ method which the+-- 'PagesGet' request conforms to.+type PagesGetResource =+     "v1alpha1" :>+       Capture "name" Text :>+         QueryParam "$.xgafv" Xgafv :>+           QueryParam "upload_protocol" Text :>+             QueryParam "access_token" Text :>+               QueryParam "uploadType" Text :>+                 QueryParam "callback" Text :>+                   QueryParam "alt" AltJSON :>+                     Get '[JSON]+                       GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage++-- | Get all \`ClaimReview\` markup on a page.+--+-- /See:/ 'pagesGet' smart constructor.+data PagesGet =+  PagesGet'+    { _pgXgafv          :: !(Maybe Xgafv)+    , _pgUploadProtocol :: !(Maybe Text)+    , _pgAccessToken    :: !(Maybe Text)+    , _pgUploadType     :: !(Maybe Text)+    , _pgName           :: !Text+    , _pgCallback       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'PagesGet' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'pgXgafv'+--+-- * 'pgUploadProtocol'+--+-- * 'pgAccessToken'+--+-- * 'pgUploadType'+--+-- * 'pgName'+--+-- * 'pgCallback'+pagesGet+    :: Text -- ^ 'pgName'+    -> PagesGet+pagesGet pPgName_ =+  PagesGet'+    { _pgXgafv = Nothing+    , _pgUploadProtocol = Nothing+    , _pgAccessToken = Nothing+    , _pgUploadType = Nothing+    , _pgName = pPgName_+    , _pgCallback = Nothing+    }+++-- | V1 error format.+pgXgafv :: Lens' PagesGet (Maybe Xgafv)+pgXgafv = lens _pgXgafv (\ s a -> s{_pgXgafv = a})++-- | Upload protocol for media (e.g. \"raw\", \"multipart\").+pgUploadProtocol :: Lens' PagesGet (Maybe Text)+pgUploadProtocol+  = lens _pgUploadProtocol+      (\ s a -> s{_pgUploadProtocol = a})++-- | OAuth access token.+pgAccessToken :: Lens' PagesGet (Maybe Text)+pgAccessToken+  = lens _pgAccessToken+      (\ s a -> s{_pgAccessToken = a})++-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+pgUploadType :: Lens' PagesGet (Maybe Text)+pgUploadType+  = lens _pgUploadType (\ s a -> s{_pgUploadType = a})++-- | The name of the resource to get, in the form of \`pages\/{page_id}\`.+pgName :: Lens' PagesGet Text+pgName = lens _pgName (\ s a -> s{_pgName = a})++-- | JSONP+pgCallback :: Lens' PagesGet (Maybe Text)+pgCallback+  = lens _pgCallback (\ s a -> s{_pgCallback = a})++instance GoogleRequest PagesGet where+        type Rs PagesGet =+             GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+        type Scopes PagesGet =+             '["https://www.googleapis.com/auth/userinfo.email"]+        requestClient PagesGet'{..}+          = go _pgName _pgXgafv _pgUploadProtocol+              _pgAccessToken+              _pgUploadType+              _pgCallback+              (Just AltJSON)+              factCheckToolsService+          where go+                  = buildClient (Proxy :: Proxy PagesGetResource)+                      mempty
+ gen/Network/Google/Resource/FactCheckTools/Pages/List.hs view
@@ -0,0 +1,213 @@+{-# 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.FactCheckTools.Pages.List+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- List the \`ClaimReview\` markup pages for a specific URL or for an+-- organization.+--+-- /See:/ <https://developers.google.com/fact-check/tools/api/ Fact Check Tools API Reference> for @factchecktools.pages.list@.+module Network.Google.Resource.FactCheckTools.Pages.List+    (+    -- * REST Resource+      PagesListResource++    -- * Creating a Request+    , pagesList+    , PagesList++    -- * Request Lenses+    , plXgafv+    , plUploadProtocol+    , plOffSet+    , plAccessToken+    , plURL+    , plUploadType+    , plPageToken+    , plOrganization+    , plPageSize+    , plCallback+    ) where++import           Network.Google.FactCheckTools.Types+import           Network.Google.Prelude++-- | A resource alias for @factchecktools.pages.list@ method which the+-- 'PagesList' request conforms to.+type PagesListResource =+     "v1alpha1" :>+       "pages" :>+         QueryParam "$.xgafv" Xgafv :>+           QueryParam "upload_protocol" Text :>+             QueryParam "offset" (Textual Int32) :>+               QueryParam "access_token" Text :>+                 QueryParam "url" Text :>+                   QueryParam "uploadType" Text :>+                     QueryParam "pageToken" Text :>+                       QueryParam "organization" Text :>+                         QueryParam "pageSize" (Textual Int32) :>+                           QueryParam "callback" Text :>+                             QueryParam "alt" AltJSON :>+                               Get '[JSON]+                                 GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse++-- | List the \`ClaimReview\` markup pages for a specific URL or for an+-- organization.+--+-- /See:/ 'pagesList' smart constructor.+data PagesList =+  PagesList'+    { _plXgafv          :: !(Maybe Xgafv)+    , _plUploadProtocol :: !(Maybe Text)+    , _plOffSet         :: !(Maybe (Textual Int32))+    , _plAccessToken    :: !(Maybe Text)+    , _plURL            :: !(Maybe Text)+    , _plUploadType     :: !(Maybe Text)+    , _plPageToken      :: !(Maybe Text)+    , _plOrganization   :: !(Maybe Text)+    , _plPageSize       :: !(Maybe (Textual Int32))+    , _plCallback       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'PagesList' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'plXgafv'+--+-- * 'plUploadProtocol'+--+-- * 'plOffSet'+--+-- * 'plAccessToken'+--+-- * 'plURL'+--+-- * 'plUploadType'+--+-- * 'plPageToken'+--+-- * 'plOrganization'+--+-- * 'plPageSize'+--+-- * 'plCallback'+pagesList+    :: PagesList+pagesList =+  PagesList'+    { _plXgafv = Nothing+    , _plUploadProtocol = Nothing+    , _plOffSet = Nothing+    , _plAccessToken = Nothing+    , _plURL = Nothing+    , _plUploadType = Nothing+    , _plPageToken = Nothing+    , _plOrganization = Nothing+    , _plPageSize = Nothing+    , _plCallback = Nothing+    }+++-- | V1 error format.+plXgafv :: Lens' PagesList (Maybe Xgafv)+plXgafv = lens _plXgafv (\ s a -> s{_plXgafv = a})++-- | Upload protocol for media (e.g. \"raw\", \"multipart\").+plUploadProtocol :: Lens' PagesList (Maybe Text)+plUploadProtocol+  = lens _plUploadProtocol+      (\ s a -> s{_plUploadProtocol = a})++-- | An integer that specifies the current offset (that is, starting result+-- location) in search results. This field is only considered if+-- \`page_token\` is unset, and if the request is not for a specific URL.+-- For example, 0 means to return results starting from the first matching+-- result, and 10 means to return from the 11th result.+plOffSet :: Lens' PagesList (Maybe Int32)+plOffSet+  = lens _plOffSet (\ s a -> s{_plOffSet = a}) .+      mapping _Coerce++-- | OAuth access token.+plAccessToken :: Lens' PagesList (Maybe Text)+plAccessToken+  = lens _plAccessToken+      (\ s a -> s{_plAccessToken = a})++-- | The URL from which to get \`ClaimReview\` markup. There will be at most+-- one result. If markup is associated with a more canonical version of the+-- URL provided, we will return that URL instead. Cannot be specified along+-- with an organization.+plURL :: Lens' PagesList (Maybe Text)+plURL = lens _plURL (\ s a -> s{_plURL = a})++-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+plUploadType :: Lens' PagesList (Maybe Text)+plUploadType+  = lens _plUploadType (\ s a -> s{_plUploadType = a})++-- | The pagination token. You may provide the \`next_page_token\` returned+-- from a previous List request, if any, in order to get the next page. All+-- other fields must have the same values as in the previous request.+plPageToken :: Lens' PagesList (Maybe Text)+plPageToken+  = lens _plPageToken (\ s a -> s{_plPageToken = a})++-- | The organization for which we want to fetch markups for. For instance,+-- \"site.com\". Cannot be specified along with an URL.+plOrganization :: Lens' PagesList (Maybe Text)+plOrganization+  = lens _plOrganization+      (\ s a -> s{_plOrganization = a})++-- | The pagination size. We will return up to that many results. Defaults to+-- 10 if not set. Has no effect if a URL is requested.+plPageSize :: Lens' PagesList (Maybe Int32)+plPageSize+  = lens _plPageSize (\ s a -> s{_plPageSize = a}) .+      mapping _Coerce++-- | JSONP+plCallback :: Lens' PagesList (Maybe Text)+plCallback+  = lens _plCallback (\ s a -> s{_plCallback = a})++instance GoogleRequest PagesList where+        type Rs PagesList =+             GoogleFactcheckingFactchecktoolsV1alpha1ListClaimReviewMarkupPagesResponse+        type Scopes PagesList =+             '["https://www.googleapis.com/auth/userinfo.email"]+        requestClient PagesList'{..}+          = go _plXgafv _plUploadProtocol _plOffSet+              _plAccessToken+              _plURL+              _plUploadType+              _plPageToken+              _plOrganization+              _plPageSize+              _plCallback+              (Just AltJSON)+              factCheckToolsService+          where go+                  = buildClient (Proxy :: Proxy PagesListResource)+                      mempty
+ gen/Network/Google/Resource/FactCheckTools/Pages/Update.hs view
@@ -0,0 +1,172 @@+{-# 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.FactCheckTools.Pages.Update+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Update for all \`ClaimReview\` markup on a page Note that this is a full+-- update. To retain the existing \`ClaimReview\` markup on a page, first+-- perform a Get operation, then modify the returned markup, and finally+-- call Update with the entire \`ClaimReview\` markup as the body.+--+-- /See:/ <https://developers.google.com/fact-check/tools/api/ Fact Check Tools API Reference> for @factchecktools.pages.update@.+module Network.Google.Resource.FactCheckTools.Pages.Update+    (+    -- * REST Resource+      PagesUpdateResource++    -- * Creating a Request+    , pagesUpdate+    , PagesUpdate++    -- * Request Lenses+    , puXgafv+    , puUploadProtocol+    , puAccessToken+    , puUploadType+    , puPayload+    , puName+    , puCallback+    ) where++import           Network.Google.FactCheckTools.Types+import           Network.Google.Prelude++-- | A resource alias for @factchecktools.pages.update@ method which the+-- 'PagesUpdate' request conforms to.+type PagesUpdateResource =+     "v1alpha1" :>+       Capture "name" Text :>+         QueryParam "$.xgafv" Xgafv :>+           QueryParam "upload_protocol" Text :>+             QueryParam "access_token" Text :>+               QueryParam "uploadType" Text :>+                 QueryParam "callback" Text :>+                   QueryParam "alt" AltJSON :>+                     ReqBody '[JSON]+                       GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+                       :>+                       Put '[JSON]+                         GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage++-- | Update for all \`ClaimReview\` markup on a page Note that this is a full+-- update. To retain the existing \`ClaimReview\` markup on a page, first+-- perform a Get operation, then modify the returned markup, and finally+-- call Update with the entire \`ClaimReview\` markup as the body.+--+-- /See:/ 'pagesUpdate' smart constructor.+data PagesUpdate =+  PagesUpdate'+    { _puXgafv          :: !(Maybe Xgafv)+    , _puUploadProtocol :: !(Maybe Text)+    , _puAccessToken    :: !(Maybe Text)+    , _puUploadType     :: !(Maybe Text)+    , _puPayload        :: !GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+    , _puName           :: !Text+    , _puCallback       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'PagesUpdate' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'puXgafv'+--+-- * 'puUploadProtocol'+--+-- * 'puAccessToken'+--+-- * 'puUploadType'+--+-- * 'puPayload'+--+-- * 'puName'+--+-- * 'puCallback'+pagesUpdate+    :: GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage -- ^ 'puPayload'+    -> Text -- ^ 'puName'+    -> PagesUpdate+pagesUpdate pPuPayload_ pPuName_ =+  PagesUpdate'+    { _puXgafv = Nothing+    , _puUploadProtocol = Nothing+    , _puAccessToken = Nothing+    , _puUploadType = Nothing+    , _puPayload = pPuPayload_+    , _puName = pPuName_+    , _puCallback = Nothing+    }+++-- | V1 error format.+puXgafv :: Lens' PagesUpdate (Maybe Xgafv)+puXgafv = lens _puXgafv (\ s a -> s{_puXgafv = a})++-- | Upload protocol for media (e.g. \"raw\", \"multipart\").+puUploadProtocol :: Lens' PagesUpdate (Maybe Text)+puUploadProtocol+  = lens _puUploadProtocol+      (\ s a -> s{_puUploadProtocol = a})++-- | OAuth access token.+puAccessToken :: Lens' PagesUpdate (Maybe Text)+puAccessToken+  = lens _puAccessToken+      (\ s a -> s{_puAccessToken = a})++-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+puUploadType :: Lens' PagesUpdate (Maybe Text)+puUploadType+  = lens _puUploadType (\ s a -> s{_puUploadType = a})++-- | Multipart request metadata.+puPayload :: Lens' PagesUpdate GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+puPayload+  = lens _puPayload (\ s a -> s{_puPayload = a})++-- | The name of this \`ClaimReview\` markup page resource, in the form of+-- \`pages\/{page_id}\`. Except for update requests, this field is+-- output-only and should not be set by the user.+puName :: Lens' PagesUpdate Text+puName = lens _puName (\ s a -> s{_puName = a})++-- | JSONP+puCallback :: Lens' PagesUpdate (Maybe Text)+puCallback+  = lens _puCallback (\ s a -> s{_puCallback = a})++instance GoogleRequest PagesUpdate where+        type Rs PagesUpdate =+             GoogleFactcheckingFactchecktoolsV1alpha1ClaimReviewMarkupPage+        type Scopes PagesUpdate =+             '["https://www.googleapis.com/auth/userinfo.email"]+        requestClient PagesUpdate'{..}+          = go _puName _puXgafv _puUploadProtocol+              _puAccessToken+              _puUploadType+              _puCallback+              (Just AltJSON)+              _puPayload+              factCheckToolsService+          where go+                  = buildClient (Proxy :: Proxy PagesUpdateResource)+                      mempty
+ gogol-factchecktools.cabal view
@@ -0,0 +1,51 @@+name:                  gogol-factchecktools+version:               0.5.0+synopsis:              Google Fact Check Tools SDK.+homepage:              https://github.com/brendanhay/gogol+bug-reports:           https://github.com/brendanhay/gogol/issues+license:               OtherLicense+license-file:          LICENSE+author:                Brendan Hay+maintainer:            Brendan Hay <brendan.g.hay@gmail.com>+copyright:             Copyright (c) 2015-2016 Brendan Hay+category:              Network, Google, Cloud+build-type:            Simple+cabal-version:         >= 1.10+extra-source-files:    README.md src/.gitkeep++description:++    .+    /Warning:/ This is an experimental prototype/preview release which is still+    under exploratory development and not intended for public use, caveat emptor!+    .+    This library is compatible with version @v1alpha1@+    of the API.++source-repository head+    type:     git+    location: git://github.com/brendanhay/gogol.git++library+    default-language:  Haskell2010+    hs-source-dirs:    src gen++    ghc-options:       -Wall++    exposed-modules:+          Network.Google.FactCheckTools+        , Network.Google.FactCheckTools.Types+        , Network.Google.Resource.FactCheckTools.Claims.Search+        , Network.Google.Resource.FactCheckTools.Pages.Create+        , Network.Google.Resource.FactCheckTools.Pages.Delete+        , Network.Google.Resource.FactCheckTools.Pages.Get+        , Network.Google.Resource.FactCheckTools.Pages.List+        , Network.Google.Resource.FactCheckTools.Pages.Update++    other-modules:+          Network.Google.FactCheckTools.Types.Product+        , Network.Google.FactCheckTools.Types.Sum++    build-depends:+          gogol-core == 0.5.0.*+        , base       >= 4.7 && < 5
+ src/.gitkeep view