yesod::flat_map: implementation (1)

Signed-off-by: Alex Dubov <oakad@yahoo.com>