val succ_double : int -> intval pred_double : int -> intval pos_sub : int -> int -> intval add : int -> int -> intval sub : int -> int -> intval mul : int -> int -> intval pow_pos : int -> int -> intval pow : int -> int -> intval leb : int -> int -> boolval ltb : int -> int -> boolval pos_div_eucl : int -> int -> int * intval div_eucl : int -> int -> int * intval div : int -> int -> int