inductive
内に実行可能ファイルを作成したいlocale
。locale
すべてが正常に動作しなければ:
definition "P a b = True"
inductive test :: "'a ⇒ 'a ⇒ bool" where
"test a a" |
"test a b ⟹ P b c ⟹ test a c"
code_pred test .
ただし、 alocale
で同じことを試しても機能しません。
locale localTest
begin
definition "P' a b = True"
inductive test' :: "'a ⇒ 'a ⇒ bool" where
"test' a a" |
"test' a b ⟹ P' b c ⟹ test' a c"
code_pred test'
end
code_pred
ロケールの行は次のエラーを返します。
Not a constant: test'