data Act : TypeActSend : List Bits8 -> ActActReceive : ActShow Actdata Response : TypeShow ResponsecollectSends : DIterator Response Act i2 o2 r -> (List Bits8, DIterator Response Act i2 o2 r)sendMuchM : Monad m => (List Bits8 -> m ()) -> DIterator Response Act i2 o2 r -> m (DIterator Response Act i2 o2 r)mkSendRecvIterator : DIterator (List Bits8) (List Bits8) altOut altIn a -> DIterator Response Act altOut altIn a