Contents

module Person
  ( Address (..)
  , Born    (..)
  , Name    (..)
  , Person  (..)
  , bornStreet
  , renameStreets
  , setBirthMonth
  , setCurrentStreet
  ) where

import Data.Time.Calendar (Day)

data Person = Person { _name    :: Name
                     , _born    :: Born
                     , _address :: Address
                     }

data Name = Name { _foreNames :: String
                 , _surName   :: String
                 }

data Born = Born { _bornAt :: Address
                 , _bornOn :: Day
                 }

data Address = Address { _street      :: String
                       , _houseNumber :: Int
                       , _place       :: String
                       , _country     :: String
                       }

bornStreet :: Born -> String
bornStreet = error "You need to implement this function."

setCurrentStreet :: String -> Person -> Person
setCurrentStreet = error "You need to implement this function."

setBirthMonth :: Int -> Person -> Person
setBirthMonth = error "You need to implement this function."

renameStreets :: (String -> String) -> Person -> Person
renameStreets = error "You need to implement this function."

Version data entries

52 entries across 52 versions & 1 rubygems

Version	Path
trackler-2.0.6.43	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.42	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.41	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.40	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.39	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.38	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.37	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.36	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.35	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.34	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.33	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.32	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.31	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.30	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.29	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.28	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.27	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.26	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.25	tracks/haskell/exercises/lens-person/src/Person.hs
trackler-2.0.6.24	tracks/haskell/exercises/lens-person/src/Person.hs