Isabelle , , . consts , defs (overloaded) .
:
consts is_default :: "'a ⇒ bool"
defs (overloaded) is_default_nat:
"is_default a ≡ ((a::nat) = 0)"
defs (overloaded) is_default_option:
"is_default a ≡ (a = None)"
(overloaded), , Isabelle .
defs , , , . :
lemma "¬ is_default (Some 3)"
by (clarsimp simp: is_default_option)
" " Isablle/Isar. , Obua " " , gotchas .