DEFINITION csuba_gen_void_rev()
TYPE =
       ∀g:G
         .∀d1:C
           .∀c:C
             .∀u:T
               .csuba g c (CHead d1 (Bind Void) u)
                 →ex2 C λd2:C.eq C c (CHead d2 (Bind Void) u) λd2:C.csuba g d2 d1
BODY =
Show proof