structure Lean.SMap (α : Type u) (β : Type v) [inst : BEq α] [inst : Hashable α] : Type (maxuv)

• stage₁ : Bool
• map₁ : Lean.HashMap α β
• map₂ : Lean.PHashMap α β

Staged map for implementing the Environment. The idea is to store imported entries into a hashtable and local entries into a persistent hashtable.

Hypotheses:

• The number of entries (i.e., declarations) coming from imported files is much bigger than the number of entries in the current file.
• HashMap is faster than PersistentHashMap.
• When we are reading imported files, we have exclusive access to the map, and efficient destructive updates are performed.

Remarks:

• We never remove declarations from the Environment. In principle, we could support deletion by using (PHashMap α (Option β)) where the value none would indicate that an entry was "removed" from the hashtable.
• We do not need additional bookkeeping for extracting the local entries.

instance Lean.SMap.instInhabitedSMap {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] : Inhabited (Lean.SMap α β)

Equations

• One or more equations did not get rendered due to their size.

def Lean.SMap.empty {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] : Lean.SMap α β

Equations

• Lean.SMap.empty = { stage₁ := true, map₁ := ∅, map₂ := { root := Lean.PersistentHashMap.Node.entries Lean.PersistentHashMap.mkEmptyEntriesArray, size := 0 } }

@[inline]

def Lean.SMap.fromHashMap {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] (m : Lean.HashMap α β) (stage₁ : optParam Bool true) : Lean.SMap α β

Equations

• Lean.SMap.fromHashMap m stage₁ = { stage₁ := stage₁, map₁ := m, map₂ := { root := Lean.PersistentHashMap.Node.entries Lean.PersistentHashMap.mkEmptyEntriesArray, size := 0 } }

@[specialize #[]]

def Lean.SMap.insert {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] : Lean.SMap α β → α → β → Lean.SMap α β

Equations

• One or more equations did not get rendered due to their size.

@[specialize #[]]

def Lean.SMap.insert' {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] : Lean.SMap α β → α → β → Lean.SMap α β

Equations

• One or more equations did not get rendered due to their size.

@[specialize #[]]

def Lean.SMap.find? {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] : Lean.SMap α β → α → Option β

Equations

• One or more equations did not get rendered due to their size.

@[inline]

def Lean.SMap.findD {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] (m : Lean.SMap α β) (a : α) (b₀ : β) : β

Equations

• Lean.SMap.findD m a b₀ = Option.getD (Lean.SMap.find? m a) b₀

@[inline]

def Lean.SMap.find! {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] [inst : Inhabited β] (m : Lean.SMap α β) (a : α) : β

Equations

• Lean.SMap.find! m a = match Lean.SMap.find? m a with | some b => b | none => panicWithPosWithDecl "Lean.Data.SMap" "Lean.SMap.find!" 60 14 "key is not in the map"

@[specialize #[]]

def Lean.SMap.contains {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] : Lean.SMap α β → α → Bool

Equations

• One or more equations did not get rendered due to their size.

@[specialize #[]]

def Lean.SMap.find?' {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] : Lean.SMap α β → α → Option β

Similar to find?, but searches for result in the hashmap first. So, the result is correct only if we never "overwrite" map₁ entries using map₂.

Equations

• One or more equations did not get rendered due to their size.

def Lean.SMap.forM {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] {m : Type u_1 → Type u_1} [inst : Monad m] (s : Lean.SMap α β) (f : α → β → m PUnit) : m PUnit

Equations

• Lean.SMap.forM s f = do Lean.HashMap.forM f s.map₁ Lean.PersistentHashMap.forM s.map₂ f

def Lean.SMap.switch {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] (m : Lean.SMap α β) : Lean.SMap α β

Move from stage 1 into stage 2.

Equations

• Lean.SMap.switch m = if m.stage₁ = true then { stage₁ := false, map₁ := m.map₁, map₂ := m.map₂ } else m

@[inline]

def Lean.SMap.foldStage2 {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] {σ : Type w} (f : σ → α → β → σ) (s : σ) (m : Lean.SMap α β) : σ

Equations

• Lean.SMap.foldStage2 f s m = Lean.PersistentHashMap.foldl m.map₂ f s

def Lean.SMap.fold {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] {σ : Type w} (f : σ → α → β → σ) (init : σ) (m : Lean.SMap α β) : σ

Equations

• Lean.SMap.fold f init m = Lean.PersistentHashMap.foldl m.map₂ f (Lean.HashMap.fold f init m.map₁)

def Lean.SMap.size {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] (m : Lean.SMap α β) : Nat

Equations

• Lean.SMap.size m = Lean.HashMap.size m.map₁ + m.map₂.size

def Lean.SMap.stageSizes {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] (m : Lean.SMap α β) : Nat × Nat

Equations

• Lean.SMap.stageSizes m = (Lean.HashMap.size m.map₁, m.map₂.size)

def Lean.SMap.numBuckets {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] (m : Lean.SMap α β) : Nat

Equations

• Lean.SMap.numBuckets m = Lean.HashMap.numBuckets m.map₁

def Lean.SMap.toList {α : Type u} {β : Type v} [inst : BEq α] [inst : Hashable α] (m : Lean.SMap α β) : List (α × β)

Equations

• Lean.SMap.toList m = Lean.SMap.fold (fun es a b => (a, b) :: es) [] m

def Lean.List.toSMap {α : Type u_1} {β : Type u_2} [inst : BEq α] [inst : Hashable α] (es : List (α × β)) : Lean.SMap α β

Equations

• One or more equations did not get rendered due to their size.

instance Lean.instReprSMap {α : Type u_1} {β : Type u_2} : {x : BEq α} → {x_1 : Hashable α} → [inst : Repr α] → [inst : Repr β] → Repr (Lean.SMap α β)

Equations

• Lean.instReprSMap = { reprPrec := fun v prec => Repr.addAppParen (reprArg (Lean.SMap.toList v) ++ Std.Format.text ".toSMap") prec }