integral :: Integral a => Lens' [Int32] [a]
integral = under (adapter (fmap fromIntegral) (fmap fromIntegral))
integral :: Integral a => Lens' [Int32] [a]
integral = under (adapter (fmap fromIntegral) (fmap fromIntegral))
integral = under (adapter (fmap fromIntegral) (fmap fromIntegral))