Theory extreal_base

Parents

Contents

Type operators

Constants

Definitions

Q_setceiling_defcontract_defexpand_defextreal_TY_DEFextreal_abs_def_primitiveextreal_ainv_defextreal_case_defextreal_div_defextreal_inv_defextreal_lt_defextreal_max_defextreal_min_defextreal_of_num_defextreal_pow_defextreal_size_defextreal_sqrt_defextreal_subreal_defreal_set_def

Theorems

ADD_IN_QCEILING_LBOUNDCEILING_UBOUNDCMUL_IN_QCOUNTABLE_ENUM_QDIV_IN_QEXTREAL_ARCHEXTREAL_ARCH_INVEXTREAL_ARCH_INV'EXTREAL_EQ_LADDEXTREAL_EQ_RADDINV_IN_QMUL_IN_QNUM_IN_QOPP_IN_QQ_COUNTABLEQ_DENSE_IN_RQ_DENSE_IN_R'Q_DENSE_IN_R_LEMMAQ_INFINITEQ_not_inftyQ_set_defSIMP_EXTREAL_ARCHSIMP_EXTREAL_ARCH_NEGSUB_IN_Qabs_0abs_absabs_boundsabs_bounds_ltabs_contract_le_1abs_contract_lt_1abs_divabs_div_normalabs_eq_0abs_gt_0abs_le_0abs_le_half_pow2abs_le_square_plus1abs_maxabs_mulabs_negabs_neg'abs_neg_eqabs_not_inftyabs_not_zeroabs_posabs_pow2abs_pow_le_monoabs_realabs_reflabs_subabs_sub'abs_triangleabs_triangle_fullabs_triangle_negabs_triangle_neg_fullabs_triangle_subabs_triangle_sub'abs_triangle_sub_fullabs_triangle_sub_full'abs_unboundsadd2_assocadd2_sub2add_assocadd_commadd_comm_normaladd_inftyadd_ldistribadd_ldistrib_negadd_ldistrib_normaladd_ldistrib_normal2add_ldistrib_posadd_lzeroadd_not_inftyadd_pow2add_pow2_posadd_rdistribadd_rdistrib_normaladd_rdistrib_normal2add_realadd_rzeroadd_subadd_sub2add_sub_normalcontract_11contract_le_eqcontract_negdatatype_extrealdiv_adddiv_add2div_eq_mul_linvdiv_eq_mul_rinvdiv_inftydiv_mul_refldiv_not_inftydiv_onediv_refldiv_refl_posdiv_subentireeq_add_sub_switcheq_negeq_rdiveq_sub_laddeq_sub_ladd_normaleq_sub_raddeq_sub_switchexpand_contractextreal_11extreal_Axiomextreal_abs_defextreal_abs_indextreal_add_defextreal_add_eqextreal_add_indextreal_case_congextreal_case_eqextreal_casesextreal_distinctextreal_div_eqextreal_doubleextreal_eq_zeroextreal_inductionextreal_inv_eqextreal_le_defextreal_le_eqextreal_le_indextreal_lt_eqextreal_max_eqextreal_meanextreal_min_eqextreal_mul_defextreal_mul_eqextreal_mul_indextreal_nchotomyextreal_not_inftyextreal_not_leextreal_not_ltextreal_powextreal_pow_eqextreal_sub_addextreal_sub_defextreal_sub_eqfourth_cancelfourths_betweenhalf_betweenhalf_cancelhalf_doublehalf_not_inftyinfty_divinfty_pow2inv_1overinv_inftyinv_injinv_invinv_le_antimonoinv_le_antimono_impinv_lt_antimonoinv_mulinv_not_inftyinv_oneinv_posinv_pos'inv_pos_eqldiv_eqldiv_le_imple_01le_02le_absle_abs_boundsle_addle_add2le_add_negle_addlle_addl_imple_addrle_addr_imple_antisymle_divle_inftyle_invle_laddle_ladd_imple_ldivle_lmulle_lmul_imple_lnegle_lsub_imple_ltle_maxle_max1le_max2le_minle_mulle_mul2le_mul_negle_negle_not_inftyle_numle_pow2le_raddle_radd_imple_rdivle_real_imple_reflle_rmulle_rmul_imple_rsuble_rsub_imple_sub_eqle_sub_eq2le_sub_imple_sub_imp2le_totalle_translet_addlet_add2let_add2_altlet_antisymlet_mullet_totallet_translinv_uniqlt_01lt_02lt_10lt_abs_boundslt_addlt_add2lt_add_neglt_addllt_addrlt_addr_implt_antisymlt_divlt_imp_lelt_imp_nelt_inftylt_laddlt_ldivlt_lelt_lmullt_lmul_implt_lsublt_lsub_implt_maxlt_max_betweenlt_minlt_mullt_mul2lt_mul_neglt_neglt_raddlt_rdivlt_rdiv_neglt_refllt_rmullt_rmul_implt_rsublt_rsub_implt_sublt_sub'lt_sub_implt_sub_imp'lt_sub_imp2lt_totallt_translte_addlte_mullte_totallte_transmax_0_reducemax_commmax_inftymax_lemax_le2_impmax_ltmax_reducemax_reflmin_commmin_inftymin_lemin_le1min_le2min_le2_impmin_le_betweenmin_reducemin_reflmul_assocmul_commmul_div_reflmul_inftymul_infty'mul_lcancelmul_lemul_le2mul_letmul_linvmul_linv_posmul_lnegmul_lonemul_lposinfmul_ltmul_lt2mul_ltemul_lzeromul_not_inftymul_not_infty2mul_rcancelmul_realmul_rnegmul_ronemul_rposinfmul_rzerone_01ne_02neg_0neg_addneg_eq0neg_minus1neg_minus1'neg_mul2neg_negneg_not_posinfneg_subnormal_0normal_1normal_inv_eqnormal_realnormal_real_setnum_lt_inftynum_not_inftyone_powpos_not_neginfpow2_le_eqpow2_sqrtpow_0pow_1pow_2pow_2_abspow_addpow_divpow_eqpow_invpow_lepow_le_fullpow_le_monopow_ltpow_lt2pow_minus1pow_mulpow_neg_oddpow_not_inftypow_pos_evenpow_pos_lepow_pos_ltpow_powpow_realpow_zeropow_zero_impquotient_normalrat_not_inftyrdiv_eqreal_0real_11real_inftyreal_le_eqreal_lt_eqreal_normalreal_positivereal_set_INTERreal_set_UNIONreal_set_emptyreal_set_inftyrinv_uniqsqrt_0sqrt_1sqrt_le_nsqrt_le_xsqrt_mono_lesqrt_mulsqrt_pos_lesqrt_pos_ltsqrt_pos_nesqrt_pow2sub_0sub_addsub_add2sub_add_normalsub_eq_0sub_inftysub_ldistribsub_le_eqsub_le_eq2sub_le_impsub_le_imp2sub_le_switchsub_le_switch2sub_le_zerosub_lnegsub_lt_eqsub_lt_impsub_lt_imp2sub_lt_zerosub_lt_zero2sub_lzerosub_not_inftysub_pow2sub_rdistribsub_realsub_reflsub_rnegsub_rzerosub_zero_lesub_zero_ltsub_zero_lt2third_cancelthirds_betweenx_half_halfzero_divzero_pow

Definitions

⊢ ℚ꙳ = IMAGE Normal ℚ
⊢ ∀x. ceiling (Normal x) = LEAST n. x ≤ &n
⊢ (∀r. contract (Normal r) = r / (1 + abs r)) ∧ contract +∞ = 1 ∧
  contract −∞ = -1
⊢ ∀c. expand c =
      if 1 ≤ c then +∞ else if c ≤ -1 then −∞ else Normal (c / (1 − abs c))
extreal_TY_DEF
⊢ ∃rep.
    TYPE_DEFINITION
      (λa0.
           ∀ $var$('extreal').
             (∀a0.
                a0 = ind_type$CONSTR 0 ARB (λn. ind_type$BOTTOM) ∨
                a0 = ind_type$CONSTR (SUC 0) ARB (λn. ind_type$BOTTOM) ∨
                (∃a. a0 =
                     (λa.
                          ind_type$CONSTR (SUC (SUC 0)) a
                            (λn. ind_type$BOTTOM)) a) ⇒
                $var$('extreal') a0) ⇒
             $var$('extreal') a0) rep
extreal_abs_def_primitive
⊢ abs =
  WFREC (@R. WF R)
    (λextreal_abs a.
         case a of −∞ => I +∞ | +∞ => I +∞ | Normal x => I (Normal (abs x)))
⊢ -−∞ = +∞ ∧ -+∞ = −∞ ∧ ∀x. -Normal x = Normal (-x)
extreal_case_def
⊢ (∀v v1 f. extreal_CASE −∞ v v1 f = v) ∧
  (∀v v1 f. extreal_CASE +∞ v v1 f = v1) ∧
  ∀a v v1 f. extreal_CASE (Normal a) v v1 f = f a
extreal_div_def
⊢ (∀r. Normal r / +∞ = Normal 0) ∧ (∀r. Normal r / −∞ = Normal 0) ∧
  ∀x r. r ≠ 0 ⇒ x / Normal r = x * (Normal r)⁻¹
extreal_inv_def
⊢ −∞ ⁻¹ = Normal 0 ∧ +∞ ⁻¹ = Normal 0 ∧
  ∀r. r ≠ 0 ⇒ (Normal r)⁻¹ = Normal r⁻¹
⊢ ∀x y. x < y ⇔ ¬(y ≤ x)
⊢ ∀x y. max x y = if x ≤ y then y else x
⊢ ∀x y. min x y = if x ≤ y then x else y
⊢ ∀n. &n = Normal (&n)
⊢ (∀a n. Normal a pow n = Normal (a pow n)) ∧
  (∀n. +∞ pow n = if n = 0 then Normal 1 else +∞) ∧
  ∀n. −∞ pow n = if n = 0 then Normal 1 else if EVEN n then +∞ else −∞
extreal_size_def
⊢ extreal_size −∞ = 0 ∧ extreal_size +∞ = 0 ∧
  ∀a. extreal_size (Normal a) = 1
⊢ (∀x. sqrt (Normal x) = Normal (sqrt x)) ∧ sqrt +∞ = +∞
⊢ ∀x y. x − y = x + -y
⊢ ∀x. real x = if x = −∞ ∨ x = +∞ then 0 else @r. x = Normal r
⊢ ∀s. real_set s = {real x | x ≠ +∞ ∧ x ≠ −∞ ∧ x ∈ s}

Theorems

⊢ ∀x y. x ∈ ℚ꙳ ∧ y ∈ ℚ꙳ ⇒ x + y ∈ ℚ꙳
⊢ ∀x. Normal x ≤ &ceiling (Normal x)
⊢ ∀x. 0 ≤ x ⇒ &ceiling (Normal x) < Normal x + 1
⊢ ∀z x. x ∈ ℚ꙳ ⇒ &z * x ∈ ℚ꙳ ∧ -&z * x ∈ ℚ꙳
⊢ ∀c. countable c ⇔ c = ∅ ∨ ∃f. c = IMAGE f ℚ꙳
⊢ ∀x y. x ∈ ℚ꙳ ∧ y ∈ ℚ꙳ ∧ y ≠ 0 ⇒ x / y ∈ ℚ꙳
⊢ ∀x. 0 < x ⇒ ∀y. y ≠ +∞ ⇒ ∃n. y < &n * x
⊢ ∀x. 0 < x ⇒ ∃n. (&SUC n)⁻¹ < x
⊢ ∀x. 0 < x ⇒ ∃n. (&SUC n)⁻¹ ≤ x
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ⇒ (x + y = x + z ⇔ y = z)
⊢ ∀x y z. z ≠ −∞ ∧ z ≠ +∞ ⇒ (x + z = y + z ⇔ x = y)
⊢ ∀x. x ∈ ℚ꙳ ∧ x ≠ 0 ⇒ 1 / x ∈ ℚ꙳
⊢ ∀x y. x ∈ ℚ꙳ ∧ y ∈ ℚ꙳ ⇒ x * y ∈ ℚ꙳
⊢ ∀n. &n ∈ ℚ꙳ ∧ -&n ∈ ℚ꙳
⊢ ∀x. x ∈ ℚ꙳ ⇒ -x ∈ ℚ꙳
⊢ countable ℚ꙳
⊢ ∀x y. x < y ⇒ ∃r. r ∈ ℚ꙳ ∧ x < r ∧ r < y
⊢ ∀x y. x < y ⇒ ∃r. r ∈ ℚ ∧ x < Normal r ∧ Normal r < y
⊢ ∀x y. 0 ≤ x ∧ x < y ⇒ ∃r. r ∈ ℚ꙳ ∧ x < r ∧ r < y
⊢ INFINITE ℚ꙳
⊢ ∀x. x ∈ ℚ꙳ ⇒ ∃y. x = Normal y
⊢ ℚ꙳ =
  {x | ∃a b. x = &a / &b ∧ 0 < &b} ∪ {x | ∃a b. x = -(&a / &b) ∧ 0 < &b}
⊢ ∀x. x ≠ +∞ ⇒ ∃n. x ≤ &n
⊢ ∀x. x ≠ −∞ ⇒ ∃n. -&n ≤ x
⊢ ∀x y. x ∈ ℚ꙳ ∧ y ∈ ℚ꙳ ⇒ x − y ∈ ℚ꙳
⊢ abs 0 = 0
⊢ ∀x. abs (abs x) = abs x
⊢ ∀x k. abs x ≤ k ⇔ -k ≤ x ∧ x ≤ k
⊢ ∀x k. abs x < k ⇔ -k < x ∧ x < k
⊢ ∀x. abs (contract x) ≤ 1
⊢ ∀r. abs (contract (Normal r)) < 1
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ 0 ⇒ abs (x / y) = abs x / abs y
⊢ ∀x y. y ≠ 0 ⇒ abs (x / Normal y) = abs x / Normal (abs y)
⊢ ∀x. abs x = 0 ⇔ x = 0
⊢ ∀x. 0 < abs x ⇔ x ≠ 0
⊢ ∀x. abs x ≤ 0 ⇔ x = 0
⊢ ∀x y. abs (x * y) ≤ Normal (1 / 2) * (x² + y²)
⊢ ∀x. abs x ≤ x² + 1
⊢ ∀x. abs x = max x (-x)
⊢ ∀x y. abs (x * y) = abs x * abs y
⊢ ∀x. x < 0 ⇒ abs x = -x
⊢ ∀x. x ≤ 0 ⇒ abs x = -x
⊢ ∀x. abs (-x) = abs x
⊢ ∀x. x ≠ +∞ ∧ x ≠ −∞ ⇒ abs x ≠ +∞ ∧ abs x ≠ −∞
⊢ ∀x. abs x ≠ 0 ⇔ x ≠ 0
⊢ ∀x. 0 ≤ abs x
⊢ ∀x. (abs x)² = x²
⊢ ∀x n m. n ≤ m ⇒ abs x pow n ≤ 1 + abs x pow m
⊢ ∀x. x ≠ +∞ ∧ x ≠ −∞ ⇒ abs (real x) = real (abs x)
⊢ ∀x. abs x = x ⇔ 0 ≤ x
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ⇒ abs (x − y) = abs (y − x)
⊢ ∀x y. abs (x − y) = abs (y − x)
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ⇒ abs (x + y) ≤ abs x + abs y
⊢ ∀x y. abs (x + y) ≤ abs x + abs y
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ⇒ abs (x − y) ≤ abs x + abs y
⊢ ∀x y. abs (x − y) ≤ abs x + abs y
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ⇒ abs x ≤ abs y + abs (x − y)
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ⇒ abs x ≤ abs y + abs (y − x)
⊢ ∀x y. abs x ≤ abs y + abs (x − y)
⊢ ∀x y. abs x ≤ abs y + abs (y − x)
⊢ ∀x k. 0 ≤ k ⇒ (k ≤ abs x ⇔ x ≤ -k ∨ k ≤ x)
⊢ ∀a b c d.
    a ≠ −∞ ∧ b ≠ −∞ ∧ c ≠ −∞ ∧ d ≠ −∞ ⇒ a + b + (c + d) = a + c + (b + d)
⊢ ∀a b c d.
    a ≠ −∞ ∧ b ≠ +∞ ∧ c ≠ −∞ ∧ d ≠ +∞ ⇒ a − b + (c − d) = a + c − (b + d)
⊢ ∀x y z.
    x ≠ −∞ ∧ y ≠ −∞ ∧ z ≠ −∞ ∨ x ≠ +∞ ∧ y ≠ +∞ ∧ z ≠ +∞ ⇒
    x + (y + z) = x + y + z
⊢ ∀x y. x ≠ −∞ ∧ y ≠ −∞ ∨ x ≠ +∞ ∧ y ≠ +∞ ⇒ x + y = y + x
⊢ ∀x y. Normal x + y = y + Normal x
⊢ (∀x. x ≠ −∞ ⇒ x + +∞ = +∞ ∧ +∞ + x = +∞) ∧
  ∀x. x ≠ +∞ ⇒ x + −∞ = −∞ ∧ −∞ + x = −∞
⊢ ∀x y z. 0 ≤ y ∧ 0 ≤ z ∨ y ≤ 0 ∧ z ≤ 0 ⇒ x * (y + z) = x * y + x * z
⊢ ∀x y z. y ≤ 0 ∧ z ≤ 0 ⇒ x * (y + z) = x * y + x * z
⊢ ∀r y z.
    y ≠ +∞ ∧ z ≠ +∞ ∨ y ≠ −∞ ∧ z ≠ −∞ ⇒
    Normal r * (y + z) = Normal r * y + Normal r * z
⊢ ∀r y z.
    y ≠ +∞ ∧ z ≠ +∞ ∨ y ≠ −∞ ∧ z ≠ −∞ ⇒
    Normal r * (y + z) = Normal r * y + Normal r * z
⊢ ∀x y z. 0 ≤ y ∧ 0 ≤ z ⇒ x * (y + z) = x * y + x * z
⊢ ∀x. 0 + x = x
⊢ ∀x y. (x ≠ −∞ ∧ y ≠ −∞ ⇒ x + y ≠ −∞) ∧ (x ≠ +∞ ∧ y ≠ +∞ ⇒ x + y ≠ +∞)
⊢ ∀x y. x ≠ −∞ ∧ x ≠ +∞ ∧ y ≠ −∞ ∧ y ≠ +∞ ⇒ (x + y)² = x² + y² + 2 * x * y
⊢ ∀x y. 0 < x ∧ x ≠ +∞ ∧ 0 ≤ y ⇒ (x + y)² = x² + y² + 2 * x * y
⊢ ∀x y z. 0 ≤ y ∧ 0 ≤ z ∨ y ≤ 0 ∧ z ≤ 0 ⇒ (y + z) * x = y * x + z * x
⊢ ∀x y z.
    y ≠ +∞ ∧ z ≠ +∞ ∨ y ≠ −∞ ∧ z ≠ −∞ ⇒
    (y + z) * Normal x = y * Normal x + z * Normal x
⊢ ∀x y z.
    y ≠ +∞ ∧ z ≠ +∞ ∨ y ≠ −∞ ∧ z ≠ −∞ ⇒
    (y + z) * Normal x = y * Normal x + z * Normal x
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ⇒ real (x + y) = real x + real y
⊢ ∀x. x + 0 = x
⊢ ∀x y. y ≠ −∞ ∧ y ≠ +∞ ⇒ x + y − y = x
⊢ ∀x y. y ≠ −∞ ∧ y ≠ +∞ ⇒ y + x − y = x
⊢ ∀x r. x + Normal r − Normal r = x
⊢ ∀x y. contract x = contract y ⇔ x = y
⊢ ∀x y. contract x ≤ contract y ⇔ x ≤ y
⊢ ∀x. contract (-x) = -contract x
datatype_extreal
⊢ DATATYPE (extreal −∞ +∞ Normal)
⊢ ∀x y z.
    x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ∧ z ≠ 0 ⇒ x / z + y / z = (x + y) / z
⊢ ∀x y z.
    (x ≠ +∞ ∧ y ≠ +∞ ∨ x ≠ −∞ ∧ y ≠ −∞) ∧ z ≠ 0 ∧ z ≠ +∞ ∧ z ≠ −∞ ⇒
    x / z + y / z = (x + y) / z
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ 0 < y ⇒ x / y = y⁻¹ * x
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ 0 < y ⇒ x / y = x * y⁻¹
⊢ ∀x. x ≠ +∞ ∧ x ≠ −∞ ⇒ x / +∞ = 0 ∧ x / −∞ = 0
⊢ ∀x r. r ≠ 0 ⇒ x = x / Normal r * Normal r
⊢ ∀x y. y ≠ 0 ⇒ Normal x / y ≠ +∞ ∧ Normal x / y ≠ −∞
⊢ ∀x. x / 1 = x
⊢ ∀x. x ≠ 0 ∧ x ≠ +∞ ∧ x ≠ −∞ ⇒ x / x = 1
⊢ ∀x. 0 < x ∧ x ≠ +∞ ⇒ x / x = 1
⊢ ∀x y z.
    x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ∧ z ≠ 0 ⇒ x / z − y / z = (x − y) / z
⊢ ∀x y. x * y = 0 ⇔ x = 0 ∨ y = 0
⊢ ∀a b c d.
    b ≠ −∞ ∧ b ≠ +∞ ∧ c ≠ −∞ ∧ c ≠ +∞ ⇒ (a + b = c + d ⇔ a − c = d − b)
⊢ ∀x y. -x = -y ⇔ x = y
⊢ ∀x y z. 0 < z ⇒ (x = y / Normal z ⇔ x * Normal z = y)
⊢ ∀x y z. z ≠ −∞ ∧ z ≠ +∞ ⇒ (x = y − z ⇔ x + z = y)
⊢ ∀x y z. x = y − Normal z ⇔ x + Normal z = y
⊢ ∀x y z. y ≠ −∞ ∧ y ≠ +∞ ⇒ (x − y = z ⇔ x = z + y)
⊢ ∀x y z. x = Normal z − y ⇔ y = Normal z − x
⊢ ∀x. expand (contract x) = x
extreal_11
⊢ ∀a a'. Normal a = Normal a' ⇔ a = a'
extreal_Axiom
⊢ ∀f0 f1 f2. ∃fn. fn −∞ = f0 ∧ fn +∞ = f1 ∧ ∀a. fn (Normal a) = f2 a
⊢ abs (Normal x) = Normal (abs x) ∧ abs −∞ = +∞ ∧ abs +∞ = +∞
⊢ ∀P. (∀x. P (Normal x)) ∧ P −∞ ∧ P +∞ ⇒ ∀v. P v
⊢ Normal x + Normal y = Normal (x + y) ∧ Normal v0 + −∞ = −∞ ∧
  Normal v0 + +∞ = +∞ ∧ −∞ + Normal v1 = −∞ ∧ +∞ + Normal v1 = +∞ ∧
  −∞ + −∞ = −∞ ∧ +∞ + +∞ = +∞
⊢ ∀x y. Normal x + Normal y = Normal (x + y)
⊢ ∀P. (∀x y. P (Normal x) (Normal y)) ∧ (∀v0. P (Normal v0) −∞) ∧
      (∀v0. P (Normal v0) +∞) ∧ (∀v1. P −∞ (Normal v1)) ∧
      (∀v1. P +∞ (Normal v1)) ∧ P −∞ −∞ ∧ P +∞ +∞ ∧ P −∞ +∞ ∧ P +∞ −∞ ⇒
      ∀v v1. P v v1
extreal_case_cong
⊢ ∀M M' v v1 f.
    M = M' ∧ (M' = −∞ ⇒ v = v') ∧ (M' = +∞ ⇒ v1 = v1') ∧
    (∀a. M' = Normal a ⇒ f a = f' a) ⇒
    extreal_CASE M v v1 f = extreal_CASE M' v' v1' f'
extreal_case_eq
⊢ extreal_CASE x v v1 f = v' ⇔
  x = −∞ ∧ v = v' ∨ x = +∞ ∧ v1 = v' ∨ ∃r. x = Normal r ∧ f r = v'
⊢ ∀x. x = −∞ ∨ x = +∞ ∨ ∃r. x = Normal r
extreal_distinct
⊢ −∞ ≠ +∞ ∧ (∀a. −∞ ≠ Normal a) ∧ ∀a. +∞ ≠ Normal a
⊢ ∀x y. y ≠ 0 ⇒ Normal x / Normal y = Normal (x / y)
⊢ ∀x. x + x = 2 * x
⊢ ∀x. Normal x = 0 ⇔ x = 0
extreal_induction
⊢ ∀P. P −∞ ∧ P +∞ ∧ (∀r. P (Normal r)) ⇒ ∀e. P e
⊢ ∀x. x ≠ 0 ⇒ (Normal x)⁻¹ = Normal x⁻¹
⊢ (Normal x ≤ Normal y ⇔ x ≤ y) ∧ (−∞ ≤ v0 ⇔ T) ∧ (+∞ ≤ +∞ ⇔ T) ∧
  (Normal v5 ≤ +∞ ⇔ T) ∧ (+∞ ≤ −∞ ⇔ F) ∧ (Normal v6 ≤ −∞ ⇔ F) ∧
  (+∞ ≤ Normal v8 ⇔ F)
⊢ ∀x y. Normal x ≤ Normal y ⇔ x ≤ y
⊢ ∀P. (∀x y. P (Normal x) (Normal y)) ∧ (∀v0. P −∞ v0) ∧ P +∞ +∞ ∧
      (∀v5. P (Normal v5) +∞) ∧ P +∞ −∞ ∧ (∀v6. P (Normal v6) −∞) ∧
      (∀v8. P +∞ (Normal v8)) ⇒
      ∀v v1. P v v1
⊢ ∀x y. Normal x < Normal y ⇔ x < y
⊢ ∀a b. max (Normal a) (Normal b) = Normal (max a b)
⊢ ∀x y. x < y ⇒ ∃z. x < z ∧ z < y
⊢ ∀a b. min (Normal a) (Normal b) = Normal (min a b)
⊢ −∞ * −∞ = +∞ ∧ −∞ * +∞ = −∞ ∧ +∞ * −∞ = −∞ ∧ +∞ * +∞ = +∞ ∧
  Normal x * −∞ = (if x = 0 then Normal 0 else if 0 < x then −∞ else +∞) ∧
  −∞ * Normal y = (if y = 0 then Normal 0 else if 0 < y then −∞ else +∞) ∧
  Normal x * +∞ = (if x = 0 then Normal 0 else if 0 < x then +∞ else −∞) ∧
  +∞ * Normal y = (if y = 0 then Normal 0 else if 0 < y then +∞ else −∞) ∧
  Normal x * Normal y = Normal (x * y)
⊢ ∀x y. Normal x * Normal y = Normal (x * y)
⊢ ∀P. P −∞ −∞ ∧ P −∞ +∞ ∧ P +∞ −∞ ∧ P +∞ +∞ ∧ (∀x. P (Normal x) −∞) ∧
      (∀y. P −∞ (Normal y)) ∧ (∀x. P (Normal x) +∞) ∧
      (∀y. P +∞ (Normal y)) ∧ (∀x y. P (Normal x) (Normal y)) ⇒
      ∀v v1. P v v1
extreal_nchotomy
⊢ ∀ee. ee = −∞ ∨ ee = +∞ ∨ ∃r. ee = Normal r
⊢ ∀x. Normal x ≠ −∞ ∧ Normal x ≠ +∞
⊢ ∀x y. ¬(y ≤ x) ⇔ x < y
⊢ ∀x y. ¬(x < y) ⇔ y ≤ x
⊢ (∀x. x pow 0 = 1) ∧ ∀x n. x pow SUC n = x * x pow n
⊢ ∀a n. Normal a pow n = Normal (a pow n)
⊢ ∀x y. x ≠ −∞ ∧ y ≠ +∞ ∨ x ≠ +∞ ∧ y ≠ −∞ ⇒ x − y = x + -y
⊢ Normal x − Normal y = Normal (x − y) ∧ +∞ − Normal x = +∞ ∧
  −∞ − Normal x = −∞ ∧ Normal x − −∞ = +∞ ∧ Normal x − +∞ = −∞ ∧
  −∞ − +∞ = −∞ ∧ +∞ − −∞ = +∞
⊢ ∀x y. Normal x − Normal y = Normal (x − y)
⊢ 4 * (1 / 4) = 1
⊢ ((0 < 1 / 4 ∧ 1 / 4 < 1) ∧ 0 < 3 / 4 ∧ 3 / 4 < 1) ∧
  (0 ≤ 1 / 4 ∧ 1 / 4 ≤ 1) ∧ 0 ≤ 3 / 4 ∧ 3 / 4 ≤ 1
⊢ (0 < 1 / 2 ∧ 1 / 2 < 1) ∧ 0 ≤ 1 / 2 ∧ 1 / 2 ≤ 1
⊢ 2 * (1 / 2) = 1
⊢ ∀x. x / 2 + x / 2 = x
⊢ 1 / 2 ≠ +∞ ∧ 1 / 2 ≠ −∞
⊢ ∀r. 0 < r ⇒ +∞ / Normal r = +∞ ∧ −∞ / Normal r = −∞
⊢ +∞ ² = +∞ ∧ −∞ ² = +∞
⊢ ∀x. x ≠ 0 ⇒ x⁻¹ = 1 / x
⊢ +∞ ⁻¹ = 0 ∧ −∞ ⁻¹ = 0
⊢ ∀x y. 0 < x ∧ 0 < y ⇒ (x⁻¹ = y⁻¹ ⇔ x = y)
⊢ ∀x. x ≠ 0 ∧ x ≠ +∞ ∧ x ≠ −∞ ⇒ x⁻¹ ⁻¹ = x
⊢ ∀x y. 0 < x ∧ 0 < y ⇒ (x⁻¹ ≤ y⁻¹ ⇔ y ≤ x)
⊢ ∀x y. 0 < y ∧ y ≤ x ⇒ x⁻¹ ≤ y⁻¹
⊢ ∀x y. 0 < x ∧ 0 < y ⇒ (x⁻¹ < y⁻¹ ⇔ y < x)
⊢ ∀x y. x ≠ 0 ∧ y ≠ 0 ⇒ (x * y)⁻¹ = x⁻¹ * y⁻¹
⊢ ∀x. x ≠ 0 ⇒ x⁻¹ ≠ +∞ ∧ x⁻¹ ≠ −∞
⊢ 1⁻¹ = 1
⊢ ∀x. 0 < x ∧ x ≠ +∞ ⇒ 0 < 1 / x
⊢ ∀x. 0 < x ∧ x ≠ +∞ ⇒ 0 < x⁻¹
⊢ ∀x. x ≠ 0 ⇒ (0 < x⁻¹ ⇔ x ≠ +∞ ∧ 0 ≤ x)
⊢ ∀x y z. 0 < z ∧ z < +∞ ⇒ (x / z = y ⇔ x = y * z)
⊢ ∀x y z. 0 < z ∧ z ≠ +∞ ∧ x ≤ y ⇒ x / z ≤ y / z
⊢ 0 ≤ 1
⊢ 0 ≤ 2
⊢ ∀x. x ≤ abs x ∧ -x ≤ abs x
⊢ ∀k x. k ≤ abs x ⇔ x ≤ -k ∨ k ≤ x
⊢ ∀x y. 0 ≤ x ∧ 0 ≤ y ⇒ 0 ≤ x + y
⊢ ∀w x y z. w ≤ x ∧ y ≤ z ⇒ w + y ≤ x + z
⊢ ∀x y. x ≤ 0 ∧ y ≤ 0 ⇒ x + y ≤ 0
⊢ ∀x y. y ≠ −∞ ∧ y ≠ +∞ ⇒ (y ≤ x + y ⇔ 0 ≤ x)
⊢ ∀x y. 0 ≤ x ⇒ y ≤ x + y
⊢ ∀x y. x ≠ −∞ ∧ x ≠ +∞ ⇒ (x ≤ x + y ⇔ 0 ≤ y)
⊢ ∀x y. 0 ≤ y ⇒ x ≤ x + y
⊢ ∀x y. x ≤ y ∧ y ≤ x ⇔ x = y
⊢ ∀y z. 0 ≤ y ∧ 0 < z ⇒ 0 ≤ y / Normal z
⊢ (∀x. −∞ ≤ x ∧ x ≤ +∞) ∧ (∀x. x ≤ −∞ ⇔ x = −∞) ∧ ∀x. +∞ ≤ x ⇔ x = +∞
⊢ ∀x. 0 < x ⇒ 0 ≤ x⁻¹
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ⇒ (x + y ≤ x + z ⇔ y ≤ z)
⊢ ∀x y z. y ≤ z ⇒ x + y ≤ x + z
⊢ ∀x y z. 0 < x ⇒ (y ≤ z * Normal x ⇔ y / Normal x ≤ z)
⊢ ∀x y z. 0 < x ∧ x ≠ +∞ ⇒ (x * y ≤ x * z ⇔ y ≤ z)
⊢ ∀x y z. 0 ≤ z ∧ x ≤ y ⇒ z * x ≤ z * y
⊢ ∀x y. x ≠ −∞ ∧ y ≠ −∞ ∨ x ≠ +∞ ∧ y ≠ +∞ ⇒ (-x ≤ y ⇔ 0 ≤ x + y)
⊢ ∀x y z. y ≤ z ⇒ x − z ≤ x − y
⊢ ∀x y. x ≤ y ⇔ x < y ∨ x = y
⊢ ∀z x y. z ≤ max x y ⇔ z ≤ x ∨ z ≤ y
⊢ ∀x y. x ≤ max x y
⊢ ∀x y. y ≤ max x y
⊢ ∀z x y. z ≤ min x y ⇔ z ≤ x ∧ z ≤ y
⊢ ∀x y. 0 ≤ x ∧ 0 ≤ y ⇒ 0 ≤ x * y
⊢ ∀x1 x2 y1 y2. 0 ≤ x1 ∧ 0 ≤ y1 ∧ x1 ≤ x2 ∧ y1 ≤ y2 ⇒ x1 * y1 ≤ x2 * y2
⊢ ∀x y. x ≤ 0 ∧ y ≤ 0 ⇒ 0 ≤ x * y
⊢ ∀x y. -x ≤ -y ⇔ y ≤ x
⊢ (∀x. 0 ≤ x ⇒ x ≠ −∞) ∧ ∀x. x ≤ 0 ⇒ x ≠ +∞
⊢ ∀n. 0 ≤ &n
⊢ ∀x. 0 ≤ x²
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ⇒ (y + x ≤ z + x ⇔ y ≤ z)
⊢ ∀x y z. y ≤ z ⇒ y + x ≤ z + x
⊢ ∀x y z. 0 < x ⇒ (y * Normal x ≤ z ⇔ y ≤ z / Normal x)
⊢ ∀x y. 0 ≤ x ∧ x ≤ y ∧ y ≠ +∞ ⇒ real x ≤ real y
⊢ ∀x. x ≤ x
⊢ ∀x y z. 0 < z ∧ z ≠ +∞ ⇒ (x * z ≤ y * z ⇔ x ≤ y)
⊢ ∀x y z. 0 ≤ z ∧ x ≤ y ⇒ x * z ≤ y * z
⊢ ∀x y z. z ≠ +∞ ∧ z ≠ −∞ ⇒ (x − z ≤ y − z ⇔ x ≤ y)
⊢ ∀x y z. x ≤ y ⇒ x − z ≤ y − z
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ⇒ (y ≤ z − x ⇔ y + x ≤ z)
⊢ ∀x y z. z ≠ −∞ ∧ z ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ −∞ ⇒ (y ≤ z − x ⇔ y + x ≤ z)
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ∧ y + x ≤ z ⇒ y ≤ z − x
⊢ ∀x y z. z ≠ −∞ ∧ z ≠ +∞ ∧ y + x ≤ z ⇒ y ≤ z − x
⊢ ∀x y. x ≤ y ∨ y ≤ x
⊢ ∀x y z. x ≤ y ∧ y ≤ z ⇒ x ≤ z
⊢ ∀x y. 0 ≤ x ∧ 0 < y ⇒ 0 < x + y
⊢ ∀w x y z. w ≠ −∞ ∧ w ≠ +∞ ∧ w ≤ x ∧ y < z ⇒ w + y < x + z
⊢ ∀w x y z. x ≠ −∞ ∧ x ≠ +∞ ∧ w ≤ x ∧ y < z ⇒ w + y < x + z
⊢ ∀x y. ¬(x < y ∧ y ≤ x)
⊢ ∀x y. 0 ≤ x ∧ 0 < y ⇒ 0 ≤ x * y
⊢ ∀x y. x ≤ y ∨ y < x
⊢ ∀x y z. x ≤ y ∧ y < z ⇒ x < z
⊢ ∀x y. x * y = 1 ⇒ x = y⁻¹
⊢ 0 < 1
⊢ 0 < 2
⊢ -1 < 0
⊢ ∀k x. k < abs x ⇔ x < -k ∨ k < x
⊢ ∀x y. 0 < x ∧ 0 < y ⇒ 0 < x + y
⊢ ∀w x y z. w < x ∧ y < z ⇒ w + y < x + z
⊢ ∀x y. x < 0 ∧ y < 0 ⇒ x + y < 0
⊢ ∀x y. y ≠ −∞ ∧ y ≠ +∞ ⇒ (y < x + y ⇔ 0 < x)
⊢ ∀x y. x ≠ −∞ ∧ x ≠ +∞ ⇒ (x < x + y ⇔ 0 < y)
⊢ ∀x y. x ≠ −∞ ∧ x ≠ +∞ ∧ 0 < y ⇒ x < x + y
⊢ ∀x y. ¬(x < y ∧ y < x)
⊢ ∀y z. 0 < y ∧ 0 < z ⇒ 0 < y / Normal z
⊢ ∀x y. x < y ⇒ x ≤ y
⊢ ∀x y. x < y ⇒ x ≠ y
⊢ −∞ < +∞ ∧ (∀x. −∞ < Normal x ∧ Normal x < +∞) ∧
  (∀x. ¬(x < −∞) ∧ ¬(+∞ < x)) ∧ (∀x. x ≠ +∞ ⇔ x < +∞) ∧ ∀x. x ≠ −∞ ⇔ −∞ < x
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ⇒ (x + y < x + z ⇔ y < z)
⊢ ∀x y z. 0 < z ⇒ (x / Normal z < y ⇔ x < y * Normal z)
⊢ ∀x y. x < y ⇔ x ≤ y ∧ x ≠ y
⊢ ∀x y z. 0 < x ∧ x ≠ +∞ ⇒ (x * y < x * z ⇔ y < z)
⊢ ∀x y z. 0 < x ∧ x ≠ +∞ ∧ y < z ⇒ x * y < x * z
⊢ ∀x y z. x ≠ +∞ ∧ x ≠ −∞ ⇒ (x − z < x − y ⇔ y < z)
⊢ ∀x y z. x ≠ +∞ ∧ x ≠ −∞ ∧ y < z ⇒ x − z < x − y
⊢ ∀x y z. x < max y z ⇔ x < y ∨ x < z
⊢ ∀x b d. x < max b d ∧ b ≤ x ⇒ x < d
⊢ ∀x y z. z < min x y ⇔ z < x ∧ z < y
⊢ ∀x y. 0 < x ∧ 0 < y ⇒ 0 < x * y
⊢ ∀x1 x2 y1 y2.
    0 ≤ x1 ∧ 0 ≤ y1 ∧ x1 ≠ +∞ ∧ y1 ≠ +∞ ∧ x1 < x2 ∧ y1 < y2 ⇒
    x1 * y1 < x2 * y2
⊢ ∀x y. x < 0 ∧ y < 0 ⇒ 0 < x * y
⊢ ∀x y. -x < -y ⇔ y < x
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ⇒ (y + x < z + x ⇔ y < z)
⊢ ∀x y z. 0 < z ⇒ (x < y / Normal z ⇔ x * Normal z < y)
⊢ ∀x y z. z < 0 ⇒ (y / Normal z < x ⇔ x * Normal z < y)
⊢ ∀x. ¬(x < x)
⊢ ∀x y z. 0 < z ∧ z ≠ +∞ ⇒ (x * z < y * z ⇔ x < y)
⊢ ∀x y z. x < y ∧ 0 < z ∧ z ≠ +∞ ⇒ x * z < y * z
⊢ ∀x y z. z ≠ +∞ ∧ z ≠ −∞ ⇒ (x − z < y − z ⇔ x < y)
⊢ ∀x y z. z ≠ +∞ ∧ z ≠ −∞ ∧ x < y ⇒ x − z < y − z
⊢ ∀x y z. x ≠ −∞ ∧ y ≠ −∞ ∧ z ≠ −∞ ∧ z ≠ +∞ ⇒ (y + x < z ⇔ y < z − x)
⊢ ∀x y z. x ≠ +∞ ∧ y ≠ +∞ ∧ z ≠ −∞ ∧ z ≠ +∞ ⇒ (y + x < z ⇔ y < z − x)
⊢ ∀x y z. x ≠ −∞ ∧ y ≠ −∞ ∧ y + x < z ⇒ y < z − x
⊢ ∀x y z. x ≠ +∞ ∧ y ≠ +∞ ∧ y + x < z ⇒ y < z − x
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ∧ y + x < z ⇒ y < z − x
⊢ ∀x y. x = y ∨ x < y ∨ y < x
⊢ ∀x y z. x < y ∧ y < z ⇒ x < z
⊢ ∀x y. 0 < x ∧ 0 ≤ y ⇒ 0 < x + y
⊢ ∀x y. 0 < x ∧ 0 ≤ y ⇒ 0 ≤ x * y
⊢ ∀x y. x < y ∨ y ≤ x
⊢ ∀x y z. x < y ∧ y ≤ z ⇒ x < z
⊢ ∀x. 0 ≤ x ⇒ max 0 x = x
⊢ ∀x y. max x y = max y x
⊢ ∀x. max x +∞ = +∞ ∧ max +∞ x = +∞ ∧ max −∞ x = x ∧ max x −∞ = x
⊢ ∀z x y. max x y ≤ z ⇔ x ≤ z ∧ y ≤ z
⊢ ∀x1 x2 y1 y2. x1 ≤ y1 ∧ x2 ≤ y2 ⇒ max x1 x2 ≤ max y1 y2
⊢ ∀x y z. max x y < z ⇔ x < z ∧ y < z
⊢ ∀x y. x ≤ y ∨ x < y ⇒ max x y = y ∧ max y x = y
⊢ ∀x. max x x = x
⊢ ∀x y. min x y = min y x
⊢ ∀x. min x +∞ = x ∧ min +∞ x = x ∧ min −∞ x = −∞ ∧ min x −∞ = −∞
⊢ ∀z x y. min x y ≤ z ⇔ x ≤ z ∨ y ≤ z
⊢ ∀x y. min x y ≤ x
⊢ ∀x y. min x y ≤ y
⊢ ∀x1 x2 y1 y2. x1 ≤ y1 ∧ x2 ≤ y2 ⇒ min x1 x2 ≤ min y1 y2
⊢ ∀x a c. min a c ≤ x ∧ x < a ⇒ c ≤ x
⊢ ∀x y. x ≤ y ∨ x < y ⇒ min x y = x ∧ min y x = x
⊢ ∀x. min x x = x
⊢ ∀x y z. x * (y * z) = x * y * z
⊢ ∀x y. x * y = y * x
⊢ ∀x r. r ≠ 0 ⇒ x = x * Normal r / Normal r
⊢ ∀x. 0 < x ⇒ +∞ * x = +∞ ∧ x * +∞ = +∞ ∧ −∞ * x = −∞ ∧ x * −∞ = −∞
⊢ ∀x. x < 0 ⇒ +∞ * x = −∞ ∧ x * +∞ = −∞ ∧ −∞ * x = +∞ ∧ x * −∞ = +∞
⊢ ∀x y z. x ≠ +∞ ∧ x ≠ −∞ ⇒ (x * y = x * z ⇔ x = 0 ∨ y = z)
⊢ ∀x y. 0 ≤ x ∧ y ≤ 0 ⇒ x * y ≤ 0
⊢ ∀x y. x ≤ 0 ∧ 0 ≤ y ⇒ x * y ≤ 0
⊢ ∀x y. 0 ≤ x ∧ y < 0 ⇒ x * y ≤ 0
⊢ ∀x. x ≠ 0 ∧ x ≠ +∞ ∧ x ≠ −∞ ⇒ x⁻¹ * x = 1
⊢ ∀x. 0 < x ∧ x ≠ +∞ ⇒ x⁻¹ * x = 1
⊢ ∀x y. -x * y = -(x * y)
⊢ ∀x. 1 * x = x
⊢ ∀x. 0 < x ⇒ +∞ * x = +∞
⊢ ∀x y. 0 < x ∧ y < 0 ⇒ x * y < 0
⊢ ∀x y. x < 0 ∧ 0 < y ⇒ x * y < 0
⊢ ∀x y. 0 < x ∧ y ≤ 0 ⇒ x * y ≤ 0
⊢ ∀x. 0 * x = 0
⊢ (∀c y. 0 ≤ c ∧ y ≠ −∞ ⇒ Normal c * y ≠ −∞) ∧
  (∀c y. 0 ≤ c ∧ y ≠ +∞ ⇒ Normal c * y ≠ +∞) ∧
  (∀c y. c ≤ 0 ∧ y ≠ −∞ ⇒ Normal c * y ≠ +∞) ∧
  ∀c y. c ≤ 0 ∧ y ≠ +∞ ⇒ Normal c * y ≠ −∞
⊢ ∀x y. x ≠ −∞ ∧ x ≠ +∞ ∧ y ≠ −∞ ∧ y ≠ +∞ ⇒ x * y ≠ −∞ ∧ x * y ≠ +∞
⊢ ∀x y z. x ≠ +∞ ∧ x ≠ −∞ ⇒ (y * x = z * x ⇔ x = 0 ∨ y = z)
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ⇒ real (x * y) = real x * real y
⊢ ∀x y. x * -y = -(x * y)
⊢ ∀x. x * 1 = x
⊢ ∀x. 0 < x ⇒ x * +∞ = +∞
⊢ ∀x. x * 0 = 0
⊢ 0 ≠ 1
⊢ 0 ≠ 2
⊢ -0 = 0
⊢ ∀x y. x ≠ −∞ ∧ y ≠ −∞ ∨ x ≠ +∞ ∧ y ≠ +∞ ⇒ -(x + y) = -x + -y
⊢ ∀x. -x = 0 ⇔ x = 0
⊢ ∀x. -x = -1 * x
⊢ ∀x. -x = Normal (-1) * x
⊢ ∀x y. -x * -y = x * y
⊢ ∀x. --x = x
⊢ ∀x. x ≤ 0 ⇒ x ≠ +∞
⊢ ∀x y. x ≠ −∞ ∧ x ≠ +∞ ∨ y ≠ −∞ ∧ y ≠ +∞ ⇒ -(x − y) = y − x
⊢ Normal 0 = 0
⊢ Normal 1 = 1
⊢ ∀x. x ≠ 0 ⇒ Normal x⁻¹ = (Normal x)⁻¹
⊢ ∀x. x ≠ −∞ ∧ x ≠ +∞ ⇒ Normal (real x) = x
⊢ ∀s. s ∩ IMAGE Normal 𝕌(:real) = IMAGE Normal (real_set s)
⊢ ∀n. &n < +∞
⊢ ∀n. &n ≠ −∞ ∧ &n ≠ +∞
⊢ ∀n. 1 pow n = 1
⊢ ∀x. 0 ≤ x ⇒ x ≠ −∞
⊢ ∀x y. 0 ≤ x ∧ 0 ≤ y ⇒ (x ≤ y ⇔ x² ≤ y²)
⊢ ∀x. 0 ≤ x ⇒ sqrt x² = x
⊢ ∀x. x pow 0 = 1
⊢ ∀x. x pow 1 = x
⊢ ∀x. x² = x * x
⊢ ∀x. x² = abs x * abs x
⊢ ∀x n m. x pow (n + m) = x pow n * x pow m
⊢ ∀n x y. x ≠ +∞ ∧ x ≠ −∞ ∧ 0 < y ⇒ (x / y) pow n = x pow n / y pow n
⊢ ∀n x y. n ≠ 0 ∧ 0 ≤ x ∧ 0 ≤ y ⇒ (x = y ⇔ x pow n = y pow n)
⊢ ∀n y. y ≠ 0 ⇒ (y pow n)⁻¹ = y⁻¹ pow n
⊢ ∀n x y. 0 ≤ x ∧ x ≤ y ⇒ x pow n ≤ y pow n
⊢ ∀n x y. n ≠ 0 ∧ 0 ≤ x ∧ 0 ≤ y ⇒ (x ≤ y ⇔ x pow n ≤ y pow n)
⊢ ∀x n m. 1 ≤ x ∧ n ≤ m ⇒ x pow n ≤ x pow m
⊢ ∀n x y. 0 ≤ x ∧ x < y ⇒ x pow SUC n < y pow SUC n
⊢ ∀n x y. n ≠ 0 ∧ 0 ≤ x ∧ x < y ⇒ x pow n < y pow n
⊢ ∀n. -1 pow (2 * n) = 1
⊢ ∀n x y. (x * y) pow n = x pow n * y pow n
⊢ ∀x. x < 0 ⇒ (x pow n < 0 ⇔ ODD n)
⊢ ∀n x. x ≠ −∞ ∧ x ≠ +∞ ⇒ x pow n ≠ −∞ ∧ x pow n ≠ +∞
⊢ ∀x. x < 0 ⇒ (0 < x pow n ⇔ EVEN n)
⊢ ∀n x. 0 ≤ x ⇒ 0 ≤ x pow n
⊢ ∀n x. 0 < x ⇒ 0 < x pow n
⊢ ∀x m n. (x pow m) pow n = x pow (m * n)
⊢ ∀x n. x ≠ +∞ ∧ x ≠ −∞ ⇒ real x pow n = real (x pow n)
⊢ ∀n x. x pow SUC n = 0 ⇔ x = 0
⊢ ∀n x. x pow n = 0 ⇒ x = 0
⊢ ∀n m. m ≠ 0 ⇒ &n / &m = Normal (&n / &m)
⊢ ∀r. r ∈ ℚ꙳ ⇒ r ≠ −∞ ∧ r ≠ +∞
⊢ ∀x y z. 0 < z ∧ z < +∞ ⇒ (x = y / z ⇔ x * z = y)
⊢ real 0 = 0
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ⇒ (real x = real y ⇔ x = y)
⊢ real +∞ = 0 ∧ real −∞ = 0
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ⇒ (real x ≤ real y ⇔ x ≤ y)
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ⇒ (real x < real y ⇔ x < y)
⊢ ∀x. real (Normal x) = x
⊢ ∀x. 0 ≤ x ⇒ 0 ≤ real x
⊢ ∀s t. real_set (s ∩ t) = real_set s ∩ real_set t
⊢ ∀s t. real_set (s ∪ t) = real_set s ∪ real_set t
⊢ real_set ∅ = ∅
⊢ real_set {+∞} = ∅ ∧ real_set {−∞} = ∅
⊢ ∀x y. x * y = 1 ⇒ y = x⁻¹
⊢ sqrt 0 = 0
⊢ sqrt 1 = 1
⊢ ∀n. sqrt (&n) ≤ &n
⊢ ∀x. 1 ≤ x ⇒ sqrt x ≤ x
⊢ ∀x y. 0 ≤ x ∧ x ≤ y ⇒ sqrt x ≤ sqrt y
⊢ ∀x y. 0 ≤ x ∧ 0 ≤ y ⇒ sqrt (x * y) = sqrt x * sqrt y
⊢ ∀x. 0 ≤ x ⇒ 0 ≤ sqrt x
⊢ ∀x. 0 < x ⇒ 0 < sqrt x
⊢ ∀x. 0 < x ⇒ sqrt x ≠ 0
⊢ ∀x. (sqrt x)² = x ⇔ 0 ≤ x
⊢ ∀x y. x − y = 0 ⇒ x = y
⊢ ∀x y. y ≠ −∞ ∧ y ≠ +∞ ⇒ x − y + y = x
⊢ ∀x y. x ≠ −∞ ∧ x ≠ +∞ ⇒ x + (y − x) = y
⊢ ∀x r. x − Normal r + Normal r = x
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ x = y ⇒ x − y = 0
⊢ (∀x. x ≠ −∞ ⇒ x − −∞ = +∞) ∧ (∀x. x ≠ +∞ ⇒ x − +∞ = −∞) ∧
  (∀x. x ≠ +∞ ⇒ +∞ − x = +∞) ∧ ∀x. x ≠ −∞ ⇒ −∞ − x = −∞
⊢ ∀x y z.
    x ≠ −∞ ∧ x ≠ +∞ ∧ y ≠ −∞ ∧ y ≠ +∞ ∧ z ≠ −∞ ∧ z ≠ +∞ ⇒
    x * (y − z) = x * y − x * z
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ⇒ (y − x ≤ z ⇔ y ≤ z + x)
⊢ ∀x y z. y ≠ −∞ ∧ y ≠ +∞ ∧ x ≠ −∞ ∧ z ≠ −∞ ⇒ (y − x ≤ z ⇔ y ≤ z + x)
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ∧ y ≤ z + x ⇒ y − x ≤ z
⊢ ∀x y z. y ≠ −∞ ∧ y ≠ +∞ ∧ y ≤ z + x ⇒ y − x ≤ z
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ∧ z ≠ −∞ ∧ z ≠ +∞ ⇒ (y − x ≤ z ⇔ y − z ≤ x)
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ∧ y ≠ −∞ ∧ y ≠ +∞ ⇒ (y − x ≤ z ⇔ y − z ≤ x)
⊢ ∀x y. y ≠ −∞ ∧ y ≠ +∞ ⇒ (x ≤ y ⇔ x − y ≤ 0)
⊢ ∀x y. x ≠ −∞ ∧ y ≠ −∞ ∨ x ≠ +∞ ∧ y ≠ +∞ ⇒ -x − y = -(x + y)
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ⇒ (y − x < z ⇔ y < z + x)
⊢ ∀x y z. x ≠ −∞ ∧ x ≠ +∞ ∧ y < z + x ⇒ y − x < z
⊢ ∀x y z. z ≠ −∞ ∧ z ≠ +∞ ∧ y < z + x ⇒ y − x < z
⊢ ∀x y. x < y ⇒ x − y < 0
⊢ ∀x y. y ≠ −∞ ∧ y ≠ +∞ ∧ x − y < 0 ⇒ x < y
⊢ ∀x. 0 − x = -x
⊢ ∀x y. (x ≠ −∞ ∧ y ≠ +∞ ⇒ x − y ≠ −∞) ∧ (x ≠ +∞ ∧ y ≠ −∞ ⇒ x − y ≠ +∞)
⊢ ∀x y. x ≠ −∞ ∧ x ≠ +∞ ∧ y ≠ −∞ ∧ y ≠ +∞ ⇒ (x − y)² = x² + y² − 2 * x * y
⊢ ∀x y z.
    x ≠ −∞ ∧ x ≠ +∞ ∧ y ≠ −∞ ∧ y ≠ +∞ ∧ z ≠ −∞ ∧ z ≠ +∞ ⇒
    (x − y) * z = x * z − y * z
⊢ ∀x y. x ≠ +∞ ∧ x ≠ −∞ ∧ y ≠ +∞ ∧ y ≠ −∞ ⇒ real (x − y) = real x − real y
⊢ ∀x. x ≠ −∞ ∧ x ≠ +∞ ⇒ x − x = 0
⊢ ∀x y. x − -y = x + y
⊢ ∀x. x − 0 = x
⊢ ∀x y. x ≠ −∞ ∧ x ≠ +∞ ⇒ (x ≤ y ⇔ 0 ≤ y − x)
⊢ ∀x y. x < y ⇒ 0 < y − x
⊢ ∀x y. x ≠ −∞ ∧ x ≠ +∞ ∧ 0 < y − x ⇒ x < y
⊢ 3 * (1 / 3) = 1
⊢ ((0 < 1 / 3 ∧ 1 / 3 < 1) ∧ 0 < 2 / 3 ∧ 2 / 3 < 1) ∧
  (0 ≤ 1 / 3 ∧ 1 / 3 ≤ 1) ∧ 0 ≤ 2 / 3 ∧ 2 / 3 ≤ 1
⊢ ∀x. 1 / 2 * x + 1 / 2 * x = x
⊢ ∀x. x ≠ 0 ⇒ 0 / x = 0
⊢ ∀n. 0 < n ⇒ 0 pow n = 0