equal
deleted
inserted
replaced
985 |
985 |
986 declare Real_induct [induct del] |
986 declare Real_induct [induct del] |
987 declare Abs_real_induct [induct del] |
987 declare Abs_real_induct [induct del] |
988 declare Abs_real_cases [cases del] |
988 declare Abs_real_cases [cases del] |
989 |
989 |
990 lemmas [transfer_rule del] = |
990 lifting_update real.lifting |
991 real.rel_eq_transfer |
991 lifting_forget real.lifting |
992 zero_real.transfer one_real.transfer plus_real.transfer uminus_real.transfer |
|
993 times_real.transfer inverse_real.transfer positive.transfer real.right_unique |
|
994 real.right_total |
|
995 |
|
996 lemmas [transfer_domain_rule del] = |
|
997 real.domain real.domain_eq Domainp_pcr_real real.domain_par real.domain_par_left_total |
|
998 |
992 |
999 subsection{*More Lemmas*} |
993 subsection{*More Lemmas*} |
1000 |
994 |
1001 text {* BH: These lemmas should not be necessary; they should be |
995 text {* BH: These lemmas should not be necessary; they should be |
1002 covered by existing simp rules and simplification procedures. *} |
996 covered by existing simp rules and simplification procedures. *} |