Safe Haskell | Safe-Infered |
---|
This is the main module for end-users of lens-families.
If you are not building your own lenses, but just using top-level defined lenses made by others, this is the only module you need.
It provides ^.
for accessing fields and <~
and %~
for setting and modifying fields.
Lenses are composed with .
from the Prelude
and id
is the identity lens.
Warning: Lenses are composed in the opposite order than most lens packages. Lenses in this library enjoy the following identities.
x ^. l1 . l2 === x ^. l1 ^. l2
l1 . l2 %~ f === l1 %~ l2 %~ f
The identity lens behaves as follows.
x ^. id === x
id %~ f === f
Lenses are implemented in van Laarhoven style. Lenses have type
and lens families have type Functor
f => (b -> f b) -> a -> f a
.
Functor
f => (b x -> f (b x')) -> a x -> f (a x')
Remember that lenses and lens families can be used directly for functorial updates.
For example, sndL id
gives you strength.
sndL id :: Functor f => (a, f b) -> f (a, b)
Here is an example of code that uses the Maybe
functor to preserves sharing during update when possible.
-- | 'sharedUpdate' returns the *identical* object if the update doesn't change anything. -- This is useful for preserving sharing. sharedUpdate :: Eq b => Ref Maybe a b -> (b -> b) -> a -> a sharedUpdate lens f a = fromMaybe a (lens f' a) where f' b | fb == b = Nothing | otherwise = Just fb where fb = f b
For stock lenses, see Lens.Family.Stock.
To build your own lenses, see Lens.Family.Unchecked.
References:
- getting :: (a -> b) -> GetterFamily a a' b b'
- project :: GetterFamily a a' b b' -> a -> b
- (^.) :: a -> GetterFamily a a' b b' -> b
- sec :: SetterFamily a a' b b' -> (b -> b') -> a -> a'
- (%~) :: SetterFamily a a' b b' -> (b -> b') -> a -> a'
- (<~) :: SetterFamily a a' b b' -> b' -> a -> a'
- (+~), (*~), (-~) :: Num b => Setter a b -> b -> a -> a
- (/~) :: Fractional b => Setter a b -> b -> a -> a
- (&&~), (||~) :: Setter a Bool -> Bool -> a -> a
- (<>~) :: Monoid o => Setter a o -> o -> a -> a
- type GetterFamily a a' b b' = RefFamily (Getting b) a a' b b'
- type Getter a b = GetterFamily a a b b
- type SetterFamily a a' b b' = RefFamily Setting a a' b b'
- type Setter a b = SetterFamily a a b b
Documentation
getting :: (a -> b) -> GetterFamily a a' b b'Source
getting
promotes a projection function to a read-only lens.
To demote a lens to a projection function, use the section (^. l)
or project l
.
>>>
(3 :+ 4, "example") ^. fstL . getting abs
5.0 :+ 0.0
project :: GetterFamily a a' b b' -> a -> bSource
Demote a getter to a projection function.
(^.) :: a -> GetterFamily a a' b b' -> bSource
Access a field.
sec :: SetterFamily a a' b b' -> (b -> b') -> a -> a'Source
Demote a setter to a semantic editor combinator.
(%~) :: SetterFamily a a' b b' -> (b -> b') -> a -> a'Source
Modify a field.
(<~) :: SetterFamily a a' b b' -> b' -> a -> a'Source
Set a field.
Pseudo-imperatives
(/~) :: Fractional b => Setter a b -> b -> a -> aSource
Types
type GetterFamily a a' b b' = RefFamily (Getting b) a a' b b'Source
type Getter a b = GetterFamily a a b bSource
type SetterFamily a a' b b' = RefFamily Setting a a' b b'Source
type Setter a b = SetterFamily a a b bSource