diff options
| author | Josh Chen | 2019-03-08 17:24:57 +0100 |
|---|---|---|
| committer | Josh Chen | 2019-03-08 17:24:57 +0100 |
| commit | ad0c2755b011e187792ed90382f72c8808949295 (patch) | |
| tree | c5ce13f9ff3e47c48ca5c2cd14dd8e9859d99188 | |
| parent | 8f7164976d08446e77a0e1eceaaa01f0ed363e5b (diff) | |
some options, renaming
| -rw-r--r-- | HoTT_Base.thy | 1 | ||||
| -rw-r--r-- | More_Types.thy | 2 | ||||
| -rw-r--r-- | Nat.thy | 2 |
3 files changed, 3 insertions, 2 deletions
diff --git a/HoTT_Base.thy b/HoTT_Base.thy index e36b237..9987b78 100644 --- a/HoTT_Base.thy +++ b/HoTT_Base.thy @@ -18,6 +18,7 @@ begin section \<open>Basic setup\<close> +declare[[names_short]] declare[[eta_contract=false]] \<comment> \<open>Do not eta-contract\<close> typedecl t \<comment> \<open>Type of object-logic terms (which includes the types)\<close> diff --git a/More_Types.thy b/More_Types.thy index 9125aca..ebbe10b 100644 --- a/More_Types.thy +++ b/More_Types.thy @@ -64,7 +64,7 @@ where lemmas Unit_form [form] lemmas Unit_routine [intro] = Unit_form Unit_intro Unit_elim -lemmas Unit_cmp [comp] +lemmas Unit_comp [comp] = Unit_cmp section \<open>Empty type\<close> @@ -41,6 +41,6 @@ where lemmas Nat_form [form] lemmas Nat_routine [intro] = Nat_form Nat_intro_0 Nat_intro_succ Nat_elim -lemmas Nat_comps [comp] = Nat_cmp_0 Nat_cmp_succ +lemmas Nat_comp [comp] = Nat_cmp_0 Nat_cmp_succ end |