lens6

lens6.js

const addresses = lensProp('addresses')
const street = lensProp('street')
const allStreets = compose(addresses, mapped, street)

//  :: Int -> Task Error User
const getUser = id => new Task((rej, res) => setTimeout(() => res(user), 400))

// profilePage :: User -> Html
const profilePage = compose(map(x => `<span>${x.street}<span>`), view(addresses))

// updateUser :: User -> User
const updateUser = over(allStreets, replace(/\d+/, '****'))

// renderProfile :: User -> Html
const renderProfile = compose(map(compose(profilePage, updateUser)), getUser)

renderProfile(1).fork(console.log, console.log)
// [ '<span>**** Walnut Dr.<span>', '<span>**** Crane Way<span>' ]

Aren't numbers in the second address replaced with **** as well?

[ '<span>**** Walnut Dr.<span>', '<span>**** Crane Way<span>' ]

As a sidenote: amazing article, thanks so much for it, Brian!

Thanks for the correction!

renderProfile type anotation should be: Int -> Task Err Html?

Ps: thanks for the article!