val empty_vale_heaplets (h:vale_heap) : vale_heaplets
let empty_vale_heaplets h = empty_vale_heaplets h
val empty_vale_heaplets (h:vale_heap) : vale_heaplets
let empty_vale_heaplets h =
empty_vale_heaplets h
Vale.Arch.HeapLemmas.fst.checked
Vale.Arch.Heap.fst.checked prims.fst.checked FStar.Pervasives.fsti.checked FStar.Mul.fst.checked
Vale.Arch.HeapLemmas.fst
Vale.Arch.HeapImpl.vale_heap Vale.Arch.HeapImpl.empty_vale_heaplets Vale.Arch.HeapImpl.vale_heaplets
module Vale.Arch.HeapLemmas
open FStar.Mul
friend Vale.Arch.Heap

let lemma_heap_impl = ()
val empty_vale_heaplets (h:vale_heap) : vale_heaplets
h: Vale.Arch.HeapImpl.vale_heap -> Vale.Arch.HeapImpl.vale_heaplets