6 lines
131 B
Text
6 lines
131 B
Text
example : Σ(X : Type₀), X → unit :=
|
|
begin
|
|
fapply sigma.mk,
|
|
{ exact unit},
|
|
{ intro x, induction x, exact unit.star }
|
|
end
|