added lemma reflp_on_empty[simp] and totalp_on_empty[simp]
authordesharna
Sat, 04 Jun 2022 18:32:30 +0200
changeset 75540 02719bd7b4e6
parent 75532 f0dfcd8329d0
child 75541 a4fa039a6a60
added lemma reflp_on_empty[simp] and totalp_on_empty[simp]
NEWS
src/HOL/Relation.thy
--- a/NEWS	Sat Jun 04 17:58:08 2022 +0200
+++ b/NEWS	Sat Jun 04 18:32:30 2022 +0200
@@ -54,6 +54,7 @@
       reflp_onI
       reflp_on_Inf
       reflp_on_Sup
+      reflp_on_empty[simp]
       reflp_on_inf
       reflp_on_mono
       reflp_on_subset
@@ -63,6 +64,7 @@
       totalpI
       totalp_onD
       totalp_onI
+      totalp_on_empty[simp]
       totalp_on_subset
 
 * Theory "HOL-Library.Multiset":
--- a/src/HOL/Relation.thy	Sat Jun 04 17:58:08 2022 +0200
+++ b/src/HOL/Relation.thy	Sat Jun 04 18:32:30 2022 +0200
@@ -236,6 +236,9 @@
 lemma refl_on_empty [simp]: "refl_on {} {}"
   by (simp add: refl_on_def)
 
+lemma reflp_on_empty [simp]: "reflp_on {} R"
+  by (auto intro: reflp_onI)
+
 lemma refl_on_singleton [simp]: "refl_on {x} {(x, x)}"
 by (blast intro: refl_onI)
 
@@ -548,6 +551,9 @@
 lemma total_on_empty [simp]: "total_on {} r"
   by (simp add: total_on_def)
 
+lemma totalp_on_empty [simp]: "totalp_on {} R"
+  by (auto intro: totalp_onI)
+
 lemma total_on_singleton [simp]: "total_on {x} {(x, x)}"
   unfolding total_on_def by blast