7 lines
121 B
Text
7 lines
121 B
Text
import logic
|
|
open bool
|
|
|
|
definition set {{T : Type}} := T → bool
|
|
infix `∈` := λx A, A x = tt
|
|
|
|
check 1 ∈ (λ x, tt)
|