packages feed

casr-logbook 0.1.1 → 0.1.2

raw patch · 19 files changed

+23/−2 lines, 19 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Data.Aviation.Casr.Logbook.Time: [_day] :: Time -> Day
+ Data.Aviation.Casr.Logbook.Aircraft: aircraft :: HasAircraft c_awVi => Lens' c_awVi Aircraft
+ Data.Aviation.Casr.Logbook.Aircraft: aircraftEngine :: HasAircraft c_awVi => Lens' c_awVi Engine
+ Data.Aviation.Casr.Logbook.Aircraft: aircraftRegistration :: HasAircraft c_awVi => Lens' c_awVi String
+ Data.Aviation.Casr.Logbook.Aircraft: aircraftType :: HasAircraft c_awVi => Lens' c_awVi String
+ Data.Aviation.Casr.Logbook.Aircraft: class HasAircraft c_awVi where aircraftEngine = (.) aircraft aircraftEngine aircraftRegistration = (.) aircraft aircraftRegistration aircraftType = (.) aircraft aircraftType
+ Data.Aviation.Casr.Logbook.AircraftFlight: aircraftFlight :: HasAircraftFlight c_ay58 => Lens' c_ay58 AircraftFlight
+ Data.Aviation.Casr.Logbook.AircraftFlight: aircraftflightname :: HasAircraftFlight c_ay58 => Lens' c_ay58 String
+ Data.Aviation.Casr.Logbook.AircraftFlight: class HasAircraftFlight c_ay58 where aircraftflightname = (.) aircraftFlight aircraftflightname command = (.) aircraftFlight command daynight = (.) aircraftFlight daynight flightaircraft = (.) aircraftFlight flightaircraft flightothercrew = (.) aircraftFlight flightothercrew flightpath = (.) aircraftFlight flightpath instrumentflightTime = (.) aircraftFlight instrumentflightTime
+ Data.Aviation.Casr.Logbook.AircraftFlight: command :: HasAircraftFlight c_ay58 => Lens' c_ay58 Command
+ Data.Aviation.Casr.Logbook.AircraftFlight: daynight :: HasAircraftFlight c_ay58 => Lens' c_ay58 DayNight
+ Data.Aviation.Casr.Logbook.AircraftFlight: flightaircraft :: HasAircraftFlight c_ay58 => Lens' c_ay58 Aircraft
+ Data.Aviation.Casr.Logbook.AircraftFlight: flightothercrew :: HasAircraftFlight c_ay58 => Lens' c_ay58 [Aviator]
+ Data.Aviation.Casr.Logbook.AircraftFlight: flightpath :: HasAircraftFlight c_ay58 => Lens' c_ay58 FlightPath
+ Data.Aviation.Casr.Logbook.AircraftFlight: instrumentflightTime :: HasAircraftFlight c_ay58 => Lens' c_ay58 TimeAmount
+ Data.Aviation.Casr.Logbook.Aviator: arn :: HasAviator c_aoTK => Lens' c_aoTK [Digit]
+ Data.Aviation.Casr.Logbook.Aviator: aviator :: HasAviator c_aoTK => Lens' c_aoTK Aviator
+ Data.Aviation.Casr.Logbook.Aviator: class HasAviator c_aoTK where arn = (.) aviator arn dob = (.) aviator dob firstname = (.) aviator firstname ratings = (.) aviator ratings surname = (.) aviator surname
+ Data.Aviation.Casr.Logbook.Aviator: dob :: HasAviator c_aoTK => Lens' c_aoTK (Maybe Day)
+ Data.Aviation.Casr.Logbook.Aviator: firstname :: HasAviator c_aoTK => Lens' c_aoTK String
+ Data.Aviation.Casr.Logbook.Aviator: ratings :: HasAviator c_aoTK => Lens' c_aoTK [Rating]
+ Data.Aviation.Casr.Logbook.Aviator: surname :: HasAviator c_aoTK => Lens' c_aoTK String
+ Data.Aviation.Casr.Logbook.Briefing: briefer :: HasBriefing c_aqJA => Lens' c_aqJA Aviator
+ Data.Aviation.Casr.Logbook.Briefing: briefing :: HasBriefing c_aqJA => Lens' c_aqJA Briefing
+ Data.Aviation.Casr.Logbook.Briefing: briefingLocation :: HasBriefing c_aqJA => Lens' c_aqJA Location
+ Data.Aviation.Casr.Logbook.Briefing: briefingName :: HasBriefing c_aqJA => Lens' c_aqJA String
+ Data.Aviation.Casr.Logbook.Briefing: briefingTime :: HasBriefing c_aqJA => Lens' c_aqJA Time
+ Data.Aviation.Casr.Logbook.Briefing: briefingTimeAmount :: HasBriefing c_aqJA => Lens' c_aqJA TimeAmount
+ Data.Aviation.Casr.Logbook.Briefing: class HasBriefing c_aqJA where briefer = (.) briefing briefer briefingLocation = (.) briefing briefingLocation briefingName = (.) briefing briefingName briefingTime = (.) briefing briefingTime briefingTimeAmount = (.) briefing briefingTimeAmount
+ Data.Aviation.Casr.Logbook.Command: _Command :: AsCommand r_asj7 => Prism' r_asj7 Command
+ Data.Aviation.Casr.Logbook.Command: _Dual :: AsCommand r_asj7 => Prism' r_asj7 Aviator
+ Data.Aviation.Casr.Logbook.Command: _ICUS :: AsCommand r_asj7 => Prism' r_asj7 Aviator
+ Data.Aviation.Casr.Logbook.Command: _InCommand :: AsCommand r_asj7 => Prism' r_asj7 ()
+ Data.Aviation.Casr.Logbook.Command: class AsCommand r_asj7 where _ICUS = (.) _Command _ICUS _Dual = (.) _Command _Dual _InCommand = (.) _Command _InCommand
+ Data.Aviation.Casr.Logbook.DayNight: class HasDayNight c_ao4o where dayDayNight = (.) dayNight dayDayNight nightDayNight = (.) dayNight nightDayNight
+ Data.Aviation.Casr.Logbook.DayNight: dayDayNight :: HasDayNight c_ao4o => Lens' c_ao4o TimeAmount
+ Data.Aviation.Casr.Logbook.DayNight: dayNight :: HasDayNight c_ao4o => Lens' c_ao4o DayNight
+ Data.Aviation.Casr.Logbook.DayNight: nightDayNight :: HasDayNight c_ao4o => Lens' c_ao4o TimeAmount
+ Data.Aviation.Casr.Logbook.Engine: _Engine :: AsEngine r_anm5 => Prism' r_anm5 Engine
+ Data.Aviation.Casr.Logbook.Engine: _Multi :: AsEngine r_anm5 => Prism' r_anm5 ()
+ Data.Aviation.Casr.Logbook.Engine: _Single :: AsEngine r_anm5 => Prism' r_anm5 ()
+ Data.Aviation.Casr.Logbook.Engine: class AsEngine r_anm5 where _Single = (.) _Engine _Single _Multi = (.) _Engine _Multi
+ Data.Aviation.Casr.Logbook.Entry: _AircraftFlightEntry :: AsEntry r_aBye ae_aAhz se_aAhA ee_aAhB be_aAhC => Prism' r_aBye (AircraftFlight, ae_aAhz)
+ Data.Aviation.Casr.Logbook.Entry: _BriefingEntry :: AsEntry r_aBye ae_aAhz se_aAhA ee_aAhB be_aAhC => Prism' r_aBye (Briefing, be_aAhC)
+ Data.Aviation.Casr.Logbook.Entry: _Entry :: AsEntry r_aBye ae_aAhz se_aAhA ee_aAhB be_aAhC => Prism' r_aBye (Entry ae_aAhz se_aAhA ee_aAhB be_aAhC)
+ Data.Aviation.Casr.Logbook.Entry: _ExamEntry :: AsEntry r_aBye ae_aAhz se_aAhA ee_aAhB be_aAhC => Prism' r_aBye (Exam, ee_aAhB)
+ Data.Aviation.Casr.Logbook.Entry: _SimulatorFlightEntry :: AsEntry r_aBye ae_aAhz se_aAhA ee_aAhB be_aAhC => Prism' r_aBye (SimulatorFlight, se_aAhA)
+ Data.Aviation.Casr.Logbook.Entry: class AsEntry r_aBye ae_aAhz se_aAhA ee_aAhB be_aAhC | r_aBye -> ae_aAhz se_aAhA ee_aAhB be_aAhC where _AircraftFlightEntry = (.) _Entry _AircraftFlightEntry _SimulatorFlightEntry = (.) _Entry _SimulatorFlightEntry _ExamEntry = (.) _Entry _ExamEntry _BriefingEntry = (.) _Entry _BriefingEntry
+ Data.Aviation.Casr.Logbook.Exam: class HasExam c_atmU where examDelegate = (.) exam examDelegate examLocation = (.) exam examLocation examName = (.) exam examName examResult = (.) exam examResult examResultMaximum = (.) exam examResultMaximum examTime = (.) exam examTime
+ Data.Aviation.Casr.Logbook.Exam: exam :: HasExam c_atmU => Lens' c_atmU Exam
+ Data.Aviation.Casr.Logbook.Exam: examDelegate :: HasExam c_atmU => Lens' c_atmU Aviator
+ Data.Aviation.Casr.Logbook.Exam: examLocation :: HasExam c_atmU => Lens' c_atmU Location
+ Data.Aviation.Casr.Logbook.Exam: examName :: HasExam c_atmU => Lens' c_atmU String
+ Data.Aviation.Casr.Logbook.Exam: examResult :: HasExam c_atmU => Lens' c_atmU Int
+ Data.Aviation.Casr.Logbook.Exam: examResultMaximum :: HasExam c_atmU => Lens' c_atmU Int
+ Data.Aviation.Casr.Logbook.Exam: examTime :: HasExam c_atmU => Lens' c_atmU Time
+ Data.Aviation.Casr.Logbook.FlightPath: class HasFlightPath c_ameU where flightEnd = (.) flightPath flightEnd flightIntermediate = (.) flightPath flightIntermediate flightStart = (.) flightPath flightStart
+ Data.Aviation.Casr.Logbook.FlightPath: flightEnd :: HasFlightPath c_ameU => Lens' c_ameU FlightPoint
+ Data.Aviation.Casr.Logbook.FlightPath: flightIntermediate :: HasFlightPath c_ameU => Lens' c_ameU [FlightPoint]
+ Data.Aviation.Casr.Logbook.FlightPath: flightPath :: HasFlightPath c_ameU => Lens' c_ameU FlightPath
+ Data.Aviation.Casr.Logbook.FlightPath: flightStart :: HasFlightPath c_ameU => Lens' c_ameU FlightPoint
+ Data.Aviation.Casr.Logbook.FlightPoint: class HasFlightPoint c_al3T where landingTime = (.) flightPoint landingTime point = (.) flightPoint point runway = (.) flightPoint runway
+ Data.Aviation.Casr.Logbook.FlightPoint: flightPoint :: HasFlightPoint c_al3T => Lens' c_al3T FlightPoint
+ Data.Aviation.Casr.Logbook.FlightPoint: landingTime :: HasFlightPoint c_al3T => Lens' c_al3T Time
+ Data.Aviation.Casr.Logbook.FlightPoint: point :: HasFlightPoint c_al3T => Lens' c_al3T String
+ Data.Aviation.Casr.Logbook.FlightPoint: runway :: HasFlightPoint c_al3T => Lens' c_al3T (Maybe String)
+ Data.Aviation.Casr.Logbook.Location: class HasLocation c_ajZ2 where locationlatitude = (.) location locationlatitude locationlongitude = (.) location locationlongitude locationname = (.) location locationname
+ Data.Aviation.Casr.Logbook.Location: location :: HasLocation c_ajZ2 => Lens' c_ajZ2 Location
+ Data.Aviation.Casr.Logbook.Location: locationlatitude :: HasLocation c_ajZ2 => Lens' c_ajZ2 Double
+ Data.Aviation.Casr.Logbook.Location: locationlongitude :: HasLocation c_ajZ2 => Lens' c_ajZ2 Double
+ Data.Aviation.Casr.Logbook.Location: locationname :: HasLocation c_ajZ2 => Lens' c_ajZ2 String
+ Data.Aviation.Casr.Logbook.Logbook: class HasLogbook c_aE8d ae_aE28 se_aE29 ee_aE2a be_aE2b | c_aE8d -> ae_aE28 se_aE29 ee_aE2a be_aE2b where logbookaviator = (.) logbook logbookaviator logbookentries = (.) logbook logbookentries
+ Data.Aviation.Casr.Logbook.Logbook: logbook :: HasLogbook c_aE8d ae_aE28 se_aE29 ee_aE2a be_aE2b => Lens' c_aE8d (Logbook ae_aE28 se_aE29 ee_aE2a be_aE2b)
+ Data.Aviation.Casr.Logbook.Logbook: logbookaviator :: HasLogbook c_aE8d ae_aE28 se_aE29 ee_aE2a be_aE2b => Lens' c_aE8d Aviator
+ Data.Aviation.Casr.Logbook.Logbook: logbookentries :: HasLogbook c_aE8d ae_aE28 se_aE29 ee_aE2a be_aE2b => Lens' c_aE8d (Entries ae_aE28 se_aE29 ee_aE2a be_aE2b)
+ Data.Aviation.Casr.Logbook.Rating: class HasRating c_aj4d where ratingAchieved = (.) rating ratingAchieved ratingName = (.) rating ratingName
+ Data.Aviation.Casr.Logbook.Rating: rating :: HasRating c_aj4d => Lens' c_aj4d Rating
+ Data.Aviation.Casr.Logbook.Rating: ratingAchieved :: HasRating c_aj4d => Lens' c_aj4d (Maybe Day)
+ Data.Aviation.Casr.Logbook.Rating: ratingName :: HasRating c_aj4d => Lens' c_aj4d String
+ Data.Aviation.Casr.Logbook.SimulatorFlight: class HasSimulatorFlight c_avge where instrumentsimulatorTimeAmount = (.) simulatorFlight instrumentsimulatorTimeAmount simulatorflightname = (.) simulatorFlight simulatorflightname simulatorflighttime = (.) simulatorFlight simulatorflighttime simulatorothercrew = (.) simulatorFlight simulatorothercrew simulatortype = (.) simulatorFlight simulatortype
+ Data.Aviation.Casr.Logbook.SimulatorFlight: instrumentsimulatorTimeAmount :: HasSimulatorFlight c_avge => Lens' c_avge TimeAmount
+ Data.Aviation.Casr.Logbook.SimulatorFlight: simulatorFlight :: HasSimulatorFlight c_avge => Lens' c_avge SimulatorFlight
+ Data.Aviation.Casr.Logbook.SimulatorFlight: simulatorflightname :: HasSimulatorFlight c_avge => Lens' c_avge String
+ Data.Aviation.Casr.Logbook.SimulatorFlight: simulatorflighttime :: HasSimulatorFlight c_avge => Lens' c_avge Time
+ Data.Aviation.Casr.Logbook.SimulatorFlight: simulatorothercrew :: HasSimulatorFlight c_avge => Lens' c_avge [Aviator]
+ Data.Aviation.Casr.Logbook.SimulatorFlight: simulatortype :: HasSimulatorFlight c_avge => Lens' c_avge String
+ Data.Aviation.Casr.Logbook.Time: [_daytime] :: Time -> Day
+ Data.Aviation.Casr.Logbook.Time: class HasTime c_aidl where daytime = (.) time daytime timeofday = (.) time timeofday
+ Data.Aviation.Casr.Logbook.Time: daytime :: HasTime c_aidl => Lens' c_aidl Day
+ Data.Aviation.Casr.Logbook.Time: time :: HasTime c_aidl => Lens' c_aidl Time
+ Data.Aviation.Casr.Logbook.Time: timeofday :: HasTime c_aidl => Lens' c_aidl (Maybe TimeOfDay)
+ Data.Aviation.Casr.Logbook.TimeAmount: class HasTimeAmount c_agNn where hours = (.) timeAmount hours tenthofhour = (.) timeAmount tenthofhour
+ Data.Aviation.Casr.Logbook.TimeAmount: hours :: HasTimeAmount c_agNn => Lens' c_agNn Int
+ Data.Aviation.Casr.Logbook.TimeAmount: tenthofhour :: HasTimeAmount c_agNn => Lens' c_agNn Digit
+ Data.Aviation.Casr.Logbook.TimeAmount: timeAmount :: HasTimeAmount c_agNn => Lens' c_agNn TimeAmount

Files

casr-logbook.cabal view
@@ -1,5 +1,5 @@ name:               casr-logbook-version:            0.1.1+version:            0.1.2 license:            OtherLicense license-file:       LICENSE author:             Tony Morris <ʇǝu˙sıɹɹoɯʇ@ןןǝʞsɐɥ>
changelog view
@@ -1,3 +1,7 @@+0.1.2++* Expose lensy values.+ 0.1.1  * Move repository from `casr-61.345` to `casr-logbook`.
src/Data/Aviation/Casr/Logbook/Aircraft.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.Aircraft(   Aircraft(..)+, HasAircraft(..) , singleaircraft , multiaircraft ) where
src/Data/Aviation/Casr/Logbook/AircraftFlight.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.AircraftFlight(   AircraftFlight(..)+, HasAircraftFlight(..) , icusonlyflight , noif_icusonlyflight , dualonlyflight
src/Data/Aviation/Casr/Logbook/Aviator.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.Aviator(   Aviator(..)+, HasAviator(..) , aviatorwithname , nodobaviator , dobaviator
src/Data/Aviation/Casr/Logbook/Briefing.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.Briefing(   Briefing(..)+, HasBriefing(..) ) where    import Control.Lens(makeClassy)
src/Data/Aviation/Casr/Logbook/Command.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.Command(   Command(..)+, AsCommand(..) ) where  import Control.Lens(makeClassyPrisms)
src/Data/Aviation/Casr/Logbook/DayNight.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.DayNight(   DayNight(..)+, HasDayNight(..) , day , night ) where
src/Data/Aviation/Casr/Logbook/Engine.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.Engine(   Engine(..)+, AsEngine(..) ) where  import Control.Lens(makeClassyPrisms)
src/Data/Aviation/Casr/Logbook/Entry.hs view
@@ -6,6 +6,7 @@  module Data.Aviation.Casr.Logbook.Entry(   Entry(..)+, AsEntry(..) ) where  import Control.Lens(makeClassyPrisms)
src/Data/Aviation/Casr/Logbook/Exam.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.Exam(   Exam(..)+, HasExam(..) , dayonlyexam ) where
src/Data/Aviation/Casr/Logbook/FlightPath.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.FlightPath(   FlightPath(..)+, HasFlightPath(..) , directflightpath , directcircuit , pointsatdate
src/Data/Aviation/Casr/Logbook/FlightPoint.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.FlightPoint(   FlightPoint(..)+, HasFlightPoint(..) , pointatdate , runwayatdate ) where
src/Data/Aviation/Casr/Logbook/Location.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.Location(   Location(..)+, HasLocation(..) ) where  import Control.Lens(makeClassy)
src/Data/Aviation/Casr/Logbook/Logbook.hs view
@@ -5,6 +5,7 @@  module Data.Aviation.Casr.Logbook.Logbook(   Logbook(..)+, HasLogbook(..) , aviatorlogbook , emptylogbook , singleentrylogbook
src/Data/Aviation/Casr/Logbook/Rating.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.Rating(   Rating(..)+, HasRating(..) , nodayrating , dayrating ) where
src/Data/Aviation/Casr/Logbook/SimulatorFlight.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.SimulatorFlight(   SimulatorFlight(..)+, HasSimulatorFlight(..) , dayonlysimulator ) where
src/Data/Aviation/Casr/Logbook/Time.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.Time(   Time(..)+, HasTime(..) , dayonly , dayandtime ) where@@ -16,7 +17,7 @@  data Time =   Time {-    _day :: Day+    _daytime :: Day   , _timeofday :: Maybe TimeOfDay   } deriving (Eq, Ord, Show)
src/Data/Aviation/Casr/Logbook/TimeAmount.hs view
@@ -3,6 +3,7 @@  module Data.Aviation.Casr.Logbook.TimeAmount(   TimeAmount(..)+, HasTimeAmount(..) , parttimeamount , zerotimeamount , addtimeamount