structure Lean.ClassEntry : Type

• name : Lake.Name

  Class name.

• outParams : Array Nat

  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]

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 Lake.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 : Lake.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 : Lake.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 : Lake.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

@[export lean_mk_outparam_args_implicit]

def Lean.mkOutParamArgsImplicit (type : Lean.Expr) : Lean.Expr

Mark outParams in type as implicit. Note that it also marks instance implicit arguments that depend on outParams as implicit.

Remark: this function consumes the outParam annotations.

This function uses the same logic used as checkOutParam. See issue #1901

Equations

• Lean.mkOutParamArgsImplicit type = Lean.mkOutParamArgsImplicit.go type type #[]

partial def Lean.mkOutParamArgsImplicit.go (type : Lean.Expr) (typeAux : Lean.Expr) (outParamFVarIds : Array Lean.FVarId) : Lean.Expr

def Lean.addClass (env : Lean.Environment) (clsName : Lake.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.