1/1: Building qtt (qtt.idr)
Main>  0 m : Nat
 0 a : Type
   x : a
 0 y : a
 0 ws : Vect k a
 1 zs : Vect (S k) a
   ys : Vect m a
 0 n : Nat
------------------------------
foo : Vect (S (S (plus k m))) a
Main>  0 m : Nat
 0 a : Type
   ys : Vect m a
   x : a
 1 zs : Vect k a
 0 xs : Vect (S k) a
 0 n : Nat
------------------------------
bar : Vect (S (plus k m)) a
Main>  0 m : Nat
 0 a : Type
   ys : Vect m a
   x : a
 0 zs : Vect k a
 0 xs : Vect (S k) a
 0 n : Nat
 1 ts : Vect k a
------------------------------
baz : Vect (S (plus k m)) a
Main> Bye for now!