fact: Definition and (e1 e2 : bexpr) := match e1, e2 with | Bval true, _ => e2 | _, Bval true => e1 | Bval false, _ => Bval false | _, Bval false => Bval false | _, _ => Band e1 e2 end.
imports: Hammer(Tactics) Arith ZArith List Lia Hammer(Hints) Reals Lra Hammer(Reflect) Nat Psatz String