3cf425ba52
We annotate patterns with the corresponding `Syntax` during elaboration, and do not populate the info tree. Reason: the set of pattern variables is not known during pattern elaboration.
15 lines
476 B
Text
15 lines
476 B
Text
inductive HList {α : Type v} (β : α → Type u) : List α → Type (max u v)
|
||
| nil : HList β []
|
||
| cons : β i → HList β is → HList β (i::is)
|
||
|
||
infix:67 " :: " => HList.cons
|
||
|
||
inductive Member : α → List α → Type
|
||
| head : Member a (a::as)
|
||
| tail : Member a bs → Member a (b::bs)
|
||
|
||
def HList.get : HList β is → Member i is → β i
|
||
| a::as, .head => a
|
||
--v textDocument/hover
|
||
| a::as, .tail h => as.get h
|
||
--^ textDocument/hover
|