pokemon-go-protobuf-types-0.1.0.0: Haskell types for the Pokemon Go protobuf protocol.

Safe HaskellNone
LanguageHaskell2010

Proto.POGOProtos.Networking.Requests.Messages.MarkTutorialCompleteMessage

Documentation

data MarkTutorialCompleteMessage #

Instances

Eq MarkTutorialCompleteMessage # 
Show MarkTutorialCompleteMessage # 
Message MarkTutorialCompleteMessage # 

Methods

descriptor :: MessageDescriptor MarkTutorialCompleteMessage

Default MarkTutorialCompleteMessage # 
HasField "sendMarketingEmails" MarkTutorialCompleteMessage MarkTutorialCompleteMessage # 

Methods

field :: ProxySym "sendMarketingEmails" -> Lens MarkTutorialCompleteMessage MarkTutorialCompleteMessage (Field "sendMarketingEmails" MarkTutorialCompleteMessage) (Field "sendMarketingEmails" MarkTutorialCompleteMessage)

HasField "sendPushNotifications" MarkTutorialCompleteMessage MarkTutorialCompleteMessage # 

Methods

field :: ProxySym "sendPushNotifications" -> Lens MarkTutorialCompleteMessage MarkTutorialCompleteMessage (Field "sendPushNotifications" MarkTutorialCompleteMessage) (Field "sendPushNotifications" MarkTutorialCompleteMessage)

HasField "tutorialsCompleted" MarkTutorialCompleteMessage MarkTutorialCompleteMessage # 

Methods

field :: ProxySym "tutorialsCompleted" -> Lens MarkTutorialCompleteMessage MarkTutorialCompleteMessage (Field "tutorialsCompleted" MarkTutorialCompleteMessage) (Field "tutorialsCompleted" MarkTutorialCompleteMessage)

type Field "sendMarketingEmails" MarkTutorialCompleteMessage # 
type Field "sendMarketingEmails" MarkTutorialCompleteMessage = Bool
type Field "sendPushNotifications" MarkTutorialCompleteMessage # 
type Field "sendPushNotifications" MarkTutorialCompleteMessage = Bool
type Field "tutorialsCompleted" MarkTutorialCompleteMessage # 
type Field "tutorialsCompleted" MarkTutorialCompleteMessage = [TutorialState]

sendMarketingEmails :: forall msg msg'. HasField "sendMarketingEmails" msg msg' => Lens msg msg' (Field "sendMarketingEmails" msg) (Field "sendMarketingEmails" msg') #

sendPushNotifications :: forall msg msg'. HasField "sendPushNotifications" msg msg' => Lens msg msg' (Field "sendPushNotifications" msg) (Field "sendPushNotifications" msg') #

tutorialsCompleted :: forall msg msg'. HasField "tutorialsCompleted" msg msg' => Lens msg msg' (Field "tutorialsCompleted" msg) (Field "tutorialsCompleted" msg') #