7 lines
193 B
Text
7 lines
193 B
Text
def one (α : Type u) [OfNat α (nat_lit 1)] : α := 1
|
||
|
||
abbrev HasOne (α : Type u) := OfNat α (nat_lit 1)
|
||
|
||
def one' (α : Type u) [HasOne α] : α := 1
|
||
|
||
example : HasOne Nat := inferInstance
|