data SimpleCatDeque : (Type -> Type) -> Type -> Type
Shallow : d a -> SimpleCatDeque d a
Deep : d a -> Lazy (SimpleCatDeque d (d a)) -> d a -> SimpleCatDeque d a
Deque d => CatenableDeque (SimpleCatDeque d)
Deque d => Deque (SimpleCatDeque d)