!"#$%&'()*+,-./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 partial profile returned by the authentication yUser IDz!the access token is simply a Text|-the oauth token returned after authentication~the 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 format##to json as per Instagram format $,make our exception type a normal exception %!from json as per Instagram format&#to json as per Instagram format '!from json as per Instagram format(#to json as per Instagram format ) simple string*simple string +)from json as per Instagram format ,to json as per Instagram format-  !"#$%&'.()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdef/0ghijkl1234mnopqrstuvwxyz{|}~      !"#$%&'()*+,  !"#$%&'.()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdef/0ghijklmnopqrstuvwxyz{|}~S-     !"#$%&'.()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdef/0ghijkl1234mqponrstuvwxyz{|}~      !"#$%&'()*+,None*+2346=BHKM5Xsimple class used to hide the serialization of parameters ansd simplify the calling code6&the data kept through the computations7app credentials8HTTP connection manager9 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.:Get the user's credentials.;Get the instagram host<!build a post request to Instagram= build a get request to Instagram>$build a delete request to Instagram?3build a URL for a get operation with a single query@4perform a HTTP request and deal with the JSON resultA_get a JSON response from a request to Instagram instagram returns either a result, or an errorBUget an envelope from a request to Instagram the error is wrapped inside the envelopeCget an envelope from InstagramD<get an envelope from Instagram, with optional authenticationE0send a delete and get an envelope from InstagramFNsend a delete and get an envelope from Instagram, with optional authenticationG6post a request and get back an envelope from InstagramHTpost a request and get back an envelope from Instagram, with optional authenticationIMutility function to get an envelop, independently of how the request is builtJGet the K.Run a  ResourceT inside a .L#Transform the computation inside a .MTrue if the the Status is ok (i.e. 2XX).N!add the access token to the queryO]add an optional access token to the query if we don't have a token, we'll pass the client_idP(add application client info to the query.5Q6R789STYour app's credentials.Connection manager (see U).the action to run the result:;< the url paththe query parametersthe properly configured request= the url paththe query parametersthe properly configured request> the url paththe query parametersthe properly configured request? the url paththe query parametersthe URL@extract the error from the JSONABC(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeD(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeE(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeF(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeG(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeH(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeIthe request building method(the URL components, will be concatenatedthe access tokenthe query parametersthe resulting envelopeJLMNOPVWXYZ[\]^_`abc5Q:;<=>?ABCDEFGHJLNOP'5Q6R789ST:;<=>?@ABCDEFGHIJLMNOPVWXYZ[\]^_`aNone+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 keyd to HTTP querye to HTTP queryf to HTTP querythe subscription parametersthe created subscriptionthe ID of the subscriptionthe parameters for the deletionthe ID of the subscription the signature the contentdef  defNone+3relationship action(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. g gNone+3$parameters for recent tag pagination#Get information about a tag object.$Get a list of recently tagged media.Search for tags by name. hihiNone+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. jklmnopjklmnopNone+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. qr qr 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.stuv stuv 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 createdwxwx 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{|}~l|}~z{rstuvwxmqponghijk`abcdefNOPQRSTUVWXYZ[\]^JKLMFGHI>?@ABCD9:;<=45678-./012)*+,y'( !"#$%&   _3Ey !!"#$%&''()*+,-./012334566789:;<<=>?@@ABCDDEFGHIJKKLMNNOPQQRSTUVWXYZ[\]^_`abbcdefghhijklmnopqrrstuvwxyyzz{|}}~             1 !"#$%&'()*+,-./0123456789:;<=>?@A$BCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefg h i j k l mnig-0.2.2 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 RelationshipsCommentsBasicUseruID uUsername uFullNameuProfilePictureuWebsiteUserID AccessToken OAuthToken oaAccessTokenoaUser Credentials cClientID cClientSecretmedia InstagramT runInstagramTrunResourceInIsDeletionParamsDeleteGeographiesDeleteLocations DeleteTags DeleteUsers DeleteOnedoID DeleteAllSubscriptionRequestGeographyRequest grLatitude grLongitudegrRadiusLocationRequestlrID TagRequesttrTag UserRequestSubscriptionParams spRequest spCallbackspAspect spVerifyTokencreateSubscriptionlistSubscriptionsdeleteSubscriptionsverifySignatureRelationShipActionDenyApproveUnblockBlockUnfollowFollow getFollows getFollowedBygetRequestedBygetRelationshipsetRelationShipRecentTagParamsrtpMaxIDrtpMinIDgetTaggetRecentTagged 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$fFromJSONUser $fToJSONUser$fFromJSONAccessToken$fToJSONAccessToken$fFromJSONOAuthToken$fToJSONOAuthTokeneeMetaigeCodeigeType igeMessage ToHtQueryIsDataisCreds isManagerisHostgetCredsgetHostgetPostRequest getGetRequestgetDeleteRequest getQueryURLigReqgetJSONResponsegetJSONEnvelopegetGetEnvelopegetGetEnvelopeMgetDeleteEnvelopegetDeleteEnvelopeMgetPostEnvelopegetPostEnvelopeM getEnvelopeM getManagerhttp-client-0.4.11.3Network.HTTP.Client.TypesManager mapInstagramTisOkayaddToken addTokenMaddClientInfos?+IsunIshttp-conduit-2.1.5Network.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.5%Control.Monad.Trans.Resource.Internal MonadResource$fQueryLikeDeletionParams$fQueryLikeSubscriptionRequest$fQueryLikeSubscriptionParams$fQueryLikeRelationShipAction$fQueryLikeRecentTagParams$fDefaultRecentTagParams$fQueryLikeUserSearchParams$fQueryLikeSelfLikedParams$fDefaultSelfLikedParams$fQueryLikeRecentParams$fDefaultRecentParams$fQueryLikeSelfFeedParams$fDefaultSelfFeedParams$fQueryLikeMediaSearchParams$fDefaultMediaSearchParams$fQueryLikeLocationSearchParams$fDefaultLocationSearchParams$fQueryLikeLocationMediaParams$fDefaultLocationMediaParams$fQueryLikeGeographyMediaParams$fDefaultGeographyMediaParams