diff options
| author | Josh Chen | 2018-08-15 11:47:30 +0200 |
|---|---|---|
| committer | Josh Chen | 2018-08-15 11:47:30 +0200 |
| commit | f4f468878fc0459a806b02cdf8921af6fcac2759 (patch) | |
| tree | 5f646632b36c97cc783fe3209d7df1e4b47d59b0 /ex/Methods.thy | |
| parent | e94784953a751b0720689b686e607c95ba0f0592 (diff) | |
Tweak proof methods, some type rules; add HoTT Book examples
Diffstat (limited to '')
| -rw-r--r-- | ex/Methods.thy | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ex/Methods.thy b/ex/Methods.thy index b0c5f92..699d620 100644 --- a/ex/Methods.thy +++ b/ex/Methods.thy @@ -13,7 +13,7 @@ begin lemma assumes "A : U(i)" "B: A \<longrightarrow> U(i)" "\<And>x. x : A \<Longrightarrow> C x: B x \<longrightarrow> U(i)" shows "\<Sum>x:A. \<Prod>y:B x. \<Sum>z:C x y. \<Prod>w:A. x =\<^sub>A w : U(i)" -by (simple lem: assms) +by (simple lems: assms) lemma @@ -29,7 +29,7 @@ proof - "B: A \<longrightarrow> U(i)" and "\<And>x. x : A \<Longrightarrow> C x: B x \<longrightarrow> U(i)" and "\<And>x y. \<lbrakk>x : A; y : B x\<rbrakk> \<Longrightarrow> D x y: C x y \<longrightarrow> U(i)" - by (derive lem: assms) + by (derive lems: assms) qed |