Array literal syntax #
Equations
- One or more equations did not get rendered due to their size.
Equations
Preliminary theorems #
Equations
- Array.instMembership = { mem := Array.Mem }
Equations
Equations
Externs #
Low-level version of size
that directly queries the C array object cached size.
While this is not provable, usize
always returns the exact size of the array since
the implementation only supports arrays of size less than USize.size
.
Equations
- a.usize = a.size.toUSize
Equations
- mkArray n v = { toList := List.replicate n v }
Swaps two entries in an array.
This will perform the update destructively provided that a
has a reference
count of 1 when called.
Equations
- a.swap i j hi hj = (a.set i a[j] hi).set j a[i] ⋯
Swaps two entries in an array, or returns the array unchanged if either index is out of bounds.
This will perform the update destructively provided that a
has a reference
count of 1 when called.
Equations
Definitions #
Equations
- Array.instEmptyCollection = { emptyCollection := #[] }
Equations
- Array.instInhabited = { default := #[] }
Equations
- Array.instBEq = { beq := fun (a b : Array α) => a.isEqv b BEq.beq }
ofFn f
with f : Fin n → α
returns the list whose ith element is f i
.
ofFn f = #[f 0, f 1, ... , f(n - 1)]
Equations
- Array.ofFn f = Array.ofFn.go f 0 (Array.mkEmpty n)
Auxiliary for ofFn
. ofFn.go f i acc = acc ++ #[f i, ..., f(n - 1)]
Equations
- Array.ofFn.go f i acc = if h : i < n then Array.ofFn.go f (i + 1) (acc.push (f ⟨i, h⟩)) else acc
The array #[0, 1, ..., n - 1]
.
Equations
- Array.range n = Array.ofFn fun (i : Fin n) => ↑i
Equations
take a n
returns the first n
elements of a
.
Equations
- a.take n = Array.take.loop (a.size - n) a
Equations
- Array.take.loop 0 x✝ = x✝
- Array.take.loop n.succ x✝ = Array.take.loop n x✝.pop
Equations
We claim this unsafe implementation is correct because an array cannot have more than usizeSz
elements in our runtime.
This kind of low level trick can be removed with a little bit of compiler support. For example, if the compiler simplifies as.size < usizeSz
to true.
Equations
- as.forIn'Unsafe b f = Array.forIn'Unsafe.loop as f as.usize 0 b
Equations
- Array.instForIn'InferInstanceMembership = { forIn' := fun {β : Type ?u.19} [Monad m] => Array.forIn' }
See comment at forIn'Unsafe
Equations
- Array.foldlMUnsafe f init as start stop = if start < stop then if stop ≤ as.size then Array.foldlMUnsafe.fold f as (USize.ofNat start) (USize.ofNat stop) init else pure init else pure init
Equations
- Array.foldlMUnsafe.fold f as i stop b = if (i == stop) = true then pure b else do let __do_lift ← f b (as.uget i ⋯) Array.foldlMUnsafe.fold f as (i + 1) stop __do_lift
Reference implementation for foldlM
Equations
- One or more equations did not get rendered due to their size.
Equations
- Array.foldrMUnsafe.fold f as i stop b = if (i == stop) = true then pure b else do let __do_lift ← f (as.uget (i - 1) ⋯) b Array.foldrMUnsafe.fold f as (i - 1) stop __do_lift
Reference implementation for foldrM
Equations
- One or more equations did not get rendered due to their size.
See comment at forIn'Unsafe
Equations
- Array.mapMUnsafe f as = unsafeCast (Array.mapMUnsafe.map f as.usize 0 (unsafeCast as))
Reference implementation for mapM
Equations
- Array.mapM f as = Array.mapM.map f as 0 (Array.mkEmpty as.size)
Variant of mapIdxM
which receives the index as a Fin as.size
.
Equations
- as.mapFinIdxM f = Array.mapFinIdxM.map as f as.size 0 ⋯ (Array.mkEmpty as.size)
Equations
- Array.mapFinIdxM.map as f 0 j x bs = pure bs
- Array.mapFinIdxM.map as f i_2.succ j inv_2 bs = do let __do_lift ← f ⟨j, ⋯⟩ (as.get j ⋯) Array.mapFinIdxM.map as f i_2 (j + 1) ⋯ (bs.push __do_lift)
Note that the universe level is contrained to Type
here,
to avoid having to have the predicate live in p : α → m (ULift Bool)
.
Equations
- One or more equations did not get rendered due to their size.
Equations
- Array.allM p as start stop = do let __do_lift ← Array.anyM (fun (v : α) => do let __do_lift ← p v pure !__do_lift) as start stop pure !__do_lift
Equations
- Array.findSomeRevM? f as = Array.findSomeRevM?.find f as as.size ⋯
Equations
- Array.findSomeRevM?.find f as 0 x_2 = pure none
- Array.findSomeRevM?.find f as i.succ h = do let r ← f as[i] match r with | some val => pure r | none => let_fun this := ⋯; Array.findSomeRevM?.find f as i this
Equations
- Array.forM f as start stop = Array.foldlM (fun (x : PUnit) => f) PUnit.unit as start stop
Equations
- Array.forRevM f as start stop = Array.foldrM (fun (a : α) (x : PUnit) => f a) PUnit.unit as start stop
Equations
- Array.foldl f init as start stop = (Array.foldlM f init as start stop).run
Equations
- Array.foldr f init as start stop = (Array.foldrM f init as start stop).run
Equations
- Array.mapIdx f as = (Array.mapIdxM f as).run
Turns #[a, b]
into #[(a, 0), (b, 1)]
.
Equations
- arr.zipWithIndex = Array.mapIdx (fun (i : Nat) (a : α) => (a, i)) arr
Equations
- Array.findSome? f as = (Array.findSomeM? f as).run
Equations
- Array.findSome! f a = match Array.findSome? f a with | some b => b | none => panicWithPosWithDecl "Init.Data.Array.Basic" "Array.findSome!" 613 14 "failed to find element"
Equations
- Array.findSomeRev? f as = (Array.findSomeRevM? f as).run
Equations
- Array.findRev? p as = (Array.findRevM? p as).run
Equations
- Array.findIdx? p as = Array.findIdx?.loop p as 0
Equations
- Array.findFinIdx? p as = Array.findFinIdx?.loop p as 0
Equations
- a.getIdx? v = Array.findIdx? (fun (a : α) => a == v) a
Variant of Array.contains
with arguments reversed.
For verification purposes, we simplify this to contains
.
Equations
- Array.elem a as = as.contains a
Convert a Array α
into an List α
. This is O(n) in the size of the array.
Equations
- as.toListImpl = Array.foldr List.cons [] as
Prepends an Array α
onto the front of a list. Equivalent to as.toList ++ l
.
Equations
- as.toListAppend l = Array.foldr List.cons l as
Equations
- as.append bs = Array.foldl (fun (r : Array α) (v : α) => r.push v) as bs
Equations
- Array.instAppend = { append := Array.append }
Equations
- as.appendList bs = List.foldl (fun (r : Array α) (v : α) => r.push v) as bs
Equations
- Array.instHAppendList = { hAppend := Array.appendList }
Equations
- Array.flatMap f as = Array.foldl (fun (bs : Array β) (a : α) => bs ++ f a) #[] as
Equations
Equations
- Array.filter p as start stop = Array.foldl (fun (r : Array α) (a : α) => if p a = true then r.push a else r) #[] as start stop
Equations
- Array.filterM p as start stop = Array.foldlM (fun (r : Array α) (a : α) => do let __do_lift ← p a if __do_lift = true then pure (r.push a) else pure r) #[] as start stop
Equations
- Array.filterMap f as start stop = (Array.filterMapM f as start stop).run
Equations
- as.reverse = if h : as.size ≤ 1 then as else Array.reverse.loop as 0 ⟨as.size - 1, ⋯⟩
Equations
- Array.reverse.loop as i j = if h : i < ↑j then let_fun this := ⋯; let as_1 := as.swap i ↑j ⋯ ⋯; let_fun this := ⋯; Array.reverse.loop as_1 (i + 1) ⟨↑j - 1, this⟩ else as
Equations
- Array.popWhile p as = if h : as.size > 0 then if p as[as.size - 1] = true then Array.popWhile p as.pop else as else as
Equations
- Array.takeWhile p as = Array.takeWhile.go p as 0 #[]
Equations
- Array.takeWhile.go p as i r = if h : i < as.size then let a := as[i]; if p a = true then Array.takeWhile.go p as (i + 1) (r.push a) else r else r
Remove the element at a given index from an array without a runtime bounds checks,
using a Nat
index and a tactic-provided bound.
This function takes worst case O(n) time because
it has to backshift all elements at positions greater than i
.
Remove the element at a given index from an array, or do nothing if the index is out of bounds.
This function takes worst case O(n) time because
it has to backshift all elements at positions greater than i
.
Remove the element at a given index from an array, or panic if the index is out of bounds.
This function takes worst case O(n) time because
it has to backshift all elements at positions greater than i
.
Equations
- a.eraseIdx! i = if h : i < a.size then a.eraseIdx i h else panicWithPosWithDecl "Init.Data.Array.Basic" "Array.eraseIdx!" 841 45 "invalid index"
Erase the first element that satisfies the predicate p
.
Equations
- as.eraseP p = match Array.findIdx? p as with | none => as | some i => as.eraseIdxIfInBounds i
Equations
- Array.insertIdx.loop i as j = if i < ↑j then let j' := ⟨↑j - 1, ⋯⟩; let as_1 := as.swap ↑j' ↑j ⋯ ⋯; Array.insertIdx.loop i as_1 ⟨↑j', ⋯⟩ else as
Equations
Insert element a
at position i
. Panics if i
is not i ≤ as.size
.
Equations
- as.insertIdx! i a = if h : i ≤ as.size then as.insertIdx i a h else panicWithPosWithDecl "Init.Data.Array.Basic" "Array.insertIdx!" 875 7 "invalid index"
Equations
Equations
- Array.zipWithAll.go f as bs i cs = if i < max as.size bs.size then let a := as[i]?; let b := bs[i]?; Array.zipWithAll.go f as bs (i + 1) (cs.push (f a b)) else cs
Lexicographic ordering #
Equations
- Array.instLT = { lt := fun (as bs : Array α) => as.toList < bs.toList }
Equations
- Array.instLE = { le := fun (as bs : Array α) => as.toList ≤ bs.toList }
Auxiliary functions used in metaprogramming. #
We do not currently intend to provide verification theorems for these functions.
Drop none
s from a Array, and replace each remaining some a
with a
.
Equations
- as.reduceOption = Array.filterMap id as
eraseReps #
allDiff #
Equations
- as.allDiff = Array.allDiffAux✝ as 0
getEvenElems #
Equations
- One or more equations did not get rendered due to their size.