dropWhile (pure False) = cat dropWhile (liftA2 (||) p1 p2) = dropWhile p1 >-> dropWhile p2
>>> S.print $ S.dropWhile ((< 5) . length) S.stdinLn one<Enter> two<Enter> three<Enter> "three" four<Enter> "four" ^CInterrupted.
dropWhile p t == snd (span p t)
>>> dropWhile (< 'c') "abcdabcd" "cdabcd"