packages feed

casr-logbook 0.0.8 → 0.0.9

raw patch · 3 files changed

+39/−1236 lines, 3 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Data.Aviation.Casr.Logbook: main :: IO ()

Files

casr-logbook.cabal view
@@ -1,5 +1,5 @@ name:               casr-logbook-version:            0.0.8+version:            0.0.9 license:            OtherLicense license-file:       LICENSE author:             Tony Morris <ʇǝu˙sıɹɹoɯʇ@ןןǝʞsɐɥ>
changelog view
@@ -1,3 +1,7 @@+0.0.9++* Woops, left in test code.+ 0.0.8  * change amp to mdash in flight path.
src/Data/Aviation/Casr/Logbook.hs view
@@ -1,1235 +1,34 @@-{-# LANGUAGE OverloadedStrings #-}--module Data.Aviation.Casr.Logbook ( main,-  module L-) where--import Data.Aviation.Casr.Logbook.Aircraft as L-import Data.Aviation.Casr.Logbook.ARN as L-import Data.Aviation.Casr.Logbook.Date as L-import Data.Aviation.Casr.Logbook.DayNight as L-import Data.Aviation.Casr.Logbook.DOB as L-import Data.Aviation.Casr.Logbook.Engine as L-import Data.Aviation.Casr.Logbook.FlightLogEntries as L-import Data.Aviation.Casr.Logbook.FlightLogEntry as L-import Data.Aviation.Casr.Logbook.FlightLog as L-import Data.Aviation.Casr.Logbook.FlightPath as L-import Data.Aviation.Casr.Logbook.Hours as L-import Data.Aviation.Casr.Logbook.Image as L-import Data.Aviation.Casr.Logbook.Images as L-import Data.Aviation.Casr.Logbook.ImageType as L-import Data.Aviation.Casr.Logbook.Printer.Html as L-import Data.Aviation.Casr.Logbook.Printer.Markdown as L-import Data.Aviation.Casr.Logbook.Name as L-import Data.Aviation.Casr.Logbook.PiC as L-import Data.Aviation.Casr.Logbook.PoB as L-import Data.Aviation.Casr.Logbook.Sequence as L-import Data.Aviation.Casr.Logbook.Totals as L-import Data.Aviation.Casr.Logbook.TrackLog as L-import Data.Aviation.Casr.Logbook.TrackLogs as L-import Data.Aviation.Casr.Logbook.TrackLogType as L-import Data.Aviation.Casr.Logbook.Video as L-import Data.Aviation.Casr.Logbook.Videos as L-import Data.Aviation.Casr.Logbook.VideoType as L-import Data.Aviation.Casr.Logbook.Visualisation as L-import Data.Aviation.Casr.Logbook.Visualisations as L-import Data.Aviation.Casr.Logbook.VisualisationType as L----- import Data.Aviation.Casr.Logbook-import System.Environment-import System.IO--vhldo ::-  Aircraft-vhldo =-  Aircraft-    "2011 Cessna 162 Skycatcher"-    "VH-LDO"-    Single--vhafr ::-  Aircraft-vhafr =-  Aircraft-    "2000 Cessna 172S Skyhawk"-    "VH-AFR"-    Single--vhvvo ::-  Aircraft-vhvvo =-  Aircraft-    "2000 Cessna 172R Skyhawk"-    "VH-VVO"-    Single--vhzwy ::-  Aircraft-vhzwy =-  Aircraft-    "2000 Cessna 172S Skyhawk"-    "VH-ZWY"-    Single--ybaf2ybaf ::-  FlightPath-ybaf2ybaf =-  directPath-    "YBAF"-    "YBAF"--flightlogentries ::-  FlightLogEntries-flightlogentries =-  FlightLogEntries-    [-      FlightLogEntry-        "P1.1 Effects of Controls"-        "20151214"-        vhldo-        (-          Hours-            1-            2-        )-        dual-        ybaf2ybaf-        Day-        "Michael Ward"-        mempty-        mempty-        mempty-        mempty-    , FlightLogEntry-        "P1.2 Straight & Level"-        "20151218"-        vhldo-        (-          Hours-            1-            0-        )-        dual-        ybaf2ybaf-        Day-        "Michael Ward"-        (-          TrackLogs-          [-            TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20151218-vh-ldo.gpx"-              Nothing-              Gpx-          , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20151218-vh-ldo.png"-              Nothing-              (ImageLog Png)-          ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/595690"-              Nothing-              (Doarama "k=6rAdypE")-          ]-        )-        mempty-        (-          Videos-          [-            Video-              "13BVior4VmY"-              (Just "Head camera")-              YouTube-          ]-        )-    , FlightLogEntry-        "P1.3 Climbing & Descending"-        "20151220"-        vhldo-        (-          Hours-            1-            1-        )-        dual-        ybaf2ybaf-        Day-        "Michael Ward"-        (-          TrackLogs-          [-            TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20151220-vh-ldo.gpx"-              Nothing-              Gpx-          , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20151220-vh-ldo.png"-              Nothing-              (ImageLog Png)-          ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/596790"-              Nothing-              (Doarama "6rZrPp6")-          ]-        )-        mempty-        (-          Videos-          [-            Video-              "8tZ8kxsVz6E"-              (Just "Head camera")-              YouTube-          ]      -        )-    , FlightLogEntry-        "P1.4 Turning"-        "20160104"-        vhldo-        (-          Hours-            1-            3-        )-        dual-        ybaf2ybaf-        Day-        "Ryan Low"-        (-          TrackLogs-          [-            TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160104-vh-ldo.gpx"-              Nothing-              Gpx-          , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160104-vh-ldo.png"-              Nothing-              (ImageLog Png)-          ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/607004"-              Nothing-              (Doarama "6x5Az8e")-          ]-        )-        mempty-        mempty-    , FlightLogEntry-        "P1.5 Stalling"-        "20160108"-        vhldo-        (-          Hours-            1-            3-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-          [-            TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160108-vh-ldo.gpx"-              Nothing-              Gpx-          , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160108-vh-ldo.png"-              Nothing-              (ImageLog Png)-          ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/611980"-              Nothing-              (Doarama "eYQA7ve")-          ]-        )-        mempty-        mempty-    , FlightLogEntry-        "P1.6 Consolidation"-        "20160115"-        vhafr-        (-          Hours-            1-            4-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-          [-            TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160115-vh-afr.gpx"-              Nothing-              Gpx-          , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160115-vh-afr.png"-              Nothing-              (ImageLog Png)-          ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/617610"-              Nothing-              (Doarama "k8p38wk")-          ]-        )-        mempty-        mempty-    , FlightLogEntry-        "P2.1 Circuits"-        "20160122"-        vhafr-        (-          Hours-            1-            1-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-          [-            TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160122-vh-afr.gpx"-              Nothing-              Gpx-          , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160122-vh-afr.png"-              Nothing-              (ImageLog Png)-          ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/622258"-              Nothing-              (Doarama "k0nXwd6")-          ]-        )-        (-          Images-          [-            Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160122-vh-afr/20160122_082411.jpg"-              Nothing-              Jpg-          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160122-vh-afr/20160122_082856.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160122-vh-afr/20160122_082902.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160122-vh-afr/20160122_082905.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160122-vh-afr/20160122_083348.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160122-vh-afr/20160122_083352.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160122-vh-afr/20160122_083353.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160122-vh-afr/20160122_084902.jpg"-              Nothing-              Jpg -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160122-vh-afr/20160122_084906.jpg"-              Nothing-              Jpg -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160122-vh-afr/20160122_084908.jpg"-              Nothing-              Jpg                                     -          ]-        )-        (-          Videos-          [-            Video-              "gz8Ivcjas9o"-              (Just "Head camera")-              YouTube-          ]-        )     -    , FlightLogEntry-        "P2.2 Circuits"-        "20160129"-        vhafr-        (-          Hours-            1-            1-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-          [-            TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160129-vh-afr.gpx"-              Nothing-              Gpx-          , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160129-vh-afr.png"-              Nothing-              (ImageLog Png)-          ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/626694"-              Nothing-              (Doarama "6b7RKAe")-          ]-        )-        mempty-        (-          Videos-          [-            Video-              "k9c1GdxkdQY"-              (Just "Head camera")-              YouTube-          ]       -        )-    , FlightLogEntry-        "P2.3 Circuits"-        "20160205"-        vhafr-        (-          Hours-            1-            1-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-          [-            TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160205-vh-afr.gpx"-              Nothing-              Gpx-          , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160205-vh-afr.png"-              Nothing-              (ImageLog Png)-          ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/635027"-              Nothing-              (Doarama "eBdaGlE")-          ]-        )-        mempty-        mempty-    , FlightLogEntry-        "P2.4 Circuits"-        "20160212"-        vhafr-        (-          Hours-            1-            1-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-          [-            TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160212-vh-afr.gpx"-              Nothing-              Gpx-          , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160212-vh-afr.png"-              Nothing-              (ImageLog Png)-          ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/640001"-              Nothing-              (Doarama "E2y3mnk")-          ]-        )-        mempty-        (-          Videos-          [-            Video-              "e7UcjgxOmDw"-              (Just "Head camera")-              YouTube-          ]-        )                                                            -    , FlightLogEntry-        "P3.1 Circuit Emergencies"-        "20160218"-        vhafr-        (-          Hours-            1-            1-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-          [-            TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160218-vh-afr.gpx"-              Nothing-              Gpx-          , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160218-vh-afr.png"-              Nothing-              (ImageLog Png)-          ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/644663"-              Nothing-              (Doarama "Ep1r9P6")-          ]-        )-        (-          Images-          [-            Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090347.jpg"-              Nothing-              Jpg-          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090348.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090351.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090409.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090411.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090421.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090423.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090432.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090436.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090441.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090446.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090452.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090454.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090459.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090501.jpg"-              Nothing-              Jpg            -          , Image-              "https://raw.githubusercontent.com/tonymorris/ppl/master/images/20160218-vh-afr/20160218_090502.jpg"-              Nothing-              Jpg            -          ]-        )-        (-          Videos-          [-            Video-              "EO4D4zFnpIU"-              (Just "Head camera")-              YouTube-          ]  -        )            -    , FlightLogEntry-        "P3.2 Circuit Emergencies"-        "20160304"-        vhafr-        (-          Hours-            1-            1-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160304-vh-afr.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160304-vh-afr.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/674600"-              Nothing-              (Doarama "6XbQDjk")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-            Video-              "jWUijREg4aE"-              (Just "Head camera")-              YouTube-          ]-        )                        -    , FlightLogEntry-        "P3.3 Circuit Emergencies"-        "20160324"-        vhzwy-        (-          Hours-            1-            0-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160324-vh-zwy.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160324-vh-zwy.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/691106"-              Nothing-              (Doarama "6bPVnnk")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-            Video-              "RNiYu3ZsfZw"-              (Just "Forward camera")-              YouTube-          ]-        )                        -    , FlightLogEntry-        "P3.4 Circuits"-        "20160330"-        vhzwy-        (-          Hours-            0-            9-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160330-vh-zwy.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160330-vh-zwy.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/696748"-              Nothing-              (Doarama "6xV5dVk")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-          ]-        )-    , FlightLogEntry-        "P3.4 Circuits"-        "20160330"-        vhzwy-        (-          Hours-            0-            4-        )-        solo-        ybaf2ybaf-        Day-        "Tony Morris"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160330-vh-zwy.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160330-vh-zwy.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/696748"-              Nothing-              (Doarama "6xV5dVk")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-          ]-        )           -    , FlightLogEntry-        "P3.5 Circuits (Crosswind)"-        "20160415"-        vhafr-        (-          Hours-            1-            0-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160415-vh-afr.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160415-vh-afr.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/711553"-              Nothing-              (Doarama "k9nWdbE")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-          ]-        )-    , FlightLogEntry-        "P3.6 Circuits (Solo check)"-        "20160422"-        vhafr-        (-          Hours-            0-            5-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160422-vh-afr.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160422-vh-afr.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/719248"-              Nothing-              (Doarama "6xVbR8k")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-            Video-              "UR1IkF5RSh4"-              (Just "Forward camera")-              YouTube-          ]-        )                                     -    , FlightLogEntry-        "P3.6 Circuits (Solo)"-        "20160422"-        vhafr-        (-          Hours-            1-            0-        )-        solo-        ybaf2ybaf-        Day-        "Tony Morris"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160422-vh-afr.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160422-vh-afr.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/719248"-              Nothing-              (Doarama "6xVbR8k")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-            Video-              "UR1IkF5RSh4"-              (Just "Forward camera")-              YouTube-          ]-        )                                     -    , FlightLogEntry-        "P3.7 Circuits (Dual)"-        "20160427"-        vhvvo-        (-          Hours-            0-            6-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160427-vh-vvo.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160427-vh-vvo.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/724934"-              Nothing-              (Doarama "eo1yvBE")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-          ]-        )                                     -    , FlightLogEntry-        "P3.7 Circuits (Solo)"-        "20160427"-        vhvvo-        (-          Hours-            0-            8-        )-        solo-        ybaf2ybaf-        Day-        "Tony Morris"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160427-vh-vvo.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160427-vh-vvo.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/724934"-              Nothing-              (Doarama "eo1yvBE")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-            Video-              "2QNp74n2Lx8"-              (Just "Forward camera")-              YouTube-          ]-        ) -    , FlightLogEntry-        "Practice Forced Landings"-        "20160509"-        vhafr-        (-          Hours-            1-            0-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160509-vh-afr.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160509-vh-afr.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/741813"-              Nothing-              (Doarama "edWMLO6")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-            Video-              "o1dx3hZuov0"-              (Just "Forward camera")-              YouTube-          , Video-              "6250595"-              (Just "Live stream")-              Bambuser-          ]-        )          -      , FlightLogEntry-        "Steep Turns"-        "20160514"-        vhvvo-        (-          Hours-            1-            2-        )-        dual-        ybaf2ybaf-        Day-        "David Schofield"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160514-vh-vvo.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160514-vh-vvo.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/748638"-              Nothing-              (Doarama "6jAODJE")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-            Video-              "vw9KjjqkOEg"-              (Just "Forward camera")-              YouTube-          , Video-              "6258610"-              (Just "Live stream")-              Bambuser-          ]-        )                                             -      , FlightLogEntry-        "Steep Turns"-        "20160519"-        vhvvo-        (-          Hours-            1-            1-        )-        dual-        ybaf2ybaf-        Day-        "Ryan Low"-        (-          TrackLogs-            [-              TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/20160519-vh-vvo.gpx"-              Nothing-              Gpx      -            , TrackLog-              "https://raw.githubusercontent.com/tonymorris/ppl/master/tracks/png/20160519-vh-vvo.png"-              Nothing-              (ImageLog Png)                    -            ]-        )-        (-          Visualisations-          [-            Visualisation-              "http://doarama.com/view/756397"-              Nothing-              (Doarama "k9nNR4E")-          ]-        )-        (-          Images-          [-          ]-        )-        (-          Videos-          [-            -- todo youtube-            Video-              "6267124"-              (Just "Live stream")-              Bambuser-          ]-        )                                             -    ]--flightlog ::-  FlightLog-flightlog =-  FlightLog-    "Tony John Morris"-    "19771102"-    "1007036"-    flightlogentries--main ::-  IO ()-main =-  do  a <- getArgs-      case a of-        [md, h] ->-          do  writeMarkdownFile md flightlog-              writeHtmlFile h flightlog-        _ -> -          hPutStrLn stderr "args: <markdown-file> <html-file>"+module Data.Aviation.Casr.Logbook (+  module L+) where++import Data.Aviation.Casr.Logbook.Aircraft as L+import Data.Aviation.Casr.Logbook.ARN as L+import Data.Aviation.Casr.Logbook.Date as L+import Data.Aviation.Casr.Logbook.DayNight as L+import Data.Aviation.Casr.Logbook.DOB as L+import Data.Aviation.Casr.Logbook.Engine as L+import Data.Aviation.Casr.Logbook.FlightLogEntries as L+import Data.Aviation.Casr.Logbook.FlightLogEntry as L+import Data.Aviation.Casr.Logbook.FlightLog as L+import Data.Aviation.Casr.Logbook.FlightPath as L+import Data.Aviation.Casr.Logbook.Hours as L+import Data.Aviation.Casr.Logbook.Image as L+import Data.Aviation.Casr.Logbook.Images as L+import Data.Aviation.Casr.Logbook.ImageType as L+import Data.Aviation.Casr.Logbook.Printer.Html as L+import Data.Aviation.Casr.Logbook.Printer.Markdown as L+import Data.Aviation.Casr.Logbook.Name as L+import Data.Aviation.Casr.Logbook.PiC as L+import Data.Aviation.Casr.Logbook.PoB as L+import Data.Aviation.Casr.Logbook.Sequence as L+import Data.Aviation.Casr.Logbook.Totals as L+import Data.Aviation.Casr.Logbook.TrackLog as L+import Data.Aviation.Casr.Logbook.TrackLogs as L+import Data.Aviation.Casr.Logbook.TrackLogType as L+import Data.Aviation.Casr.Logbook.Video as L+import Data.Aviation.Casr.Logbook.Videos as L+import Data.Aviation.Casr.Logbook.VideoType as L+import Data.Aviation.Casr.Logbook.Visualisation as L+import Data.Aviation.Casr.Logbook.Visualisations as L+import Data.Aviation.Casr.Logbook.VisualisationType as L