úÎ: ½NoneWrap an 2 and check for dropped or duplicated sequence IDs.Example: ghci>  [1..10 :: ] >>=  0  ( . ) >>=  [1,2,3,4,5,6,7,8,9,10] ghci>  [5..10 :: ] >>=  0  ( . ) >>=  *** Exception: user error ( () {lastSeqId = 0, currSeqId = 5})) ghci>  [5..10 :: ] >>=  1  ( . ) >>=  *** Exception: user error ( (" {lastSeqId = 1, currSeqId = 1})) Wrap an 0 to give a sequence ID for each element written.Example: (outStream', getSeqId) <-  1 outStream return $   (addSeqId getSeqId) outStream' Initial sequence IDEFunction applied to each element of the stream to get the sequence ID Error handler to check the sequence of Pass-through of the given streamInitial sequence ID to count the elements of( 5) is the action to run to get the current sequence ID    seqid-streams-0.1.0System.IO.Streams.SequenceIdSystem.IO.StreamsfromListtoListData.SequenceIdSequenceIdDropped SequenceIdsSequenceIdDuplicatedSystem.IO.Streams.Combinators contramapMsequenceIdInputStreamsequenceIdOutputStreamio-streams-1.2.1.1System.IO.Streams.Internal InputStream seqid-0.1.0 SequenceIdbaseGHC.BaseidfailGHC.Showshow OutputStreamghc-prim GHC.TypesIO