open Preamble

open CostLabel

open Coqlib

open Proper

open PositiveMap

open Deqsets

open ErrorMessages

open PreIdentifiers

open Errors

open Extralib

open Lists

open Positive

open Identifiers

open Exp

open Arithmetic

open Vector

open Div_and_mod

open Util

open FoldStuff

open BitVector

open Jmeq

open Russell

open List

open Setoids

open Monad

open Option

open Extranat

open Bool

open Relations

open Nat

open Integers

open Hints_declaration

open Core_notation

open Pts

open Logic

open Types

open AST

open Csyntax

open TypeComparison

open ClassifyOp

open Events

open Smallstep

open Extra_bool

open Values

open FrontEndVal

open Hide

open ByteValues

open Division

open Z

open BitVectorZ

open Pointers

open GenMem

open FrontEndMem

open Globalenvs

open Csem

open Star

open IOMonad

open IO

open Sets

open Listb

val typ_eq_dec : AST.typ -> AST.typ -> (__, __) Types.sum

val block_DeqSet : Deqsets.deqSet

val mem_assoc_env :
  AST.ident -> (AST.ident, Csyntax.type0) Types.prod List.list -> Bool.bool

type 'a lset = 'a List.list

val empty_lset : 'a1 List.list

val lset_union : 'a1 lset -> 'a1 lset -> 'a1 List.list

val lset_remove : Deqsets.deqSet -> __ lset -> __ -> __ List.list

val lset_difference : Deqsets.deqSet -> __ lset -> __ lset -> __ List.list

val wF_rect : ('a1 -> __ -> ('a1 -> __ -> 'a2) -> 'a2) -> 'a1 -> 'a2

val one_bv : Nat.nat -> BitVector.bitVector

val ith_carry :
  Nat.nat -> BitVector.bitVector -> BitVector.bitVector -> Bool.bool ->
  Bool.bool

val ith_bit :
  Nat.nat -> BitVector.bitVector -> BitVector.bitVector -> Bool.bool ->
  Bool.bool

val bitvector_fold :
  Nat.nat -> BitVector.bitVector -> (Nat.nat -> BitVector.bitVector ->
  Bool.bool) -> BitVector.bitVector

val bitvector_fold2 :
  Nat.nat -> BitVector.bitVector -> BitVector.bitVector -> (Nat.nat ->
  BitVector.bitVector -> BitVector.bitVector -> Bool.bool) ->
  BitVector.bitVector

val addition_n_direct :
  Nat.nat -> BitVector.bitVector -> BitVector.bitVector -> Bool.bool ->
  BitVector.bitVector

val increment_direct : Nat.nat -> BitVector.bitVector -> BitVector.bitVector

val twocomp_neg_direct :
  Nat.nat -> BitVector.bitVector -> BitVector.bitVector

val andb_fold : Nat.nat -> BitVector.bitVector -> Bool.bool