501993eb7f
This PR makes the `pullInstances` pass avoid pulling any instance expressions containing erased propositions, because we don't correctly represent the dependencies that remain after erasure.
14 lines
275 B
Text
14 lines
275 B
Text
class WrappedNat (α : Type) where
|
||
n : Nat
|
||
|
||
inductive FalseContainer where
|
||
| nat (n : Nat)
|
||
| oops (f : Prop → False)
|
||
|
||
def f (x : FalseContainer) : WrappedNat FalseContainer :=
|
||
match x with
|
||
| .nat n => { n }
|
||
| .oops f => (f (0 == 0)).rec
|
||
|
||
#eval f (.nat 1) |>.n
|
||
|