casr-logbook-meta 0.0.1 → 0.0.2
raw patch · 20 files changed
+23/−1 lines, 20 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Data.Aviation.Casr.Logbook.Meta.AircraftFlightExpense: _AircraftFlightExpense :: AsAircraftFlightExpense r_apd8 => Prism' r_apd8 AircraftFlightExpense
+ Data.Aviation.Casr.Logbook.Meta.AircraftFlightExpense: _ExpenseAircraftLanding :: AsAircraftFlightExpense r_apd8 => Prism' r_apd8 AircraftLandingExpense
+ Data.Aviation.Casr.Logbook.Meta.AircraftFlightExpense: _ExpenseAircraftUsage :: AsAircraftFlightExpense r_apd8 => Prism' r_apd8 AircraftUsageExpense
+ Data.Aviation.Casr.Logbook.Meta.AircraftFlightExpense: class AsAircraftFlightExpense r_apd8 where _ExpenseAircraftUsage = (.) _AircraftFlightExpense _ExpenseAircraftUsage _ExpenseAircraftLanding = (.) _AircraftFlightExpense _ExpenseAircraftLanding
+ Data.Aviation.Casr.Logbook.Meta.AircraftFlightMeta: aircraftFlightMeta :: HasAircraftFlightMeta c_aq2t => Lens' c_aq2t AircraftFlightMeta
+ Data.Aviation.Casr.Logbook.Meta.AircraftFlightMeta: class HasAircraftFlightMeta c_aq2t where expenses = (.) aircraftFlightMeta expenses images = (.) aircraftFlightMeta images tracklogs = (.) aircraftFlightMeta tracklogs videos = (.) aircraftFlightMeta videos visualisations = (.) aircraftFlightMeta visualisations
+ Data.Aviation.Casr.Logbook.Meta.AircraftFlightMeta: expenses :: HasAircraftFlightMeta c_aq2t => Lens' c_aq2t [AircraftFlightExpense]
+ Data.Aviation.Casr.Logbook.Meta.AircraftFlightMeta: images :: HasAircraftFlightMeta c_aq2t => Lens' c_aq2t [Image]
+ Data.Aviation.Casr.Logbook.Meta.AircraftFlightMeta: tracklogs :: HasAircraftFlightMeta c_aq2t => Lens' c_aq2t [TrackLog]
+ Data.Aviation.Casr.Logbook.Meta.AircraftFlightMeta: videos :: HasAircraftFlightMeta c_aq2t => Lens' c_aq2t [Video]
+ Data.Aviation.Casr.Logbook.Meta.AircraftFlightMeta: visualisations :: HasAircraftFlightMeta c_aq2t => Lens' c_aq2t [Visualisation]
+ Data.Aviation.Casr.Logbook.Meta.AircraftLandingExpense: aircraftLandingExpense :: HasAircraftLandingExpense c_aoqf => Lens' c_aoqf AircraftLandingExpense
+ Data.Aviation.Casr.Logbook.Meta.AircraftLandingExpense: aircraftlandingexpenseamount :: HasAircraftLandingExpense c_aoqf => Lens' c_aoqf Int
+ Data.Aviation.Casr.Logbook.Meta.AircraftLandingExpense: aircraftlandingexpensename :: HasAircraftLandingExpense c_aoqf => Lens' c_aoqf String
+ Data.Aviation.Casr.Logbook.Meta.AircraftLandingExpense: class HasAircraftLandingExpense c_aoqf where aircraftlandingexpenseamount = (.) aircraftLandingExpense aircraftlandingexpenseamount aircraftlandingexpensename = (.) aircraftLandingExpense aircraftlandingexpensename
+ Data.Aviation.Casr.Logbook.Meta.AircraftUsageExpense: aircraftUsageExpense :: HasAircraftUsageExpense c_anDi => Lens' c_anDi AircraftUsageExpense
+ Data.Aviation.Casr.Logbook.Meta.AircraftUsageExpense: aircraftusageexpensename :: HasAircraftUsageExpense c_anDi => Lens' c_anDi String
+ Data.Aviation.Casr.Logbook.Meta.AircraftUsageExpense: aircraftusageexpenseperhour :: HasAircraftUsageExpense c_anDi => Lens' c_anDi Int
+ Data.Aviation.Casr.Logbook.Meta.AircraftUsageExpense: class HasAircraftUsageExpense c_anDi where aircraftusageexpensename = (.) aircraftUsageExpense aircraftusageexpensename aircraftusageexpenseperhour = (.) aircraftUsageExpense aircraftusageexpenseperhour
+ Data.Aviation.Casr.Logbook.Meta.BriefingExpense: briefingExpense :: HasBriefingExpense c_amnj => Lens' c_amnj BriefingExpense
+ Data.Aviation.Casr.Logbook.Meta.BriefingExpense: briefingexpensename :: HasBriefingExpense c_amnj => Lens' c_amnj String
+ Data.Aviation.Casr.Logbook.Meta.BriefingExpense: briefingexpenseperhour :: HasBriefingExpense c_amnj => Lens' c_amnj Int
+ Data.Aviation.Casr.Logbook.Meta.BriefingExpense: class HasBriefingExpense c_amnj where briefingexpensename = (.) briefingExpense briefingexpensename briefingexpenseperhour = (.) briefingExpense briefingexpenseperhour
+ Data.Aviation.Casr.Logbook.Meta.BriefingMeta: briefingMeta :: HasBriefingMeta c_anbd => Lens' c_anbd BriefingMeta
+ Data.Aviation.Casr.Logbook.Meta.BriefingMeta: class HasBriefingMeta c_anbd
+ Data.Aviation.Casr.Logbook.Meta.ExamExpense: class HasExamExpense c_al7k where examexpenseamount = (.) examExpense examexpenseamount examexpensename = (.) examExpense examexpensename
+ Data.Aviation.Casr.Logbook.Meta.ExamExpense: examExpense :: HasExamExpense c_al7k => Lens' c_al7k ExamExpense
+ Data.Aviation.Casr.Logbook.Meta.ExamExpense: examexpenseamount :: HasExamExpense c_al7k => Lens' c_al7k Int
+ Data.Aviation.Casr.Logbook.Meta.ExamExpense: examexpensename :: HasExamExpense c_al7k => Lens' c_al7k String
+ Data.Aviation.Casr.Logbook.Meta.ExamMeta: class HasExamMeta c_alVe
+ Data.Aviation.Casr.Logbook.Meta.ExamMeta: examMeta :: HasExamMeta c_alVe => Lens' c_alVe ExamMeta
+ Data.Aviation.Casr.Logbook.Meta.Image: class HasImage c_ajNZ where imagename = (.) image imagename imagesource = (.) image imagesource imagetype = (.) image imagetype imageuri = (.) image imageuri
+ Data.Aviation.Casr.Logbook.Meta.Image: image :: HasImage c_ajNZ => Lens' c_ajNZ Image
+ Data.Aviation.Casr.Logbook.Meta.Image: imagename :: HasImage c_ajNZ => Lens' c_ajNZ (Maybe String)
+ Data.Aviation.Casr.Logbook.Meta.Image: imagesource :: HasImage c_ajNZ => Lens' c_ajNZ (Maybe String)
+ Data.Aviation.Casr.Logbook.Meta.Image: imagetype :: HasImage c_ajNZ => Lens' c_ajNZ ImageType
+ Data.Aviation.Casr.Logbook.Meta.Image: imageuri :: HasImage c_ajNZ => Lens' c_ajNZ String
+ Data.Aviation.Casr.Logbook.Meta.ImageType: _Gif :: AsImageType r_ag79 => Prism' r_ag79 ()
+ Data.Aviation.Casr.Logbook.Meta.ImageType: _ImageType :: AsImageType r_ag79 => Prism' r_ag79 ImageType
+ Data.Aviation.Casr.Logbook.Meta.ImageType: _Jpg :: AsImageType r_ag79 => Prism' r_ag79 ()
+ Data.Aviation.Casr.Logbook.Meta.ImageType: _Png :: AsImageType r_ag79 => Prism' r_ag79 ()
+ Data.Aviation.Casr.Logbook.Meta.ImageType: class AsImageType r_ag79 where _Jpg = (.) _ImageType _Jpg _Png = (.) _ImageType _Png _Gif = (.) _ImageType _Gif
+ Data.Aviation.Casr.Logbook.Meta.SimulatorFlightExpense: class HasSimulatorFlightExpense c_aeDp where simulatorflightexpensename = (.) simulatorFlightExpense simulatorflightexpensename simulatorflightexpenseperhour = (.) simulatorFlightExpense simulatorflightexpenseperhour
+ Data.Aviation.Casr.Logbook.Meta.SimulatorFlightExpense: simulatorFlightExpense :: HasSimulatorFlightExpense c_aeDp => Lens' c_aeDp SimulatorFlightExpense
+ Data.Aviation.Casr.Logbook.Meta.SimulatorFlightExpense: simulatorflightexpensename :: HasSimulatorFlightExpense c_aeDp => Lens' c_aeDp String
+ Data.Aviation.Casr.Logbook.Meta.SimulatorFlightExpense: simulatorflightexpenseperhour :: HasSimulatorFlightExpense c_aeDp => Lens' c_aeDp Int
+ Data.Aviation.Casr.Logbook.Meta.SimulatorFlightMeta: class HasSimulatorFlightMeta c_afrj
+ Data.Aviation.Casr.Logbook.Meta.SimulatorFlightMeta: simulatorFlightMeta :: HasSimulatorFlightMeta c_afrj => Lens' c_afrj SimulatorFlightMeta
+ Data.Aviation.Casr.Logbook.Meta.TrackLog: class HasTrackLog c_ahZU where tracklogname = (.) trackLog tracklogname tracklogsource = (.) trackLog tracklogsource tracklogtype = (.) trackLog tracklogtype trackloguri = (.) trackLog trackloguri
+ Data.Aviation.Casr.Logbook.Meta.TrackLog: trackLog :: HasTrackLog c_ahZU => Lens' c_ahZU TrackLog
+ Data.Aviation.Casr.Logbook.Meta.TrackLog: tracklogname :: HasTrackLog c_ahZU => Lens' c_ahZU (Maybe String)
+ Data.Aviation.Casr.Logbook.Meta.TrackLog: tracklogsource :: HasTrackLog c_ahZU => Lens' c_ahZU (Maybe String)
+ Data.Aviation.Casr.Logbook.Meta.TrackLog: tracklogtype :: HasTrackLog c_ahZU => Lens' c_ahZU TrackLogType
+ Data.Aviation.Casr.Logbook.Meta.TrackLog: trackloguri :: HasTrackLog c_ahZU => Lens' c_ahZU String
+ Data.Aviation.Casr.Logbook.Meta.TrackLogType: _Gpx :: AsTrackLogType r_ah1K => Prism' r_ah1K ()
+ Data.Aviation.Casr.Logbook.Meta.TrackLogType: _ImageTrackLog :: AsTrackLogType r_ah1K => Prism' r_ah1K ImageType
+ Data.Aviation.Casr.Logbook.Meta.TrackLogType: _Kml :: AsTrackLogType r_ah1K => Prism' r_ah1K ()
+ Data.Aviation.Casr.Logbook.Meta.TrackLogType: _Kmz :: AsTrackLogType r_ah1K => Prism' r_ah1K ()
+ Data.Aviation.Casr.Logbook.Meta.TrackLogType: _TrackLogType :: AsTrackLogType r_ah1K => Prism' r_ah1K TrackLogType
+ Data.Aviation.Casr.Logbook.Meta.TrackLogType: class AsTrackLogType r_ah1K where _Gpx = (.) _TrackLogType _Gpx _Kml = (.) _TrackLogType _Kml _Kmz = (.) _TrackLogType _Kmz _ImageTrackLog = (.) _TrackLogType _ImageTrackLog
+ Data.Aviation.Casr.Logbook.Meta.TrackLogs: class HasTrackLogs c_ajkc
+ Data.Aviation.Casr.Logbook.Meta.TrackLogs: trackLogs :: HasTrackLogs c_ajkc => Lens' c_ajkc TrackLogs
+ Data.Aviation.Casr.Logbook.Meta.Video: class HasVideo c_adjY where videoname = (.) video videoname videosource = (.) video videosource videotype = (.) video videotype videouri = (.) video videouri
+ Data.Aviation.Casr.Logbook.Meta.Video: video :: HasVideo c_adjY => Lens' c_adjY Video
+ Data.Aviation.Casr.Logbook.Meta.Video: videoname :: HasVideo c_adjY => Lens' c_adjY (Maybe String)
+ Data.Aviation.Casr.Logbook.Meta.Video: videosource :: HasVideo c_adjY => Lens' c_adjY (Maybe String)
+ Data.Aviation.Casr.Logbook.Meta.Video: videotype :: HasVideo c_adjY => Lens' c_adjY VideoType
+ Data.Aviation.Casr.Logbook.Meta.Video: videouri :: HasVideo c_adjY => Lens' c_adjY String
+ Data.Aviation.Casr.Logbook.Meta.VideoType: _Bambuser :: AsVideoType r_ac2D => Prism' r_ac2D ()
+ Data.Aviation.Casr.Logbook.Meta.VideoType: _VideoType :: AsVideoType r_ac2D => Prism' r_ac2D VideoType
+ Data.Aviation.Casr.Logbook.Meta.VideoType: _Vimeo :: AsVideoType r_ac2D => Prism' r_ac2D ()
+ Data.Aviation.Casr.Logbook.Meta.VideoType: _YouTube :: AsVideoType r_ac2D => Prism' r_ac2D ()
+ Data.Aviation.Casr.Logbook.Meta.VideoType: class AsVideoType r_ac2D where _YouTube = (.) _VideoType _YouTube _Vimeo = (.) _VideoType _Vimeo _Bambuser = (.) _VideoType _Bambuser
+ Data.Aviation.Casr.Logbook.Meta.Visualisation: class HasVisualisation c_aaWS where doaramaid = (.) visualisation doaramaid doaramaname = (.) visualisation doaramaname oembedid = (.) visualisation oembedid
+ Data.Aviation.Casr.Logbook.Meta.Visualisation: doaramaid :: HasVisualisation c_aaWS => Lens' c_aaWS String
+ Data.Aviation.Casr.Logbook.Meta.Visualisation: doaramaname :: HasVisualisation c_aaWS => Lens' c_aaWS (Maybe String)
+ Data.Aviation.Casr.Logbook.Meta.Visualisation: oembedid :: HasVisualisation c_aaWS => Lens' c_aaWS String
+ Data.Aviation.Casr.Logbook.Meta.Visualisation: visualisation :: HasVisualisation c_aaWS => Lens' c_aaWS Visualisation
Files
- casr-logbook-meta.cabal +1/−1
- changelog +4/−0
- src/Data/Aviation/Casr/Logbook/Meta/AircraftFlightExpense.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/AircraftFlightMeta.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/AircraftLandingExpense.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/AircraftUsageExpense.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/BriefingExpense.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/BriefingMeta.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/ExamExpense.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/ExamMeta.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/Image.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/ImageType.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/SimulatorFlightExpense.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/SimulatorFlightMeta.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/TrackLog.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/TrackLogType.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/TrackLogs.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/Video.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/VideoType.hs +1/−0
- src/Data/Aviation/Casr/Logbook/Meta/Visualisation.hs +1/−0
casr-logbook-meta.cabal view
@@ -1,5 +1,5 @@ name: casr-logbook-meta-version: 0.0.1+version: 0.0.2 license: OtherLicense license-file: LICENSE author: Tony Morris <ʇǝu˙sıɹɹoɯʇ@ןןǝʞsɐɥ>
changelog view
@@ -1,3 +1,7 @@+0.0.2++* Export classy lenses and prisms.+ 0.0.1 * Initial release
src/Data/Aviation/Casr/Logbook/Meta/AircraftFlightExpense.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.AircraftFlightExpense( AircraftFlightExpense(ExpenseAircraftUsage, ExpenseAircraftLanding)+, AsAircraftFlightExpense(..) ) where import Control.Lens(makeClassyPrisms)
src/Data/Aviation/Casr/Logbook/Meta/AircraftFlightMeta.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.AircraftFlightMeta( AircraftFlightMeta(AircraftFlightMeta)+, HasAircraftFlightMeta(..) ) where import Control.Lens(makeClassy)
src/Data/Aviation/Casr/Logbook/Meta/AircraftLandingExpense.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.AircraftLandingExpense( AircraftLandingExpense(AircraftLandingExpense)+, HasAircraftLandingExpense(..) ) where import Control.Lens(makeClassy)
src/Data/Aviation/Casr/Logbook/Meta/AircraftUsageExpense.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.AircraftUsageExpense( AircraftUsageExpense(AircraftUsageExpense)+, HasAircraftUsageExpense(..) ) where import Control.Lens(makeClassy)
src/Data/Aviation/Casr/Logbook/Meta/BriefingExpense.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.BriefingExpense( BriefingExpense(BriefingExpense)+, HasBriefingExpense(..) ) where import Control.Lens(makeClassy)
src/Data/Aviation/Casr/Logbook/Meta/BriefingMeta.hs view
@@ -5,6 +5,7 @@ module Data.Aviation.Casr.Logbook.Meta.BriefingMeta( BriefingMeta(BriefingMeta)+, HasBriefingMeta(..) ) where import Control.Lens(makeClassy, makeWrapped)
src/Data/Aviation/Casr/Logbook/Meta/ExamExpense.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.ExamExpense( ExamExpense(ExamExpense)+, HasExamExpense(..) ) where import Control.Lens(makeClassy)
src/Data/Aviation/Casr/Logbook/Meta/ExamMeta.hs view
@@ -5,6 +5,7 @@ module Data.Aviation.Casr.Logbook.Meta.ExamMeta( ExamMeta(ExamMeta)+, HasExamMeta(..) ) where import Control.Lens(makeClassy, makeWrapped)
src/Data/Aviation/Casr/Logbook/Meta/Image.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.Image( Image(Image)+, HasImage(..) ) where import Control.Lens(makeClassy)
src/Data/Aviation/Casr/Logbook/Meta/ImageType.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.ImageType( ImageType(Jpg, Png, Gif)+, AsImageType(..) ) where import Control.Lens(makeClassyPrisms)
src/Data/Aviation/Casr/Logbook/Meta/SimulatorFlightExpense.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.SimulatorFlightExpense( SimulatorFlightExpense(SimulatorFlightExpense)+, HasSimulatorFlightExpense(..) ) where import Control.Lens(makeClassy)
src/Data/Aviation/Casr/Logbook/Meta/SimulatorFlightMeta.hs view
@@ -5,6 +5,7 @@ module Data.Aviation.Casr.Logbook.Meta.SimulatorFlightMeta( SimulatorFlightMeta(SimulatorFlightMeta)+, HasSimulatorFlightMeta(..) ) where import Control.Lens(makeClassy, makeWrapped)
src/Data/Aviation/Casr/Logbook/Meta/TrackLog.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.TrackLog( TrackLog(TrackLog)+, HasTrackLog(..) ) where import Control.Lens(makeClassy)
src/Data/Aviation/Casr/Logbook/Meta/TrackLogType.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.TrackLogType( TrackLogType(Gpx, Kml, Kmz, ImageTrackLog)+, AsTrackLogType(..) ) where import Control.Lens(makeClassyPrisms)
src/Data/Aviation/Casr/Logbook/Meta/TrackLogs.hs view
@@ -5,6 +5,7 @@ module Data.Aviation.Casr.Logbook.Meta.TrackLogs( TrackLogs(TrackLogs)+, HasTrackLogs(..) ) where import Control.Lens(makeClassy, makeWrapped)
src/Data/Aviation/Casr/Logbook/Meta/Video.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.Video( Video(Video)+, HasVideo(..) ) where import Control.Lens(makeClassy)
src/Data/Aviation/Casr/Logbook/Meta/VideoType.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.VideoType( VideoType(YouTube, Vimeo, Bambuser)+, AsVideoType(..) , linkVideoType , iframeVideoType ) where
src/Data/Aviation/Casr/Logbook/Meta/Visualisation.hs view
@@ -2,6 +2,7 @@ module Data.Aviation.Casr.Logbook.Meta.Visualisation( Visualisation(Doarama)+, HasVisualisation(..) ) where import Control.Lens(makeClassy)