+1

src/Lets/GetSetLens.hs

reviewed

··· 51 51 -- >>> import qualified Data.Map as Map(fromList) 52 52 -- >>> import qualified Data.Set as Set(fromList) 53 53 -- >>> import Data.Char(ord) 54 54 + -- >>> import Lets.Data 54 55 55 56 data Lens a b = 56 57 Lens

+1

src/Lets/Lens.hs

reviewed

··· 92 92 -- >>> import qualified Data.Map as Map(fromList) 93 93 -- >>> import qualified Data.Set as Set(fromList) 94 94 -- >>> import Data.Char(ord) 95 95 + -- >>> import Lets.Data 95 96 96 97 -- Let's remind ourselves of Traversable, noting Foldable and Functor. 97 98 --

+1

src/Lets/OpticPolyLens.hs

reviewed

··· 55 55 -- >>> import qualified Data.Map as Map(fromList) 56 56 -- >>> import qualified Data.Set as Set(fromList) 57 57 -- >>> import Data.Char(ord) 58 58 + -- >>> import Lets.Data 58 59 59 60 data Lens s t a b = 60 61 Lens

+1

src/Lets/StoreLens.hs

reviewed

··· 59 59 -- >>> import qualified Data.Map as Map(fromList) 60 60 -- >>> import qualified Data.Set as Set(fromList) 61 61 -- >>> import Data.Char(ord) 62 62 + -- >>> import Lets.Data 62 63 63 64 setS :: 64 65 Store s a