Module Qcert.Utils.BindingsNat


This module provides support for bindings where the key is a natural number.

Section BindingsNat.
    
  Require Import Arith.
  Require Import NPeano.
  Require Import Bindings.

  Global Program Instance ODT_nat : (@ODT nat)
    := mkODT _ _ lt Nat.lt_strorder lt_dec Compare_dec.nat_compare _.
Next Obligation.
    simpl.
    apply Compare_dec.nat_compare_spec.
  Qed.

End BindingsNat.

Hint Unfold rec_sort rec_concat_sort.
Hint Resolve drec_sort_sorted drec_concat_sort_sorted.
Hint Resolve is_list_sorted_NoDup_strlt.