diff options
author | Josh Chen | 2018-09-18 11:38:54 +0200 |
---|---|---|
committer | Josh Chen | 2018-09-18 11:38:54 +0200 |
commit | 6857e783fa5cb91f058be322a18fb9ea583f2aad (patch) | |
tree | c963fc0cb56157c251ad326dd28e2671ef52a2f9 /HoTT_Methods.thy | |
parent | dcf87145a1059659099bbecde55973de0d36d43f (diff) |
Overhaul of the theory presentations. New methods in HoTT_Methods.thy for handling universes. Commit for release 0.1.0!
Diffstat (limited to 'HoTT_Methods.thy')
-rw-r--r-- | HoTT_Methods.thy | 25 |
1 files changed, 23 insertions, 2 deletions
diff --git a/HoTT_Methods.thy b/HoTT_Methods.thy index 8929f69..f0cee6c 100644 --- a/HoTT_Methods.thy +++ b/HoTT_Methods.thy @@ -12,6 +12,26 @@ imports HoTT_Base "HOL-Eisbach.Eisbach" "HOL-Eisbach.Eisbach_Tools" begin +section \<open>Handling universes\<close> + +method provelt = (rule lt_Suc | (rule lt_trans, (rule lt_Suc)+)+) + +method hierarchy = (rule U_hierarchy, provelt) + +method cumulativity declares form = ( + ((elim U_cumulative' | (rule U_cumulative', rule form)), rule leq_min) | + ((elim U_cumulative | (rule U_cumulative, rule form)), provelt) +) + +text \<open> +Methods @{method provelt}, @{method hierarchy}, and @{method cumulativity} prove statements of the form +\<^item> \<open>n < (Suc (... (Suc n) ...))\<close>, +\<^item> \<open>U i: U (Suc (... (Suc i) ...))\<close>, and +\<^item> @{prop "A: U i \<Longrightarrow> A: U j"}, where @{prop "i \<le> j"} +respectively. +\<close> + + section \<open>Deriving typing judgments\<close> method routine uses add = (assumption | rule add | rule)+ @@ -38,14 +58,15 @@ Method @{method compute} performs single-step simplifications, using any rules d Premises of the rule(s) applied are added as new subgoals. \<close> + section \<open>Derivation search\<close> text \<open> Combine @{method routine} and @{method compute} to search for derivations of judgments. -Also handle universes using methods @{method hierarchy} and @{method cumulativity} defined in @{file HoTT_Base.thy}. +Also handle universes using @{method hierarchy} and @{method cumulativity}. \<close> -method derive uses lems = (routine add: lems | compute comp: lems | cumulativity | hierarchy)+ +method derive uses lems = (routine add: lems | compute comp: lems | cumulativity form: lems | hierarchy)+ section \<open>Induction\<close> |