6 lines
161 B
Text
6 lines
161 B
Text
import data.subtype data.nat
|
|
open nat
|
|
|
|
notation `{` binders:55 `|` r:(scoped P, subtype P) `}` := r
|
|
check { x : nat | x > 0 }
|
|
check { (x : nat → nat) | true }
|