Cleanup

2025-11-14 11:48:00 +00:00
parent 91917dbddd
commit 9fc36ec54c
4 changed files with 168 additions and 185 deletions
@@ -7,8 +7,7 @@ import Geometry
 import Data.Aeson
 import Data.Aeson.TH

-data Distortion
-    = RadialDistortion Point2 Point2 Point2 Float
+data Distortion = RadialDistortion Point2 Point2 Point2 Float
    deriving (Eq, Ord, Show, Read) --Generic, Flat)

 deriveJSON defaultOptions ''Distortion