Cleanup

src/Dodge/Data/Distortion.hs

@@ -0,0 +1,13 @@
+{-# LANGUAGE DeriveGeneric #-}
+{-# LANGUAGE TemplateHaskell #-}
+{-# LANGUAGE StrictData #-}
+module Dodge.Data.Distortion where
+import Data.Aeson
+import Data.Aeson.TH
+import Geometry
+
+data Distortion 
+    = RadialDistortion Point2 Point2 Point2 Float
+  deriving (Eq,Ord,Show,Read)
+
+deriveJSON defaultOptions ''Distortion