fact: Definition typ_uop o := match o with | UO_xO => (Typ.Tpositive,Typ.Tpositive) | UO_xI => (Typ.Tpositive,Typ.Tpositive) | UO_Zpos => (Typ.Tpositive, Typ.TZ) | UO_Zneg => (Typ.Tpositive, Typ.TZ) | UO_Zopp => (Typ.TZ, Typ.TZ) | UO_BVbitOf s _ => (Typ.TBV s, Typ.Tbool) | UO_BVnot s => (Typ.TBV s, Typ.TBV s) | UO_BVneg s => (Typ.TBV s, Typ.TBV s) | UO_BVextr i n0 n1 => (Typ.TBV n1, Typ.TBV n0) | UO_BVzextn s i => (Typ.TBV s, Typ.TBV (i + s)) | UO_BVsextn s i => (Typ.TBV s, Typ.TBV (i + s)) end.
imports: Bool Int63 Psatz PArray BinNat BinPos ZArith SMT_classes_instances Misc State BVList