mapMaybe + tests

`Data.Maybe.mapMaybe` for `InputStream`