!"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ None+24M` geography ID Instagram returns data:null for nothing, but Aeson considers that () maps to an empty array... so we model the fact that we expect null via NoResult  a relationship between two usersnot present in docincoming relationship status outgoing relationship status a Tag Tag Name an update from a subscription *a subscription to a real time notification'notification aspect(#the URL to receive notifications to)?a collection of items (count + data) data can only be a subset-Commenton on a medium3 comment id4#different images for the same media9data for a single image>geographical location infoE location IDFposition of a userJposition in pictureNinstagram media object^seems to be open format Whttps://groups.google.com/forum/?fromgroups#!topic/instagram-api-developers/KvGH1cnjljQ_Media ID`=pagination info for responses that can return a lot of data +error envelope for Instagram error responseg"envelope for Instagram OK responseiAthis should only say 200, no error, but put here for completenessj@data, garanteed to be present (otherwise we get an ErrEnvelope) l/an exception that a call to instagram may throwapplication exceptionJSON parsingError$an error returned to us by Instagramm the scopes of the authenticationr/the User counts info returned by some endpointsw?the User partial profile returned by the authentication User ID!the access token is simply a Text-the oauth token returned after authenticationthe access tokenthe user structure returnedthe app credentials client id client secret  get client id in ByteString form $get client secret in ByteString form2the media Aspect, the only one supported for now  !from json as per Instagram format !to json as per Instagram format  !from json as per Instagram format#to json as per Instagram format !from json as per Instagram format to json as per Instagram format !from json as per Instagram format to json as per Instagram format !from json as per Instagram format#to json as per Instagram format !from json as per Instagram format#to json as per Instagram format !from json as per Instagram format#to json as per Instagram format !from json as per Instagram format#to json as per Instagram format !from json as per Instagram format#to json as per Instagram format !from json asCommentstagram format#to json asCommentstagram format !from json as per Instagram format %to json as per Instagram format !!from json as per Instagram format"%to json as per Instagram format #!from json as per Instagram format$%to json as per Instagram format %!from json as per Instagram format&%to json as per Instagram format '!from json as per Instagram format(%to json as per Instagram format )!from json as per Instagram format*#to json as per Instagram format +!from json as per Instagram format,#to json as per Instagram format -!from json as per Instagram format.#to json as per Instagram format /!from json as per Instagram format0#to json as per Instagram format 1,make our exception type a normal exception 2!from json as per Instagram format3#to json as per Instagram format 4to json as per Instagram format5!from json as per Instagram format6!from json as per Instagram format7#to json as per Instagram format 8 simple string9simple string :)from json as per Instagram format ;to json as per Instagram format<  !"#$%&'=()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdef>?ghijkl@ABCmnopqrstuvwxyz{|}~      !"#$%&'()*+,-./0123456789:;  !"#$%&'=()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdef>?ghijklmnopqrstuvwxyz{|}~  V<     !"#$%&'=()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdef>?ghijkl@ABCmqponrstuvwxyz{|}~      !"#$%&'()*+,-./0123456789:;None*+2346=BHKMDXsimple class used to hide the serialization of parameters ansd simplify the calling codeE&the data kept through the computationsFapp credentialsGHTTP connection managerH host namefthe instagram monad transformer this encapsulates the data necessary to pass the app credentials, etcRun a computation in the * monad transformer with your credentials.IGet the user's credentials.JGet the instagram hostK!build a post request to InstagramL build a get request to InstagramM$build a delete request to InstagramN3build a URL for a get operation with a single queryO4perform a HTTP request and deal with the JSON resultP_get a JSON response from a request to Instagram instagram returns either a result, or an errorQUget an envelope from a request to Instagram the error is wrapped inside the envelopeRget an envelope from InstagramS<get an envelope from Instagram, with optional authenticationT0send a delete and get an envelope from InstagramUNsend a delete and get an envelope from Instagram, with optional authenticationV6post a request and get back an envelope from InstagramWTpost a request and get back an envelope from Instagram, with optional authenticationXMutility function to get an envelop, independently of how the request is builtUse the pagination links in an g$ to fetch the next page of results.If the Envelope has no pagination, or we have reached the final page (indicated by the pNextUrl field being missing), returns Nothing.YGet the Z.Run a  ResourceT inside a .[#Transform the computation inside a .\True if the the Status is ok (i.e. 2XX).]!add the access token to the query^]add an optional access token to the query if we don't have a token, we'll pass the client_id_(add application client info to the query/D`EaFGHbcYour app's credentials.Connection manager (see d).the action to run the resultIJK the url paththe query parametersthe properly configured requestL the url paththe query parametersthe properly configured requestM the url paththe query parametersthe properly configured requestN the url paththe query parametersthe URLOextract the error from the JSONPQR(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeS(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeT(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeU(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeV(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeW(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeXthe request building method(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeY[\]^_efghijklmnopqrD`IJKLMNPQRSTUVWY[]^_(D`EaFGHbcIJKLMNOPQRSTUVWXY[\]^_efghijklmnopNone+3deletion parameters"delete all geography subscriptions!delete all location subscriptionsdelete all tag subscriptionsdelete all user subscriptions%delete one subscription, given its IDdelete all subscriptionsdetails of subscription request@when a picture is tagged with a location inside the given region1when a picture is tagged with a specific location+when a picture is tagged with the given tagwhen a user uploads a picture(parameters for the subscription creationthe actual subscription request,the url Instagram will post notifications tothe subscription aspectthe verification tokencreate a subscription*list all subscriptions for the application&delete subscriptions based on criteriaBverify the signature with the content, using the secret as the keys to HTTP queryt to HTTP queryu to HTTP querythe subscription parametersthe created subscriptionthe ID of the subscriptionthe parameters for the deletionthe ID of the subscription the signature the contentstu  stuNone+3relationship action(Get the list of users this user follows./Get the list of users this user is followed by.(Get the list of users this user follows./Get the list of users this user is followed by.CList the users who have requested this user's permission to follow.5Get information about a relationship to another user.EModify the relationship between the current user and the target user.vw vwNone+3$parameters for recent tag pagination#Get information about a tag object.$Get a list of recently tagged media.Search for tags by name. xyxyNone+3 parameters for self liked callparameters for self liked call#Parameters for call to recent media Parameters for call to self feed#Get basic information about a user."See the authenticated user's feed..Get the most recent media published by a user.9See the authenticated user's list of media they've liked.Search for a user by name. z{|}~z{|}~None+3#Parameters for call to media search%Get information about a media object.7Get a list of what media is most popular at the moment.!Search for media in a given area.   None+3#Parameters for call to media search6Parameters for call to recent media in location search!Get information about a location.9Get a list of recent media objects from a given location./Search for a location by geographic coordinate.  None+3.Get a list of users who have liked this media.=Set a like on this media by the currently authenticated user.@Remove a like on this media by the currently authenticated user. None+37Parameters for call to recent media in geography searchDGet very recent media from a geography subscription that you created None+3'Get a full list of comments on a media.Create a comment on a media.`Remove a comment either on the authenticated user's media or authored by the authenticated user. None+3Kthe URI to redirect the user after she accepts/refuses to authorize the app.get the authorize url to redirect your user to`second step of authorization: get the access token once the user has been redirected with a codeKthe URI to redirect the user after she accepts/refuses to authorize the app-the requested scopes (can be empty for Basic)the URL to redirect the user tothe redirect urithe code sent back to your appthe auth tokenNone+  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~lwxyz{|}~rstuvmqponghijk`abcdefNOPQRSTUVWXYZ[\]^JKLMFGHI>?@ABCD9:;<=45678-./012)*+,'( !"#$%&   _3E !!"#$%&''()*+,-./012334566789:;<<=>?@@ABCDDEFGHIJKKLMNNOPQQRSTUVWXYZ[\]^_`abbcdefghhijklmnopqrrstuvvwxyz{|}~              !"#$%&'()*+1,-./0123456789:;<=>?@ABCDEFGHIJKLMN1OPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstu v w x y z {|ig-0.4 InstagramInstagram.TypesInstagram.MonadInstagram.RealTimeInstagram.RelationshipsInstagram.TagsInstagram.UsersInstagram.MediaInstagram.LocationsInstagram.LikesInstagram.GeographiesInstagram.CommentsInstagram.Auth GeographyIDNoResult Relationship rOutgoing rIncomingrTargetUserPrivateIncomingStatusInNone BlockedByYou RequestedBy FollowedByOutgoingStatusOutNone RequestedFollowsTagtName tMediaCountTagNameUpdateuSubscriptionIDuObject uObjectIDuChangedAspectuTime SubscriptionsIDsTypesObject sObjectIDsAspect sCallbackUrl sLatitude sLongitudesRadiusAspect CallbackUrl CollectioncCountcDataCommentcIDcCreatedcTextcFrom CommentIDImagesiLowRes iThumbnail iStandardRes ImageDataidURLidWidthidHeightLocationlID lLatitude lLongitudelStreetAddresslName LocationID UserPosition upPositionupUserPositionpXpYMediamIDmCaptionmLinkmUsermCreatedmImagesmType mUsersInPhotomFiltermTags mLocation mCommentsmLikes mUserHasLiked mAttributionMediaID PaginationpNextUrl pNextMaxID pNextMinID pNextMaxTagID pMinTagIDEnvelopeeMetaeData ePagination IGExceptionScopeLikes RelationshipsCommentsBasic UserCountsucMedia ucFollows ucFollowedByUseruID uUsername uFullNameuProfilePictureuWebsiteuBiouCountsUserID AccessToken OAuthToken oaAccessTokenoaUser Credentials cClientID cClientSecretmedia InstagramT runInstagramT getNextPagerunResourceInIsDeletionParamsDeleteGeographiesDeleteLocations DeleteTags DeleteUsers DeleteOnedoID DeleteAllSubscriptionRequestGeographyRequest grLatitude grLongitudegrRadiusLocationRequestlrID TagRequesttrTag UserRequestSubscriptionParams spRequest spCallbackspAspect spVerifyTokencreateSubscriptionlistSubscriptionsdeleteSubscriptionsverifySignatureRelationShipActionDenyApproveUnblockBlockUnfollowFollow FollowParamsfpCount getFollows getFollowedBygetFollowsParamsgetFollowedByParamsgetRequestedBygetRelationshipsetRelationShipRecentTagParamsrtpMaxIDrtpMinIDgetTaggetRecentTagged searchTagsUserSearchParamsuspQueryuspCountSelfLikedParamsslpCount slpMaxLikeID RecentParamsrpCountrpMaxTimestamprpMinTimestamprpMaxIDrpMinIdSelfFeedParamssfpCountsfpMaxIDsfpMinIdgetUser getSelfFeed getRecent getSelfLiked searchUsersMediaSearchParams mspLatitude mspLongitude mspDistancemspMaxTimestampmspMinTimestampgetMediagetPopularMedia searchMediaLocationSearchParams lspLatitude lspLongitude lspDistancelspFoursquareIDv2lspFoursquareIDLocationMediaParamslmspMaxTimestamplmspMinTimestamp lmspMaxID lmspMinId getLocationgetLocationRecentMediasearchLocationsgetLikeslikeunlikeGeographyMediaParamsgmpCountgmpMinIdgetGeographyRecentMedia getComments postComment deleteComment RedirectUrigetUserAccessTokenURL1getUserAccessTokenURL2 ErrEnvelopeIGAppException JSONExceptionIGError clientIDBSclientSecretBS$fFromJSONNoResult$fToJSONNoResult$fFromJSONRelationship$fToJSONRelationship$fFromJSONIncomingStatus$fToJSONIncomingStatus$fFromJSONOutgoingStatus$fToJSONOutgoingStatus $fFromJSONTag $fToJSONTag$fFromJSONUpdate$fToJSONUpdate$fFromJSONSubscription$fToJSONSubscription$fFromJSONAspect$fToJSONAspect$fFromJSONCollection$fToJSONCollection$fFromJSONComment$fToJSONComment$fFromJSONImages$fToJSONImages$fFromJSONImageData$fToJSONImageData$fFromJSONLocation$fToJSONLocation$fFromJSONUserPosition$fToJSONUserPosition$fFromJSONPosition$fToJSONPosition$fFromJSONMedia $fToJSONMedia$fFromJSONPagination$fToJSONPagination$fFromJSONErrEnvelope$fToJSONErrEnvelope$fFromJSONEnvelope$fToJSONEnvelope$fExceptionIGException$fFromJSONIGError$fToJSONIGError$fToJSONUserCounts$fFromJSONUserCounts$fFromJSONUser $fToJSONUser$fFromJSONAccessToken$fToJSONAccessToken$fFromJSONOAuthToken$fToJSONOAuthTokeneeMetaigeCodeigeType igeMessage ToHtQueryIsDataisCreds isManagerisHostgetCredsgetHostgetPostRequest getGetRequestgetDeleteRequest getQueryURLigReqgetJSONResponsegetJSONEnvelopegetGetEnvelopegetGetEnvelopeMgetDeleteEnvelopegetDeleteEnvelopeMgetPostEnvelopegetPostEnvelopeM getEnvelopeM getManagerhttp-client-0.4.18.1Network.HTTP.Client.TypesManager mapInstagramTisOkayaddToken addTokenMaddClientInfos?+IsunIshttp-conduit-2.1.7.2Network.HTTP.Conduit withManager $fToHtQuery[]$fToHtQueryMaybe$fToHtQueryText$fToHtQueryMaybe0$fToHtQueryMaybe1$fToHtQueryMaybe2$fToHtQueryInteger$fToHtQueryMaybe3$fToHtQueryDouble$fMonadBaseControlbInstagramT$fMonadTransControlInstagramT$fMonadBasebInstagramTmonad-control-1.0.0.4Control.Monad.Trans.ControlMonadBaseControlresourcet-1.1.6%Control.Monad.Trans.Resource.Internal MonadResource$fQueryLikeDeletionParams$fQueryLikeSubscriptionRequest$fQueryLikeSubscriptionParams$fQueryLikeRelationShipAction$fQueryLikeFollowParams$fQueryLikeRecentTagParams$fDefaultRecentTagParams$fQueryLikeUserSearchParams$fQueryLikeSelfLikedParams$fDefaultSelfLikedParams$fQueryLikeRecentParams$fDefaultRecentParams$fQueryLikeSelfFeedParams$fDefaultSelfFeedParams$fQueryLikeMediaSearchParams$fDefaultMediaSearchParams$fQueryLikeLocationSearchParams$fDefaultLocationSearchParams$fQueryLikeLocationMediaParams$fDefaultLocationMediaParams$fQueryLikeGeographyMediaParams$fDefaultGeographyMediaParams