Control.Lens.Getter

type Getting r s a

type Getter s a

foldMapOf

foldOf

to

(^.)

use

data Accessor r a