add Lens for Map.WithDefault

For when you don't need a PLens.
Merge pull request #547 from refried/patch-10

add Lens for Map.WithDefault