Thm* x,y:A, P:(A Prop), i,j: .
Thm* P(if i= j x else y fi)  P(if i= j x else y fi) | [eq_int_cases_test] |
Thm* f:(S T), b: , p,q:S. f(if b p else q fi) = if b f(p) else f(q) fi | [fun_thru_ite] |
Thm* b: , x,y:T. b  if b x else y fi = x | [ite_rw_true] |
Thm* b: , x,y:T. b  if b x else y fi = y | [ite_rw_false] |
Def p  q == if p true else q fi | [bor] |
Def p q == if p q else false fi | [band] |
Def  b == if b false else true fi | [bnot] |
Def b2i(b) == if b 1 else 0 fi | [b2i] |
Def b == if b True else False fi | [assert] |