@@ -100,6 +100,8 @@ rename name (NamedSchema _ schema) = NamedSchema name schema
100-- {-\# LANGUAGE OverloadedLists \#-} -- allows to write 'Map' and 'HashMap' as lists
100-- {-\# LANGUAGE OverloadedLists \#-} -- allows to write 'Map' and 'HashMap' as lists
102-- import Control.Lens
102-- import Control.Lens
104+-- import Data.Swagger
104-- data Coord = Coord { x :: Double, y :: Double }
106-- data Coord = Coord { x :: Double, y :: Double }