DEFINITION csuba_clear_conf()
TYPE =
       ∀g:G.∀c1:C.∀c2:C.(csuba g c1 c2)→∀e1:C.(clear c1 e1)→(ex2 C λe2:C.csuba g e1 e2 λe2:C.clear c2 e2)
BODY =
Show proof