theorem
  0c is_a_unity_wrt addcomplex by BINOP_2:1,SETWISEO:14;
