structure Lean.ClassEntry : Type

• Class name.

  name : Lean.Name

• Position of the class outParams. For example, for class

  class GetElem (cont : Type u) (idx : Type v) (elem : outParam (Type w)) (dom : outParam (cont → idx → Prop)) where
  

  outParams := #[2, 3]

  outParams : Array Nat

An entry for the persistent environment extension for declared type classes

def Lean.ClassEntry.lt (a : Lean.ClassEntry) (b : Lean.ClassEntry) : Bool

Equations

• Lean.ClassEntry.lt a b = Lean.Name.quickLt a.name b.name

structure Lean.ClassState : Type

• outParamMap : Lean.SMap Lean.Name (Array Nat)

State of the type class environment extension.

instance Lean.instInhabitedClassState : Inhabited Lean.ClassState

Equations

• Lean.instInhabitedClassState = { default := { outParamMap := default } }

def Lean.ClassState.addEntry (s : Lean.ClassState) (entry : Lean.ClassEntry) : Lean.ClassState

Equations

• Lean.ClassState.addEntry s entry = { outParamMap := Lean.SMap.insert s.outParamMap entry.name entry.outParams }

def Lean.ClassState.switch (s : Lean.ClassState) : Lean.ClassState

Switch the state into persistent mode. We switch to this mode after we read all imported .olean files. Recall that we use a SMap for implementing the state of the type class environment extension.

Equations

• Lean.ClassState.switch s = { outParamMap := Lean.SMap.switch s.outParamMap }

opaque Lean.classExtension : Lean.SimplePersistentEnvExtension Lean.ClassEntry Lean.ClassState

Type class environment extension

@[export lean_is_class]

def Lean.isClass (env : Lean.Environment) (n : Lean.Name) : Bool

Return true if n is the name of type class in the given environment.

Equations

• Lean.isClass env n = Lean.SMap.contains (Lean.SimplePersistentEnvExtension.getState Lean.classExtension env).outParamMap n

def Lean.getOutParamPositions? (env : Lean.Environment) (declName : Lean.Name) : Option (Array Nat)

If declName is a class, return the position of its outParams.

Equations

• Lean.getOutParamPositions? env declName = Lean.SMap.find? (Lean.SimplePersistentEnvExtension.getState Lean.classExtension env).outParamMap declName

@[export lean_has_out_params]

def Lean.hasOutParams (env : Lean.Environment) (declName : Lean.Name) : Bool

Return true if the given declName is a type class with output parameters.

Equations

• Lean.hasOutParams env declName = match Lean.getOutParamPositions? env declName with | some outParams => !Array.isEmpty outParams | none => false

def Lean.addClass (env : Lean.Environment) (clsName : Lean.Name) : Except String Lean.Environment

Add a new type class with the given name to the environment. declName must not be the name of an existing type class, and it must be the name of constant in env. declName must be a inductive datatype or axiom. Recall that all structures are inductive datatypes.

Equations

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