>>> execState (do _1 .&.= 15; _2 .&.= 3) (7,7) (7,3)
(.&.=) :: (MonadState s m, Bits a) => Setter' s a -> a -> m () (.&.=) :: (MonadState s m, Bits a) => Iso' s a -> a -> m () (.&.=) :: (MonadState s m, Bits a) => Lens' s a -> a -> m () (.&.=) :: (MonadState s m, Bits a) => Traversal' s a -> a -> m ()
>>> runState (_1 <.&.= 15) (31,0) (15,(15,0))
(<.&.=) :: (MonadState s m, Bits a) => Lens' s a -> a -> m a (<.&.=) :: (MonadState s m, Bits a, Monoid a) => Traversal' s a -> a -> m a
>>> _2 <.&.~ 7 $ ("hello",254) (6,("hello",6))
(<.&.~) :: Bits a => Iso s t a a -> a -> s -> (a, t) (<.&.~) :: Bits a => Lens s t a a -> a -> s -> (a, t) (<.&.~) :: (Bits a, Monoid a) => Traversal s t a a -> a -> s -> (a, t)
>>> runState (_1 <<.&.= 15) (31,0) (31,(15,0))
(<<.&.=) :: (MonadState s m, Bits a) => Lens' s a -> a -> m a (<<.&.=) :: (MonadState s m, Bits a, Monoid a) => Traversal' s a -> a -> m a
>>> _2 <<.&.~ 7 $ ("hello", 254) (254,("hello",6))
(<<.&.~) :: Bits a => Iso s t a a -> a -> s -> (a, t) (<<.&.~) :: Bits a => Lens s t a a -> a -> s -> (a, t) (<<.&.~) :: (Bits a, Monoid a) => Traversal s t a a -> a -> s -> (a, t)