max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

test: display discrimination tree containing type class instances

Browse source
This commit is contained in:
Leonardo de Moura 2019-11-26 18:00:31 -08:00
parent e08c6def07
commit e45211f31c
1 changed files with 12 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
tests/lean/run/instances.lean Normal file
View file

@ -0,0 +1,12 @@
import Init.Lean
open Lean
open Lean.Meta
def tst1 : IO Unit :=
do let mods := [`Init.Lean];
env ← importModules $ mods.map $ fun m => {module := m};
let insts := getInstances env;
IO.println (format insts);
pure ()
#eval tst1