stratux-types 0.0.7 → 0.0.8
raw patch · 3 files changed
+21/−6 lines, 3 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Data.Aviation.Stratux.Types.GpsSolution: GpsSbas :: GpsSolution
- Data.Aviation.Stratux.Types.GpsSolution: _GpsSbas :: AsGpsSolution r_aIkP => Prism' r_aIkP ()
+ Data.Aviation.Stratux.Types.GpsSolution: GpsSbasWaas :: GpsSolution
+ Data.Aviation.Stratux.Types.GpsSolution: GpsSbasWaasEgnos :: GpsSolution
+ Data.Aviation.Stratux.Types.GpsSolution: _GpsSbasWaas :: AsGpsSolution r_aIkW => Prism' r_aIkW ()
+ Data.Aviation.Stratux.Types.GpsSolution: _GpsSbasWaasEgnos :: AsGpsSolution r_aIkW => Prism' r_aIkW ()
- Data.Aviation.Stratux.Types.EmitterCategory: _EmitterCategory :: AsEmitterCategory r_aUWL => Prism' r_aUWL EmitterCategory
+ Data.Aviation.Stratux.Types.EmitterCategory: _EmitterCategory :: AsEmitterCategory r_aVgw => Prism' r_aVgw EmitterCategory
- Data.Aviation.Stratux.Types.EmitterCategory: _Heavy :: AsEmitterCategory r_aUWL => Prism' r_aUWL ()
+ Data.Aviation.Stratux.Types.EmitterCategory: _Heavy :: AsEmitterCategory r_aVgw => Prism' r_aVgw ()
- Data.Aviation.Stratux.Types.EmitterCategory: _HighPerformance :: AsEmitterCategory r_aUWL => Prism' r_aUWL ()
+ Data.Aviation.Stratux.Types.EmitterCategory: _HighPerformance :: AsEmitterCategory r_aVgw => Prism' r_aVgw ()
- Data.Aviation.Stratux.Types.EmitterCategory: _HighVortexLarge :: AsEmitterCategory r_aUWL => Prism' r_aUWL ()
+ Data.Aviation.Stratux.Types.EmitterCategory: _HighVortexLarge :: AsEmitterCategory r_aVgw => Prism' r_aVgw ()
- Data.Aviation.Stratux.Types.EmitterCategory: _Large :: AsEmitterCategory r_aUWL => Prism' r_aUWL ()
+ Data.Aviation.Stratux.Types.EmitterCategory: _Large :: AsEmitterCategory r_aVgw => Prism' r_aVgw ()
- Data.Aviation.Stratux.Types.EmitterCategory: _Light :: AsEmitterCategory r_aUWL => Prism' r_aUWL ()
+ Data.Aviation.Stratux.Types.EmitterCategory: _Light :: AsEmitterCategory r_aVgw => Prism' r_aVgw ()
- Data.Aviation.Stratux.Types.EmitterCategory: _NoEmitterCategory :: AsEmitterCategory r_aUWL => Prism' r_aUWL ()
+ Data.Aviation.Stratux.Types.EmitterCategory: _NoEmitterCategory :: AsEmitterCategory r_aVgw => Prism' r_aVgw ()
- Data.Aviation.Stratux.Types.EmitterCategory: _Rotorcraft :: AsEmitterCategory r_aUWL => Prism' r_aUWL ()
+ Data.Aviation.Stratux.Types.EmitterCategory: _Rotorcraft :: AsEmitterCategory r_aVgw => Prism' r_aVgw ()
- Data.Aviation.Stratux.Types.EmitterCategory: _Small :: AsEmitterCategory r_aUWL => Prism' r_aUWL ()
+ Data.Aviation.Stratux.Types.EmitterCategory: _Small :: AsEmitterCategory r_aVgw => Prism' r_aVgw ()
- Data.Aviation.Stratux.Types.EmitterCategory: class AsEmitterCategory r_aUWL where _NoEmitterCategory = (.) _EmitterCategory _NoEmitterCategory _Light = (.) _EmitterCategory _Light _Small = (.) _EmitterCategory _Small _Large = (.) _EmitterCategory _Large _HighVortexLarge = (.) _EmitterCategory _HighVortexLarge _Heavy = (.) _EmitterCategory _Heavy _HighPerformance = (.) _EmitterCategory _HighPerformance _Rotorcraft = (.) _EmitterCategory _Rotorcraft
+ Data.Aviation.Stratux.Types.EmitterCategory: class AsEmitterCategory r_aVgw where _NoEmitterCategory = (.) _EmitterCategory _NoEmitterCategory _Light = (.) _EmitterCategory _Light _Small = (.) _EmitterCategory _Small _Large = (.) _EmitterCategory _Large _HighVortexLarge = (.) _EmitterCategory _HighVortexLarge _Heavy = (.) _EmitterCategory _Heavy _HighPerformance = (.) _EmitterCategory _HighPerformance _Rotorcraft = (.) _EmitterCategory _Rotorcraft
- Data.Aviation.Stratux.Types.GpsSolution: _DeadReckoning :: AsGpsSolution r_aIkP => Prism' r_aIkP ()
+ Data.Aviation.Stratux.Types.GpsSolution: _DeadReckoning :: AsGpsSolution r_aIkW => Prism' r_aIkW ()
- Data.Aviation.Stratux.Types.GpsSolution: _GpsSolution :: AsGpsSolution r_aIkP => Prism' r_aIkP GpsSolution
+ Data.Aviation.Stratux.Types.GpsSolution: _GpsSolution :: AsGpsSolution r_aIkW => Prism' r_aIkW GpsSolution
- Data.Aviation.Stratux.Types.GpsSolution: _NoFix :: AsGpsSolution r_aIkP => Prism' r_aIkP ()
+ Data.Aviation.Stratux.Types.GpsSolution: _NoFix :: AsGpsSolution r_aIkW => Prism' r_aIkW ()
- Data.Aviation.Stratux.Types.GpsSolution: _ThreeDGPS :: AsGpsSolution r_aIkP => Prism' r_aIkP ()
+ Data.Aviation.Stratux.Types.GpsSolution: _ThreeDGPS :: AsGpsSolution r_aIkW => Prism' r_aIkW ()
- Data.Aviation.Stratux.Types.GpsSolution: _Unknown :: AsGpsSolution r_aIkP => Prism' r_aIkP ()
+ Data.Aviation.Stratux.Types.GpsSolution: _Unknown :: AsGpsSolution r_aIkW => Prism' r_aIkW ()
- Data.Aviation.Stratux.Types.GpsSolution: class AsGpsSolution r_aIkP where _GpsSbas = (.) _GpsSolution _GpsSbas _ThreeDGPS = (.) _GpsSolution _ThreeDGPS _DeadReckoning = (.) _GpsSolution _DeadReckoning _NoFix = (.) _GpsSolution _NoFix _Unknown = (.) _GpsSolution _Unknown
+ Data.Aviation.Stratux.Types.GpsSolution: class AsGpsSolution r_aIkW where _GpsSbasWaas = (.) _GpsSolution _GpsSbasWaas _GpsSbasWaasEgnos = (.) _GpsSolution _GpsSbasWaasEgnos _ThreeDGPS = (.) _GpsSolution _ThreeDGPS _DeadReckoning = (.) _GpsSolution _DeadReckoning _NoFix = (.) _GpsSolution _NoFix _Unknown = (.) _GpsSolution _Unknown
- Data.Aviation.Stratux.Types.Status: build :: HasStatus c_aKqJ => Lens' c_aKqJ String
+ Data.Aviation.Stratux.Types.Status: build :: HasStatus c_aKKu => Lens' c_aKKu String
- Data.Aviation.Stratux.Types.Status: class HasStatus c_aKqJ where build = (.) status build clock = (.) status clock connectedUsers = (.) status connectedUsers cpuTemp = (.) status cpuTemp devices = (.) status devices errors = (.) status errors esMessagesLastMinute = (.) status esMessagesLastMinute esMessagesMax = (.) status esMessagesMax gpsConnected = (.) status gpsConnected gpsSatellitesLocked = (.) status gpsSatellitesLocked gpsSatellitesSeen = (.) status gpsSatellitesSeen gpsSatellitesTracked = (.) status gpsSatellitesTracked gpsSolution = (.) status gpsSolution hardwareBuild = (.) status hardwareBuild networkDataBytesSent = (.) status networkDataBytesSent networkDataBytesSentLastSec = (.) status networkDataBytesSentLastSec networkDataBytesSentNonqueueable = (.) status networkDataBytesSentNonqueueable networkDataBytesSentNonqueueableLastSec = (.) status networkDataBytesSentNonqueueableLastSec networkDataMessagesSent = (.) status networkDataMessagesSent networkDataMessagesSentLastSec = (.) status networkDataMessagesSentLastSec networkDataMessagesSentNonqueueable = (.) status networkDataMessagesSentNonqueueable networkDataMessagesSentNonqueueableLastSec = (.) status networkDataMessagesSentNonqueueableLastSec ry835ai_connected = (.) status ry835ai_connected uatMessagesLastMinute = (.) status uatMessagesLastMinute uatMessagesMax = (.) status uatMessagesMax uptime = (.) status uptime uptimeClock = (.) status uptimeClock version = (.) status version
+ Data.Aviation.Stratux.Types.Status: class HasStatus c_aKKu where build = (.) status build clock = (.) status clock connectedUsers = (.) status connectedUsers cpuTemp = (.) status cpuTemp devices = (.) status devices errors = (.) status errors esMessagesLastMinute = (.) status esMessagesLastMinute esMessagesMax = (.) status esMessagesMax gpsConnected = (.) status gpsConnected gpsSatellitesLocked = (.) status gpsSatellitesLocked gpsSatellitesSeen = (.) status gpsSatellitesSeen gpsSatellitesTracked = (.) status gpsSatellitesTracked gpsSolution = (.) status gpsSolution hardwareBuild = (.) status hardwareBuild networkDataBytesSent = (.) status networkDataBytesSent networkDataBytesSentLastSec = (.) status networkDataBytesSentLastSec networkDataBytesSentNonqueueable = (.) status networkDataBytesSentNonqueueable networkDataBytesSentNonqueueableLastSec = (.) status networkDataBytesSentNonqueueableLastSec networkDataMessagesSent = (.) status networkDataMessagesSent networkDataMessagesSentLastSec = (.) status networkDataMessagesSentLastSec networkDataMessagesSentNonqueueable = (.) status networkDataMessagesSentNonqueueable networkDataMessagesSentNonqueueableLastSec = (.) status networkDataMessagesSentNonqueueableLastSec ry835ai_connected = (.) status ry835ai_connected uatMessagesLastMinute = (.) status uatMessagesLastMinute uatMessagesMax = (.) status uatMessagesMax uptime = (.) status uptime uptimeClock = (.) status uptimeClock version = (.) status version
- Data.Aviation.Stratux.Types.Status: clock :: HasStatus c_aKqJ => Lens' c_aKqJ UTCTime
+ Data.Aviation.Stratux.Types.Status: clock :: HasStatus c_aKKu => Lens' c_aKKu UTCTime
- Data.Aviation.Stratux.Types.Status: connectedUsers :: HasStatus c_aKqJ => Lens' c_aKqJ Int
+ Data.Aviation.Stratux.Types.Status: connectedUsers :: HasStatus c_aKKu => Lens' c_aKKu Int
- Data.Aviation.Stratux.Types.Status: cpuTemp :: HasStatus c_aKqJ => Lens' c_aKqJ Float
+ Data.Aviation.Stratux.Types.Status: cpuTemp :: HasStatus c_aKKu => Lens' c_aKKu Float
- Data.Aviation.Stratux.Types.Status: devices :: HasStatus c_aKqJ => Lens' c_aKqJ Int
+ Data.Aviation.Stratux.Types.Status: devices :: HasStatus c_aKKu => Lens' c_aKKu Int
- Data.Aviation.Stratux.Types.Status: errors :: HasStatus c_aKqJ => Lens' c_aKqJ [String]
+ Data.Aviation.Stratux.Types.Status: errors :: HasStatus c_aKKu => Lens' c_aKKu [String]
- Data.Aviation.Stratux.Types.Status: esMessagesLastMinute :: HasStatus c_aKqJ => Lens' c_aKqJ Int
+ Data.Aviation.Stratux.Types.Status: esMessagesLastMinute :: HasStatus c_aKKu => Lens' c_aKKu Int
- Data.Aviation.Stratux.Types.Status: esMessagesMax :: HasStatus c_aKqJ => Lens' c_aKqJ Int
+ Data.Aviation.Stratux.Types.Status: esMessagesMax :: HasStatus c_aKKu => Lens' c_aKKu Int
- Data.Aviation.Stratux.Types.Status: gpsConnected :: HasStatus c_aKqJ => Lens' c_aKqJ Bool
+ Data.Aviation.Stratux.Types.Status: gpsConnected :: HasStatus c_aKKu => Lens' c_aKKu Bool
- Data.Aviation.Stratux.Types.Status: gpsSatellitesLocked :: HasStatus c_aKqJ => Lens' c_aKqJ Int
+ Data.Aviation.Stratux.Types.Status: gpsSatellitesLocked :: HasStatus c_aKKu => Lens' c_aKKu Int
- Data.Aviation.Stratux.Types.Status: gpsSatellitesSeen :: HasStatus c_aKqJ => Lens' c_aKqJ Int
+ Data.Aviation.Stratux.Types.Status: gpsSatellitesSeen :: HasStatus c_aKKu => Lens' c_aKKu Int
- Data.Aviation.Stratux.Types.Status: gpsSatellitesTracked :: HasStatus c_aKqJ => Lens' c_aKqJ Int
+ Data.Aviation.Stratux.Types.Status: gpsSatellitesTracked :: HasStatus c_aKKu => Lens' c_aKKu Int
- Data.Aviation.Stratux.Types.Status: gpsSolution :: HasStatus c_aKqJ => Lens' c_aKqJ GpsSolution
+ Data.Aviation.Stratux.Types.Status: gpsSolution :: HasStatus c_aKKu => Lens' c_aKKu GpsSolution
- Data.Aviation.Stratux.Types.Status: hardwareBuild :: HasStatus c_aKqJ => Lens' c_aKqJ String
+ Data.Aviation.Stratux.Types.Status: hardwareBuild :: HasStatus c_aKKu => Lens' c_aKKu String
- Data.Aviation.Stratux.Types.Status: networkDataBytesSent :: HasStatus c_aKqJ => Lens' c_aKqJ Int64
+ Data.Aviation.Stratux.Types.Status: networkDataBytesSent :: HasStatus c_aKKu => Lens' c_aKKu Int64
- Data.Aviation.Stratux.Types.Status: networkDataBytesSentLastSec :: HasStatus c_aKqJ => Lens' c_aKqJ Int64
+ Data.Aviation.Stratux.Types.Status: networkDataBytesSentLastSec :: HasStatus c_aKKu => Lens' c_aKKu Int64
- Data.Aviation.Stratux.Types.Status: networkDataBytesSentNonqueueable :: HasStatus c_aKqJ => Lens' c_aKqJ Int64
+ Data.Aviation.Stratux.Types.Status: networkDataBytesSentNonqueueable :: HasStatus c_aKKu => Lens' c_aKKu Int64
- Data.Aviation.Stratux.Types.Status: networkDataBytesSentNonqueueableLastSec :: HasStatus c_aKqJ => Lens' c_aKqJ Int64
+ Data.Aviation.Stratux.Types.Status: networkDataBytesSentNonqueueableLastSec :: HasStatus c_aKKu => Lens' c_aKKu Int64
- Data.Aviation.Stratux.Types.Status: networkDataMessagesSent :: HasStatus c_aKqJ => Lens' c_aKqJ Int64
+ Data.Aviation.Stratux.Types.Status: networkDataMessagesSent :: HasStatus c_aKKu => Lens' c_aKKu Int64
- Data.Aviation.Stratux.Types.Status: networkDataMessagesSentLastSec :: HasStatus c_aKqJ => Lens' c_aKqJ Int64
+ Data.Aviation.Stratux.Types.Status: networkDataMessagesSentLastSec :: HasStatus c_aKKu => Lens' c_aKKu Int64
- Data.Aviation.Stratux.Types.Status: networkDataMessagesSentNonqueueable :: HasStatus c_aKqJ => Lens' c_aKqJ Int64
+ Data.Aviation.Stratux.Types.Status: networkDataMessagesSentNonqueueable :: HasStatus c_aKKu => Lens' c_aKKu Int64
- Data.Aviation.Stratux.Types.Status: networkDataMessagesSentNonqueueableLastSec :: HasStatus c_aKqJ => Lens' c_aKqJ Int64
+ Data.Aviation.Stratux.Types.Status: networkDataMessagesSentNonqueueableLastSec :: HasStatus c_aKKu => Lens' c_aKKu Int64
- Data.Aviation.Stratux.Types.Status: ry835ai_connected :: HasStatus c_aKqJ => Lens' c_aKqJ Bool
+ Data.Aviation.Stratux.Types.Status: ry835ai_connected :: HasStatus c_aKKu => Lens' c_aKKu Bool
- Data.Aviation.Stratux.Types.Status: status :: HasStatus c_aKqJ => Lens' c_aKqJ Status
+ Data.Aviation.Stratux.Types.Status: status :: HasStatus c_aKKu => Lens' c_aKKu Status
- Data.Aviation.Stratux.Types.Status: uatMessagesLastMinute :: HasStatus c_aKqJ => Lens' c_aKqJ Int
+ Data.Aviation.Stratux.Types.Status: uatMessagesLastMinute :: HasStatus c_aKKu => Lens' c_aKKu Int
- Data.Aviation.Stratux.Types.Status: uatMessagesMax :: HasStatus c_aKqJ => Lens' c_aKqJ Int
+ Data.Aviation.Stratux.Types.Status: uatMessagesMax :: HasStatus c_aKKu => Lens' c_aKKu Int
- Data.Aviation.Stratux.Types.Status: uptime :: HasStatus c_aKqJ => Lens' c_aKqJ Int64
+ Data.Aviation.Stratux.Types.Status: uptime :: HasStatus c_aKKu => Lens' c_aKKu Int64
- Data.Aviation.Stratux.Types.Status: uptimeClock :: HasStatus c_aKqJ => Lens' c_aKqJ UTCTime
+ Data.Aviation.Stratux.Types.Status: uptimeClock :: HasStatus c_aKKu => Lens' c_aKKu UTCTime
- Data.Aviation.Stratux.Types.Status: version :: HasStatus c_aKqJ => Lens' c_aKqJ String
+ Data.Aviation.Stratux.Types.Status: version :: HasStatus c_aKKu => Lens' c_aKKu String
- Data.Aviation.Stratux.Types.Traffic: addressType :: HasTraffic c_aYT5 => Lens' c_aYT5 Int
+ Data.Aviation.Stratux.Types.Traffic: addressType :: HasTraffic c_aZcQ => Lens' c_aZcQ Int
- Data.Aviation.Stratux.Types.Traffic: age :: HasTraffic c_aYT5 => Lens' c_aYT5 Double
+ Data.Aviation.Stratux.Types.Traffic: age :: HasTraffic c_aZcQ => Lens' c_aZcQ Double
- Data.Aviation.Stratux.Types.Traffic: altIsGnss :: HasTraffic c_aYT5 => Lens' c_aYT5 Bool
+ Data.Aviation.Stratux.Types.Traffic: altIsGnss :: HasTraffic c_aZcQ => Lens' c_aZcQ Bool
- Data.Aviation.Stratux.Types.Traffic: altitude :: HasTraffic c_aYT5 => Lens' c_aYT5 Int
+ Data.Aviation.Stratux.Types.Traffic: altitude :: HasTraffic c_aZcQ => Lens' c_aZcQ Int
- Data.Aviation.Stratux.Types.Traffic: bearing :: HasTraffic c_aYT5 => Lens' c_aYT5 Double
+ Data.Aviation.Stratux.Types.Traffic: bearing :: HasTraffic c_aZcQ => Lens' c_aZcQ Double
- Data.Aviation.Stratux.Types.Traffic: class HasTraffic c_aYT5 where addressType = (.) traffic addressType age = (.) traffic age altIsGnss = (.) traffic altIsGnss altitude = (.) traffic altitude bearing = (.) traffic bearing distanceToTrafficFromOwnship = (.) traffic distanceToTrafficFromOwnship emitterCategory = (.) traffic emitterCategory extrapolatedPosition = (.) traffic extrapolatedPosition gnssDiffFromBaroAlt = (.) traffic gnssDiffFromBaroAlt lastAltitude = (.) traffic lastAltitude lastGnssDiff = (.) traffic lastGnssDiff lastGnssDiffAltitude = (.) traffic lastGnssDiffAltitude lastSeen = (.) traffic lastSeen lastSource = (.) traffic lastSource lastSpeed = (.) traffic lastSpeed latitude = (.) traffic latitude longitude = (.) traffic longitude navigationAccuracyCategoryForPosition = (.) traffic navigationAccuracyCategoryForPosition navigationIntegrityCategory = (.) traffic navigationIntegrityCategory onGround = (.) traffic onGround positionValid = (.) traffic positionValid signalLevel = (.) traffic signalLevel speed = (.) traffic speed speedValid = (.) traffic speedValid tail = (.) traffic tail targetType = (.) traffic targetType timestamp = (.) traffic timestamp track = (.) traffic track verticalVelocity = (.) traffic verticalVelocity
+ Data.Aviation.Stratux.Types.Traffic: class HasTraffic c_aZcQ where addressType = (.) traffic addressType age = (.) traffic age altIsGnss = (.) traffic altIsGnss altitude = (.) traffic altitude bearing = (.) traffic bearing distanceToTrafficFromOwnship = (.) traffic distanceToTrafficFromOwnship emitterCategory = (.) traffic emitterCategory extrapolatedPosition = (.) traffic extrapolatedPosition gnssDiffFromBaroAlt = (.) traffic gnssDiffFromBaroAlt lastAltitude = (.) traffic lastAltitude lastGnssDiff = (.) traffic lastGnssDiff lastGnssDiffAltitude = (.) traffic lastGnssDiffAltitude lastSeen = (.) traffic lastSeen lastSource = (.) traffic lastSource lastSpeed = (.) traffic lastSpeed latitude = (.) traffic latitude longitude = (.) traffic longitude navigationAccuracyCategoryForPosition = (.) traffic navigationAccuracyCategoryForPosition navigationIntegrityCategory = (.) traffic navigationIntegrityCategory onGround = (.) traffic onGround positionValid = (.) traffic positionValid signalLevel = (.) traffic signalLevel speed = (.) traffic speed speedValid = (.) traffic speedValid tail = (.) traffic tail targetType = (.) traffic targetType timestamp = (.) traffic timestamp track = (.) traffic track verticalVelocity = (.) traffic verticalVelocity
- Data.Aviation.Stratux.Types.Traffic: distanceToTrafficFromOwnship :: HasTraffic c_aYT5 => Lens' c_aYT5 Double
+ Data.Aviation.Stratux.Types.Traffic: distanceToTrafficFromOwnship :: HasTraffic c_aZcQ => Lens' c_aZcQ Double
- Data.Aviation.Stratux.Types.Traffic: emitterCategory :: HasTraffic c_aYT5 => Lens' c_aYT5 EmitterCategory
+ Data.Aviation.Stratux.Types.Traffic: emitterCategory :: HasTraffic c_aZcQ => Lens' c_aZcQ EmitterCategory
- Data.Aviation.Stratux.Types.Traffic: extrapolatedPosition :: HasTraffic c_aYT5 => Lens' c_aYT5 Bool
+ Data.Aviation.Stratux.Types.Traffic: extrapolatedPosition :: HasTraffic c_aZcQ => Lens' c_aZcQ Bool
- Data.Aviation.Stratux.Types.Traffic: gnssDiffFromBaroAlt :: HasTraffic c_aYT5 => Lens' c_aYT5 Int
+ Data.Aviation.Stratux.Types.Traffic: gnssDiffFromBaroAlt :: HasTraffic c_aZcQ => Lens' c_aZcQ Int
- Data.Aviation.Stratux.Types.Traffic: lastAltitude :: HasTraffic c_aYT5 => Lens' c_aYT5 UTCTime
+ Data.Aviation.Stratux.Types.Traffic: lastAltitude :: HasTraffic c_aZcQ => Lens' c_aZcQ UTCTime
- Data.Aviation.Stratux.Types.Traffic: lastGnssDiff :: HasTraffic c_aYT5 => Lens' c_aYT5 UTCTime
+ Data.Aviation.Stratux.Types.Traffic: lastGnssDiff :: HasTraffic c_aZcQ => Lens' c_aZcQ UTCTime
- Data.Aviation.Stratux.Types.Traffic: lastGnssDiffAltitude :: HasTraffic c_aYT5 => Lens' c_aYT5 Int
+ Data.Aviation.Stratux.Types.Traffic: lastGnssDiffAltitude :: HasTraffic c_aZcQ => Lens' c_aZcQ Int
- Data.Aviation.Stratux.Types.Traffic: lastSeen :: HasTraffic c_aYT5 => Lens' c_aYT5 UTCTime
+ Data.Aviation.Stratux.Types.Traffic: lastSeen :: HasTraffic c_aZcQ => Lens' c_aZcQ UTCTime
- Data.Aviation.Stratux.Types.Traffic: lastSource :: HasTraffic c_aYT5 => Lens' c_aYT5 Int
+ Data.Aviation.Stratux.Types.Traffic: lastSource :: HasTraffic c_aZcQ => Lens' c_aZcQ Int
- Data.Aviation.Stratux.Types.Traffic: lastSpeed :: HasTraffic c_aYT5 => Lens' c_aYT5 UTCTime
+ Data.Aviation.Stratux.Types.Traffic: lastSpeed :: HasTraffic c_aZcQ => Lens' c_aZcQ UTCTime
- Data.Aviation.Stratux.Types.Traffic: latitude :: HasTraffic c_aYT5 => Lens' c_aYT5 Double
+ Data.Aviation.Stratux.Types.Traffic: latitude :: HasTraffic c_aZcQ => Lens' c_aZcQ Double
- Data.Aviation.Stratux.Types.Traffic: longitude :: HasTraffic c_aYT5 => Lens' c_aYT5 Double
+ Data.Aviation.Stratux.Types.Traffic: longitude :: HasTraffic c_aZcQ => Lens' c_aZcQ Double
- Data.Aviation.Stratux.Types.Traffic: navigationAccuracyCategoryForPosition :: HasTraffic c_aYT5 => Lens' c_aYT5 Int
+ Data.Aviation.Stratux.Types.Traffic: navigationAccuracyCategoryForPosition :: HasTraffic c_aZcQ => Lens' c_aZcQ Int
- Data.Aviation.Stratux.Types.Traffic: navigationIntegrityCategory :: HasTraffic c_aYT5 => Lens' c_aYT5 Int
+ Data.Aviation.Stratux.Types.Traffic: navigationIntegrityCategory :: HasTraffic c_aZcQ => Lens' c_aZcQ Int
- Data.Aviation.Stratux.Types.Traffic: onGround :: HasTraffic c_aYT5 => Lens' c_aYT5 Bool
+ Data.Aviation.Stratux.Types.Traffic: onGround :: HasTraffic c_aZcQ => Lens' c_aZcQ Bool
- Data.Aviation.Stratux.Types.Traffic: positionValid :: HasTraffic c_aYT5 => Lens' c_aYT5 Bool
+ Data.Aviation.Stratux.Types.Traffic: positionValid :: HasTraffic c_aZcQ => Lens' c_aZcQ Bool
- Data.Aviation.Stratux.Types.Traffic: signalLevel :: HasTraffic c_aYT5 => Lens' c_aYT5 Double
+ Data.Aviation.Stratux.Types.Traffic: signalLevel :: HasTraffic c_aZcQ => Lens' c_aZcQ Double
- Data.Aviation.Stratux.Types.Traffic: speed :: HasTraffic c_aYT5 => Lens' c_aYT5 Int
+ Data.Aviation.Stratux.Types.Traffic: speed :: HasTraffic c_aZcQ => Lens' c_aZcQ Int
- Data.Aviation.Stratux.Types.Traffic: speedValid :: HasTraffic c_aYT5 => Lens' c_aYT5 Bool
+ Data.Aviation.Stratux.Types.Traffic: speedValid :: HasTraffic c_aZcQ => Lens' c_aZcQ Bool
- Data.Aviation.Stratux.Types.Traffic: tail :: HasTraffic c_aYT5 => Lens' c_aYT5 String
+ Data.Aviation.Stratux.Types.Traffic: tail :: HasTraffic c_aZcQ => Lens' c_aZcQ String
- Data.Aviation.Stratux.Types.Traffic: targetType :: HasTraffic c_aYT5 => Lens' c_aYT5 TargetType
+ Data.Aviation.Stratux.Types.Traffic: targetType :: HasTraffic c_aZcQ => Lens' c_aZcQ TargetType
- Data.Aviation.Stratux.Types.Traffic: timestamp :: HasTraffic c_aYT5 => Lens' c_aYT5 UTCTime
+ Data.Aviation.Stratux.Types.Traffic: timestamp :: HasTraffic c_aZcQ => Lens' c_aZcQ UTCTime
- Data.Aviation.Stratux.Types.Traffic: track :: HasTraffic c_aYT5 => Lens' c_aYT5 Int
+ Data.Aviation.Stratux.Types.Traffic: track :: HasTraffic c_aZcQ => Lens' c_aZcQ Int
- Data.Aviation.Stratux.Types.Traffic: traffic :: HasTraffic c_aYT5 => Lens' c_aYT5 Traffic
+ Data.Aviation.Stratux.Types.Traffic: traffic :: HasTraffic c_aZcQ => Lens' c_aZcQ Traffic
- Data.Aviation.Stratux.Types.Traffic: verticalVelocity :: HasTraffic c_aYT5 => Lens' c_aYT5 Int
+ Data.Aviation.Stratux.Types.Traffic: verticalVelocity :: HasTraffic c_aZcQ => Lens' c_aZcQ Int
Files
changelog.md view
@@ -1,3 +1,7 @@+0.0.8++* Handle `"GPS_solution":"DGPS (SBAS / WAAS)"`+ 0.0.7 * Fix bug with ConstrainedClassMethods in type-classes.
src/Data/Aviation/Stratux/Types/GpsSolution.hs view
@@ -21,7 +21,8 @@ -- >>> import Data.Maybe(Maybe) data GpsSolution =- GpsSbas -- GPS + SBAS (WAAS / EGNOS)+ GpsSbasWaas -- DGPS (SBAS / WAAS)+ | GpsSbasWaasEgnos -- GPS + SBAS (WAAS / EGNOS) | ThreeDGPS -- 3D GPS | DeadReckoning -- Dead Reckoning | NoFix -- No Fix@@ -32,8 +33,11 @@ -- | --+-- >>> decode "\"DGPS (SBAS / WAAS)\"" :: Maybe GpsSolution+-- Just GpsSbasWaas+-- -- >>> decode "\"GPS + SBAS (WAAS / EGNOS)\"" :: Maybe GpsSolution--- Just GpsSbas+-- Just GpsSbasWaasEgnos -- -- >>> decode "\"3D GPS\"" :: Maybe GpsSolution -- Just ThreeDGPS@@ -50,8 +54,10 @@ parseJSON = withText "GPS_solution" (\t -> case t of + "DGPS (SBAS / WAAS)" ->+ return GpsSbasWaas "GPS + SBAS (WAAS / EGNOS)" ->- return GpsSbas+ return GpsSbasWaasEgnos "3D GPS" -> return ThreeDGPS "Dead Reckoning" ->@@ -65,7 +71,10 @@ -- | ----- >>> encode GpsSbas+-- >>> encode GpsSbasWaas+-- "\"DGPS (SBAS / WAAS)\""+--+-- >>> encode GpsSbasWaasEgnos -- "\"GPS + SBAS (WAAS / EGNOS)\"" -- -- >>> encode ThreeDGPS@@ -83,7 +92,9 @@ toJSON x = String ( case x of- GpsSbas ->+ GpsSbasWaas ->+ "DGPS (SBAS / WAAS)"+ GpsSbasWaasEgnos -> "GPS + SBAS (WAAS / EGNOS)" ThreeDGPS -> "3D GPS"
stratux-types.cabal view
@@ -1,5 +1,5 @@ name: stratux-types-version: 0.0.7+version: 0.0.8 license: BSD3 license-file: LICENCE author: Tony Morris <ʇǝu˙sıɹɹoɯʇ@ןןǝʞsɐɥ>