[Haskell-cafe] lens and Maybe value

[PICCA Frederic-Emmanuel]

import           Control.Lens                       (makeLenses)

data A = A { _a = (Maybe Int) }

makeLenses A

myA = A Nothing

ma = Just 1

newA = case ma of
         Nothing -> myA
         (Just _) -> (a .~ ma) myA