Data.FTCQueue

data FTCQueue m a b

tsingleton

(|>)

snoc

(><)

append

data ViewL m a b

tviewl