Beginning of Section Alg
L12
Variable extension_tag : set
L13
Let ctag : setsetλalpha ⇒ SetAdjoin alpha extension_tag
Notation. We use '' as a postfix operator with priority 100 corresponding to applying term ctag.
L16
Definition. We define pair_tag to be λx y ⇒ x{u ''|u ∈ y} of type setsetset.
L17
Variable F : setprop
L18
Hypothesis extension_tag_fresh : ∀x, F x∀ux, extension_tagu
L19
Axiom. (ctagged_notin_F) We take the following as an axiom:
∀x y, F x(y '')x
L20
Axiom. (ctagged_eqE_Subq) We take the following as an axiom:
∀x y, F x∀ux, ∀v, u '' = v ''u v
L21
Axiom. (ctagged_eqE_eq) We take the following as an axiom:
∀x y, F xF y∀ux, ∀vy, u '' = v ''u = v
L22
Axiom. (pair_tag_prop_1_Subq) We take the following as an axiom:
∀x1 y1 x2 y2, F x1pair_tag x1 y1 = pair_tag x2 y2x1 x2
L23
Axiom. (pair_tag_prop_1) We take the following as an axiom:
∀x1 y1 x2 y2, F x1F x2pair_tag x1 y1 = pair_tag x2 y2x1 = x2
L24
Axiom. (pair_tag_prop_2_Subq) We take the following as an axiom:
∀x1 y1 x2 y2, F y1F x2F y2pair_tag x1 y1 = pair_tag x2 y2y1 y2
L25
Axiom. (pair_tag_prop_2) We take the following as an axiom:
∀x1 y1 x2 y2, F x1F y1F x2F y2pair_tag x1 y1 = pair_tag x2 y2y1 = y2
L26
Axiom. (pair_tag_0) We take the following as an axiom:
∀x, pair_tag x 0 = x
Primitive. The name CD_carr is a term of type setprop.
L29
Axiom. (CD_carr_I) We take the following as an axiom:
∀x y, F xF yCD_carr (pair_tag x y)
L30
Axiom. (CD_carr_E) We take the following as an axiom:
∀z, CD_carr z∀p : setprop, (∀x y, F xF yz = pair_tag x yp (pair_tag x y))p z
L31
Axiom. (CD_carr_0ext) We take the following as an axiom:
F 0∀x, F xCD_carr x
L32
Definition. We define CD_proj0 to be λz ⇒ Eps_i (λx ⇒ F x∃y, F yz = pair_tag x y) of type setset.
L33
Definition. We define CD_proj1 to be λz ⇒ Eps_i (λy ⇒ F yz = pair_tag (CD_proj0 z) y) of type setset.
L34
Let proj0 ≝ CD_proj0
L35
Let proj1 ≝ CD_proj1
L36
Let pa : setsetsetpair_tag
L37
Axiom. (CD_proj0_1) We take the following as an axiom:
∀z, CD_carr zF (proj0 z)∃y, F yz = pa (proj0 z) y
L38
Axiom. (CD_proj0_2) We take the following as an axiom:
∀x y, F xF yproj0 (pa x y) = x
L39
Axiom. (CD_proj1_1) We take the following as an axiom:
∀z, CD_carr zF (proj1 z)z = pa (proj0 z) (proj1 z)
L40
Axiom. (CD_proj1_2) We take the following as an axiom:
∀x y, F xF yproj1 (pa x y) = y
L41
Axiom. (CD_proj0R) We take the following as an axiom:
∀z, CD_carr zF (proj0 z)
L42
Axiom. (CD_proj1R) We take the following as an axiom:
∀z, CD_carr zF (proj1 z)
L43
Axiom. (CD_proj0proj1_eta) We take the following as an axiom:
∀z, CD_carr zz = pa (proj0 z) (proj1 z)
L44
Axiom. (CD_proj0proj1_split) We take the following as an axiom:
∀z w, CD_carr zCD_carr wproj0 z = proj0 wproj1 z = proj1 wz = w
L45
Axiom. (CD_proj0_F) We take the following as an axiom:
F 0∀x, F xCD_proj0 x = x
L46
Axiom. (CD_proj1_F) We take the following as an axiom:
F 0∀x, F xCD_proj1 x = 0
Beginning of Section CD_minus_conj
L48
Variable minus : setset
L50
Definition. We define CD_minus to be λz ⇒ pa (- proj0 z) (- proj1 z) of type setset.
L52
Variable conj : setset
L53
Definition. We define CD_conj to be λz ⇒ pa (conj (proj0 z)) (- proj1 z) of type setset.
End of Section CD_minus_conj
Beginning of Section CD_add
L56
Variable add : setsetset
L58
Definition. We define CD_add to be λz w ⇒ pa (proj0 z + proj0 w) (proj1 z + proj1 w) of type setsetset.
End of Section CD_add
Beginning of Section CD_mul
L61
Variable minus : setset
L62
Variable conj : setset
L63
Variable add : setsetset
L64
Variable mul : setsetset
L68
Definition. We define CD_mul to be λz w ⇒ pa (proj0 z * proj0 w + - conj (proj1 w) * proj1 z) (proj1 w * proj0 z + proj1 z * conj (proj0 w)) of type setsetset.
L70
Definition. We define CD_exp_nat to be λz m ⇒ nat_primrec 1 (λ_ r ⇒ z r) m of type setsetset.
End of Section CD_mul
Beginning of Section CD_minus_conj_clos
L73
Variable minus : setset
L76
Hypothesis F_minus : ∀x, F xF (- x)
L77
Axiom. (CD_minus_CD) We take the following as an axiom:
∀z, CD_carr zCD_carr (:-: z)
L78
Axiom. (CD_minus_proj0) We take the following as an axiom:
∀z, CD_carr zproj0 (:-: z) = - proj0 z
L79
Axiom. (CD_minus_proj1) We take the following as an axiom:
∀z, CD_carr zproj1 (:-: z) = - proj1 z
L80
Variable conj : setset
L82
Hypothesis F_conj : ∀x, F xF (conj x)
L83
Axiom. (CD_conj_CD) We take the following as an axiom:
∀z, CD_carr zCD_carr (z ')
L84
Axiom. (CD_conj_proj0) We take the following as an axiom:
∀z, CD_carr zproj0 (z ') = conj (proj0 z)
L85
Axiom. (CD_conj_proj1) We take the following as an axiom:
∀z, CD_carr zproj1 (z ') = - proj1 z
End of Section CD_minus_conj_clos
Beginning of Section CD_add_clos
L88
Variable add : setsetset
L91
Hypothesis F_add : ∀x y, F xF yF (x + y)
L92
Axiom. (CD_add_CD) We take the following as an axiom:
∀z w, CD_carr zCD_carr wCD_carr (z + w)
L93
Axiom. (CD_add_proj0) We take the following as an axiom:
∀z w, CD_carr zCD_carr wproj0 (z + w) = proj0 z + proj0 w
L94
Axiom. (CD_add_proj1) We take the following as an axiom:
∀z w, CD_carr zCD_carr wproj1 (z + w) = proj1 z + proj1 w
End of Section CD_add_clos
Beginning of Section CD_mul_clos
L97
Variable minus : setset
L98
Variable conj : setset
L99
Variable add : setsetset
L100
Variable mul : setsetset
L108
Hypothesis F_minus : ∀x, F xF (- x)
L109
Hypothesis F_conj : ∀x, F xF (conj x)
L110
Hypothesis F_add : ∀x y, F xF yF (x + y)
L111
Hypothesis F_mul : ∀x y, F xF yF (x * y)
L112
Axiom. (CD_mul_CD) We take the following as an axiom:
∀z w, CD_carr zCD_carr wCD_carr (z w)
L113
Axiom. (CD_mul_proj0) We take the following as an axiom:
∀z w, CD_carr zCD_carr wproj0 (z w) = proj0 z * proj0 w + - conj (proj1 w) * proj1 z
L114
Axiom. (CD_mul_proj1) We take the following as an axiom:
∀z w, CD_carr zCD_carr wproj1 (z w) = proj1 w * proj0 z + proj1 z * conj (proj0 w)
End of Section CD_mul_clos
Beginning of Section CD_minus_conj_F
L117
Variable minus : setset
L120
Hypothesis F_0 : F 0
L121
Hypothesis F_minus_0 : - 0 = 0
L122
Axiom. (CD_minus_F_eq) We take the following as an axiom:
∀x, F x:-: x = - x
L123
Variable conj : setset
L125
Axiom. (CD_conj_F_eq) We take the following as an axiom:
∀x, F xx ' = conj x
End of Section CD_minus_conj_F
Beginning of Section CD_add_F
L128
Variable add : setsetset
L131
Hypothesis F_0 : F 0
L132
Hypothesis F_add_0_0 : 0 + 0 = 0
L133
Axiom. (CD_add_F_eq) We take the following as an axiom:
∀x y, F xF yx + y = x + y
End of Section CD_add_F
Beginning of Section CD_mul_F
L136
Variable minus : setset
L137
Variable conj : setset
L138
Variable add : setsetset
L139
Variable mul : setsetset
L147
Hypothesis F_0 : F 0
L148
Hypothesis F_conj : ∀x, F xF (conj x)
L149
Hypothesis F_mul : ∀x y, F xF yF (x * y)
L150
Hypothesis F_minus_0 : - 0 = 0
L151
Hypothesis F_add_0R : ∀x, F xx + 0 = x
L152
Hypothesis F_mul_0L : ∀x, F x0 * x = 0
L153
Hypothesis F_mul_0R : ∀x, F xx * 0 = 0
L154
Axiom. (CD_mul_F_eq) We take the following as an axiom:
∀x y, F xF yx y = x * y
End of Section CD_mul_F
Beginning of Section CD_minus_invol
L157
Variable minus : setset
L160
Hypothesis F_minus : ∀x, F xF (- x)
L161
Hypothesis F_minus_invol : ∀x, F x- - x = x
L162
Axiom. (CD_minus_invol) We take the following as an axiom:
∀z, CD_carr z:-: :-: z = z
End of Section CD_minus_invol
Beginning of Section CD_conj_invol
L165
Variable minus : setset
L166
Variable conj : setset
L170
Hypothesis F_minus : ∀x, F xF (- x)
L171
Hypothesis F_conj : ∀x, F xF (conj x)
L172
Hypothesis F_minus_invol : ∀x, F x- - x = x
L173
Hypothesis F_conj_invol : ∀x, F xconj (conj x) = x
L174
Axiom. (CD_conj_invol) We take the following as an axiom:
∀z, CD_carr zz ' ' = z
End of Section CD_conj_invol
Beginning of Section CD_conj_minus
L177
Variable minus : setset
L178
Variable conj : setset
L182
Hypothesis F_minus : ∀x, F xF (- x)
L183
Hypothesis F_conj : ∀x, F xF (conj x)
L184
Hypothesis F_conj_minus : ∀x, F xconj (- x) = - conj x
L185
Axiom. (CD_conj_minus) We take the following as an axiom:
∀z, CD_carr z(:-: z) ' = :-: (z ')
End of Section CD_conj_minus
Beginning of Section CD_minus_add
L188
Variable minus : setset
L189
Variable add : setsetset
L194
Hypothesis F_minus : ∀x, F xF (- x)
L195
Hypothesis F_add : ∀x y, F xF yF (x + y)
L196
Hypothesis F_minus_add : ∀x y, F xF y- (x + y) = - x + - y
L197
Axiom. (CD_minus_add) We take the following as an axiom:
∀z w, CD_carr zCD_carr w:-: (z + w) = :-: z + :-: w
End of Section CD_minus_add
Beginning of Section CD_conj_add
L200
Variable minus : setset
L201
Variable conj : setset
L202
Variable add : setsetset
L208
Hypothesis F_minus : ∀x, F xF (- x)
L209
Hypothesis F_conj : ∀x, F xF (conj x)
L210
Hypothesis F_add : ∀x y, F xF yF (x + y)
L211
Hypothesis F_minus_add : ∀x y, F xF y- (x + y) = - x + - y
L212
Hypothesis F_conj_add : ∀x y, F xF yconj (x + y) = conj x + conj y
L213
Axiom. (CD_conj_add) We take the following as an axiom:
∀z w, CD_carr zCD_carr w(z + w) ' = z ' + w '
End of Section CD_conj_add
Beginning of Section CD_add_com
L216
Variable add : setsetset
L219
Hypothesis F_add_com : ∀x y, F xF yx + y = y + x
L220
Axiom. (CD_add_com) We take the following as an axiom:
∀z w, CD_carr zCD_carr wz + w = w + z
End of Section CD_add_com
Beginning of Section CD_add_assoc
L223
Variable add : setsetset
L226
Hypothesis F_add : ∀x y, F xF yF (x + y)
L227
Hypothesis F_add_assoc : ∀x y z, F xF yF z(x + y) + z = x + (y + z)
L228
Axiom. (CD_add_assoc) We take the following as an axiom:
∀z w u, CD_carr zCD_carr wCD_carr u(z + w) + u = z + (w + u)
End of Section CD_add_assoc
Beginning of Section CD_add_0R
L231
Variable add : setsetset
L234
Hypothesis F_0 : F 0
L235
Hypothesis F_add_0R : ∀x, F xx + 0 = x
L236
Axiom. (CD_add_0R) We take the following as an axiom:
∀z, CD_carr zz + 0 = z
End of Section CD_add_0R
Beginning of Section CD_add_0L
L239
Variable add : setsetset
L242
Hypothesis F_0 : F 0
L243
Hypothesis F_add_0L : ∀x, F x0 + x = x
L244
Axiom. (CD_add_0L) We take the following as an axiom:
∀z, CD_carr z0 + z = z
End of Section CD_add_0L
Beginning of Section CD_add_minus_linv
L247
Variable minus : setset
L248
Variable add : setsetset
L253
Hypothesis F_minus : ∀x, F xF (- x)
L254
Hypothesis F_add_minus_linv : ∀x, F x- x + x = 0
L255
Axiom. (CD_add_minus_linv) We take the following as an axiom:
∀z, CD_carr z:-: z + z = 0
End of Section CD_add_minus_linv
Beginning of Section CD_add_minus_rinv
L258
Variable minus : setset
L259
Variable add : setsetset
L264
Hypothesis F_minus : ∀x, F xF (- x)
L265
Hypothesis F_add_minus_rinv : ∀x, F xx + - x = 0
L266
Axiom. (CD_add_minus_rinv) We take the following as an axiom:
∀z, CD_carr zz + :-: z = 0
End of Section CD_add_minus_rinv
Beginning of Section CD_mul_0R
L269
Variable minus : setset
L270
Variable conj : setset
L271
Variable add : setsetset
L272
Variable mul : setsetset
L280
Hypothesis F_0 : F 0
L281
Hypothesis F_minus_0 : - 0 = 0
L282
Hypothesis F_conj_0 : conj 0 = 0
L283
Hypothesis F_add_0_0 : 0 + 0 = 0
L284
Hypothesis F_mul_0L : ∀x, F x0 * x = 0
L285
Hypothesis F_mul_0R : ∀x, F xx * 0 = 0
L286
Axiom. (CD_mul_0R) We take the following as an axiom:
∀z, CD_carr zz 0 = 0
End of Section CD_mul_0R
Beginning of Section CD_mul_0L
L289
Variable minus : setset
L290
Variable conj : setset
L291
Variable add : setsetset
L292
Variable mul : setsetset
L300
Hypothesis F_0 : F 0
L301
Hypothesis F_conj : ∀x, F xF (conj x)
L302
Hypothesis F_minus_0 : - 0 = 0
L303
Hypothesis F_add_0_0 : 0 + 0 = 0
L304
Hypothesis F_mul_0L : ∀x, F x0 * x = 0
L305
Hypothesis F_mul_0R : ∀x, F xx * 0 = 0
L306
Axiom. (CD_mul_0L) We take the following as an axiom:
∀z, CD_carr z0 z = 0
End of Section CD_mul_0L
Beginning of Section CD_mul_1R
L309
Variable minus : setset
L310
Variable conj : setset
L311
Variable add : setsetset
L312
Variable mul : setsetset
L320
Hypothesis F_0 : F 0
L321
Hypothesis F_1 : F 1
L322
Hypothesis F_minus_0 : - 0 = 0
L323
Hypothesis F_conj_0 : conj 0 = 0
L324
Hypothesis F_conj_1 : conj 1 = 1
L325
Hypothesis F_add_0L : ∀x, F x0 + x = x
L326
Hypothesis F_add_0R : ∀x, F xx + 0 = x
L327
Hypothesis F_mul_0L : ∀x, F x0 * x = 0
L328
Hypothesis F_mul_1R : ∀x, F xx * 1 = x
L329
Axiom. (CD_mul_1R) We take the following as an axiom:
∀z, CD_carr zz 1 = z
End of Section CD_mul_1R
Beginning of Section CD_mul_1L
L332
Variable minus : setset
L333
Variable conj : setset
L334
Variable add : setsetset
L335
Variable mul : setsetset
L343
Hypothesis F_0 : F 0
L344
Hypothesis F_1 : F 1
L345
Hypothesis F_conj : ∀x, F xF (conj x)
L346
Hypothesis F_minus_0 : - 0 = 0
L347
Hypothesis F_add_0R : ∀x, F xx + 0 = x
L348
Hypothesis F_mul_0L : ∀x, F x0 * x = 0
L349
Hypothesis F_mul_0R : ∀x, F xx * 0 = 0
L350
Hypothesis F_mul_1L : ∀x, F x1 * x = x
L351
Hypothesis F_mul_1R : ∀x, F xx * 1 = x
L352
Axiom. (CD_mul_1L) We take the following as an axiom:
∀z, CD_carr z1 z = z
End of Section CD_mul_1L
Beginning of Section CD_conj_mul
L355
Variable minus : setset
L356
Variable conj : setset
L357
Variable add : setsetset
L358
Variable mul : setsetset
L366
Hypothesis F_minus : ∀x, F xF (- x)
L367
Hypothesis F_conj : ∀x, F xF (conj x)
L368
Hypothesis F_add : ∀x y, F xF yF (x + y)
L369
Hypothesis F_mul : ∀x y, F xF yF (x * y)
L370
Hypothesis F_minus_invol : ∀x, F x- - x = x
L371
Hypothesis F_conj_invol : ∀x, F xconj (conj x) = x
L372
Hypothesis F_conj_minus : ∀x, F xconj (- x) = - conj x
L373
Hypothesis F_conj_add : ∀x y, F xF yconj (x + y) = conj x + conj y
L374
Hypothesis F_minus_add : ∀x y, F xF y- (x + y) = - x + - y
L375
Hypothesis F_add_com : ∀x y, F xF yx + y = y + x
L376
Hypothesis F_conj_mul : ∀x y, F xF yconj (x * y) = conj y * conj x
L377
Hypothesis F_minus_mul_distrR : ∀x y, F xF yx * (- y) = - (x * y)
L378
Hypothesis F_minus_mul_distrL : ∀x y, F xF y(- x) * y = - (x * y)
L379
Axiom. (CD_conj_mul) We take the following as an axiom:
∀z w, CD_carr zCD_carr w(z w) ' = w ' z '
End of Section CD_conj_mul
Beginning of Section CD_add_mul_distrR
L382
Variable minus : setset
L383
Variable conj : setset
L384
Variable add : setsetset
L385
Variable mul : setsetset
L393
Hypothesis F_minus : ∀x, F xF (- x)
L394
Hypothesis F_conj : ∀x, F xF (conj x)
L395
Hypothesis F_add : ∀x y, F xF yF (x + y)
L396
Hypothesis F_mul : ∀x y, F xF yF (x * y)
L397
Hypothesis F_minus_add : ∀x y, F xF y- (x + y) = - x + - y
L398
Hypothesis F_add_assoc : ∀x y z, F xF yF z(x + y) + z = x + (y + z)
L399
Hypothesis F_add_com : ∀x y, F xF yx + y = y + x
L400
Hypothesis F_add_mul_distrL : ∀x y z, F xF yF zx * (y + z) = x * y + x * z
L401
Hypothesis F_add_mul_distrR : ∀x y z, F xF yF z(x + y) * z = x * z + y * z
L402
Axiom. (CD_add_mul_distrR) We take the following as an axiom:
∀z w u, CD_carr zCD_carr wCD_carr u(z + w) u = z u + w u
End of Section CD_add_mul_distrR
Beginning of Section CD_add_mul_distrL
L405
Variable minus : setset
L406
Variable conj : setset
L407
Variable add : setsetset
L408
Variable mul : setsetset
L416
Hypothesis F_minus : ∀x, F xF (- x)
L417
Hypothesis F_conj : ∀x, F xF (conj x)
L418
Hypothesis F_add : ∀x y, F xF yF (x + y)
L419
Hypothesis F_mul : ∀x y, F xF yF (x * y)
L420
Hypothesis F_minus_add : ∀x y, F xF y- (x + y) = - x + - y
L421
Hypothesis F_conj_add : ∀x y, F xF yconj (x + y) = conj x + conj y
L422
Hypothesis F_add_assoc : ∀x y z, F xF yF z(x + y) + z = x + (y + z)
L423
Hypothesis F_add_com : ∀x y, F xF yx + y = y + x
L424
Hypothesis F_add_mul_distrL : ∀x y z, F xF yF zx * (y + z) = x * y + x * z
L425
Hypothesis F_add_mul_distrR : ∀x y z, F xF yF z(x + y) * z = x * z + y * z
L426
Axiom. (CD_add_mul_distrL) We take the following as an axiom:
∀z w u, CD_carr zCD_carr wCD_carr uz (w + u) = z w + z u
End of Section CD_add_mul_distrL
Beginning of Section CD_minus_mul_distrR
L429
Variable minus : setset
L430
Variable conj : setset
L431
Variable add : setsetset
L432
Variable mul : setsetset
L440
Hypothesis F_minus : ∀x, F xF (- x)
L441
Hypothesis F_conj : ∀x, F xF (conj x)
L442
Hypothesis F_add : ∀x y, F xF yF (x + y)
L443
Hypothesis F_mul : ∀x y, F xF yF (x * y)
L444
Hypothesis F_conj_minus : ∀x, F xconj (- x) = - conj x
L445
Hypothesis F_minus_add : ∀x y, F xF y- (x + y) = - x + - y
L446
Hypothesis F_minus_mul_distrR : ∀x y, F xF yx * (- y) = - (x * y)
L447
Hypothesis F_minus_mul_distrL : ∀x y, F xF y(- x) * y = - (x * y)
L448
Axiom. (CD_minus_mul_distrR) We take the following as an axiom:
∀z w, CD_carr zCD_carr wz (:-: w) = :-: z w
End of Section CD_minus_mul_distrR
Beginning of Section CD_minus_mul_distrL
L451
Variable minus : setset
L452
Variable conj : setset
L453
Variable add : setsetset
L454
Variable mul : setsetset
L462
Hypothesis F_minus : ∀x, F xF (- x)
L463
Hypothesis F_conj : ∀x, F xF (conj x)
L464
Hypothesis F_add : ∀x y, F xF yF (x + y)
L465
Hypothesis F_mul : ∀x y, F xF yF (x * y)
L466
Hypothesis F_minus_add : ∀x y, F xF y- (x + y) = - x + - y
L467
Hypothesis F_minus_mul_distrR : ∀x y, F xF yx * (- y) = - (x * y)
L468
Hypothesis F_minus_mul_distrL : ∀x y, F xF y(- x) * y = - (x * y)
L469
Axiom. (CD_minus_mul_distrL) We take the following as an axiom:
∀z w, CD_carr zCD_carr w(:-: z) w = :-: z w
End of Section CD_minus_mul_distrL
Beginning of Section CD_exp_nat
L472
Variable minus : setset
L473
Variable conj : setset
L474
Variable add : setsetset
L475
Variable mul : setsetset
L485
Axiom. (CD_exp_nat_0) We take the following as an axiom:
∀z, z ^ 0 = 1
L486
Axiom. (CD_exp_nat_S) We take the following as an axiom:
∀z n, nat_p nz ^ (ordsucc n) = z z ^ n
Beginning of Section CD_exp_nat_1_2
L488
Hypothesis F_0 : F 0
L489
Hypothesis F_1 : F 1
L490
Hypothesis F_minus_0 : - 0 = 0
L491
Hypothesis F_conj_0 : conj 0 = 0
L492
Hypothesis F_conj_1 : conj 1 = 1
L493
Hypothesis F_add_0L : ∀x, F x0 + x = x
L494
Hypothesis F_add_0R : ∀x, F xx + 0 = x
L495
Hypothesis F_mul_0L : ∀x, F x0 * x = 0
L496
Hypothesis F_mul_1R : ∀x, F xx * 1 = x
L497
Axiom. (CD_exp_nat_1) We take the following as an axiom:
∀z, CD_carr zz ^ 1 = z
L498
Axiom. (CD_exp_nat_2) We take the following as an axiom:
∀z, CD_carr zz ^ 2 = z z
End of Section CD_exp_nat_1_2
L500
Hypothesis F_minus : ∀x, F xF (- x)
L501
Hypothesis F_conj : ∀x, F xF (conj x)
L502
Hypothesis F_add : ∀x y, F xF yF (x + y)
L503
Hypothesis F_mul : ∀x y, F xF yF (x * y)
L504
Hypothesis F_0 : F 0
L505
Hypothesis F_1 : F 1
L506
Axiom. (CD_exp_nat_CD) We take the following as an axiom:
∀z, CD_carr z∀n, nat_p nCD_carr (z ^ n)
End of Section CD_exp_nat
End of Section Alg