unstream . dropWhile p . stream = dropWhile p
>>> dropWhileEnd (=='.') "foo..." "foo"
dropWhileEnd (=='.') "foo..." == "foo"