let rgt_URI = uri rgt_SURI
let rtheory_URI = uri "cic:/Coq/Reals/Rbase/RTheory.con"
let rinv_r1_URI = uri "cic:/Coq/Reals/Rbase/Rinv_R1.con"
+ let pow_URI = uri "cic:/Coq/Reals/Rfunctions/pow.con"
let r = const r_URI
let rplus = const rplus_URI
module BinInt =
struct
+ let zmult_URI = uri "cic:/Coq/ZArith/BinInt/Zmult.con"
+ let zmult = const zmult_URI
let zplus_SURI = "cic:/Coq/ZArith/BinInt/Zplus.con"
let zplus_URI = uri zplus_SURI
let zplus = const zplus_URI
let zopp_SURI = "cic:/Coq/ZArith/BinInt/Zopp.con"
let zopp_URI = uri zopp_SURI
let zopp = const zopp_URI
+ let zpower_URI = uri "cic:/Coq/ZArith/Zpower/Zpower.con"
end
(** {2 Helpers for creating common terms}