    ps ⇒ e cover Γ ↝ t | ds
————————————————————————————————–—
(x, ps ⇒ e) cover A, Γ ↝ t | x, ds


         (ps ⇒ e)⁺ cover Γ ↝ t | ds
————————————————————————————————–—————————————————————————————
(⊤, ps ⇒ e)⁺ cover A, Γ ↝ let _ = u in t | u:A, ds


     (p, q, ps)⁺ cover A, B ↝ t | x, y, ds 
————————————————————————————————–————————————————————————————
((p, q), ps)⁺ cover A × B, Γ ↝ let (x,y) = u in t | u, ds 


