let x, y, z be Element of REAL ; :: thesis: + x,(+ y,z) = + (+ x,y),z
A1:
( x in REAL+ \/ [:{0 },REAL+ :] & y in REAL+ \/ [:{0 },REAL+ :] & z in REAL+ \/ [:{0 },REAL+ :] )
by NUMBERS:def 1, XBOOLE_0:def 5;
per cases
( ( x in REAL+ & y in REAL+ & z in REAL+ ) or ( x in REAL+ & y in REAL+ & z in [:{0 },REAL+ :] ) or ( x in REAL+ & y in [:{0 },REAL+ :] & z in REAL+ ) or ( x in REAL+ & y in [:{0 },REAL+ :] & z in [:{0 },REAL+ :] ) or ( z in REAL+ & y in REAL+ & x in [:{0 },REAL+ :] ) or ( x in [:{0 },REAL+ :] & y in REAL+ & z in [:{0 },REAL+ :] ) or ( z in REAL+ & y in [:{0 },REAL+ :] & x in [:{0 },REAL+ :] ) or ( x in [:{0 },REAL+ :] & y in [:{0 },REAL+ :] & z in [:{0 },REAL+ :] ) )
by A1, XBOOLE_0:def 3;
suppose that A2:
x in REAL+
and A3:
y in REAL+
and A4:
z in REAL+
;
:: thesis: + x,(+ y,z) = + (+ x,y),zconsider y',
z' being
Element of
REAL+ such that A5:
y = y'
and A6:
z = z'
and A7:
+ y,
z = y' + z'
by A3, A4, Def2;
consider x',
yz' being
Element of
REAL+ such that A8:
x = x'
and A9:
+ y,
z = yz'
and A10:
+ x,
(+ y,z) = x' + yz'
by A2, A7, Def2;
consider x'',
y'' being
Element of
REAL+ such that A11:
x = x''
and A12:
y = y''
and A13:
+ x,
y = x'' + y''
by A2, A3, Def2;
consider xy'',
z'' being
Element of
REAL+ such that A14:
+ x,
y = xy''
and A15:
z = z''
and A16:
+ (+ x,y),
z = xy'' + z''
by A4, A13, Def2;
thus
+ x,
(+ y,z) = + (+ x,y),
z
by A5, A6, A7, A8, A9, A10, A11, A12, A13, A14, A15, A16, ARYTM_2:7;
:: thesis: verum end; suppose that A17:
x in REAL+
and A18:
y in REAL+
and A19:
z in [:{0 },REAL+ :]
;
:: thesis: + x,(+ y,z) = + (+ x,y),zconsider y',
z' being
Element of
REAL+ such that A20:
y = y'
and A21:
z = [0 ,z']
and A22:
+ y,
z = y' - z'
by A18, A19, Def2;
consider x'',
y'' being
Element of
REAL+ such that A23:
x = x''
and A24:
y = y''
and A25:
+ x,
y = x'' + y''
by A17, A18, Def2;
consider xy'',
z'' being
Element of
REAL+ such that A26:
+ x,
y = xy''
and A27:
z = [0 ,z'']
and A28:
+ (+ x,y),
z = xy'' - z''
by A19, A25, Def2;
A29:
z' = z''
by A21, A27, ZFMISC_1:33;
now per cases
( z' <=' y' or not z' <=' y' )
;
suppose A30:
z' <=' y'
;
:: thesis: + x,(+ y,z) = + (+ x,y),zthen A31:
+ y,
z = y' -' z'
by A22, ARYTM_1:def 2;
then consider x',
yz' being
Element of
REAL+ such that A32:
x = x'
and A33:
+ y,
z = yz'
and A34:
+ x,
(+ y,z) = x' + yz'
by A17, Def2;
thus
+ x,
(+ y,z) = + (+ x,y),
z
by A20, A23, A24, A25, A26, A28, A29, A30, A31, A32, A33, A34, ARYTM_1:20;
:: thesis: verum end; suppose A35:
not
z' <=' y'
;
:: thesis: + x,(+ y,z) = + (+ x,y),zthen A36:
+ y,
z = [0 ,(z' -' y')]
by A22, ARYTM_1:def 2;
then
+ y,
z in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then consider x',
yz' being
Element of
REAL+ such that A37:
x = x'
and A38:
+ y,
z = [0 ,yz']
and A39:
+ x,
(+ y,z) = x' - yz'
by A17, Def2;
thus + x,
(+ y,z) =
x' - (z' -' y')
by A36, A38, A39, ZFMISC_1:33
.=
+ (+ x,y),
z
by A20, A23, A24, A25, A26, A28, A29, A35, A37, ARYTM_1:21
;
:: thesis: verum end; end; end; hence
+ x,
(+ y,z) = + (+ x,y),
z
;
:: thesis: verum end; suppose that A40:
x in REAL+
and A41:
y in [:{0 },REAL+ :]
and A42:
z in REAL+
;
:: thesis: + x,(+ y,z) = + (+ x,y),zconsider z',
y' being
Element of
REAL+ such that A43:
z = z'
and A44:
y = [0 ,y']
and A45:
+ y,
z = z' - y'
by A41, A42, Def2;
consider x'',
y'' being
Element of
REAL+ such that A46:
x = x''
and A47:
y = [0 ,y'']
and A48:
+ x,
y = x'' - y''
by A40, A41, Def2;
A49:
y' = y''
by A44, A47, ZFMISC_1:33;
now per cases
( ( y' <=' x'' & y' <=' z' ) or ( y' <=' x'' & not y' <=' z' ) or ( not y' <=' x'' & y' <=' z' ) or ( not y' <=' x'' & not y' <=' z' ) )
;
suppose that A50:
y' <=' x''
and A51:
y' <=' z'
;
:: thesis: + x,(+ y,z) = + (+ x,y),zA52:
+ y,
z = z' -' y'
by A45, A51, ARYTM_1:def 2;
then consider x',
yz' being
Element of
REAL+ such that A53:
x = x'
and A54:
+ y,
z = yz'
and A55:
+ x,
(+ y,z) = x' + yz'
by A40, Def2;
A56:
+ x,
y = x' -' y'
by A46, A48, A49, A50, A53, ARYTM_1:def 2;
then consider z'',
xy'' being
Element of
REAL+ such that A57:
z = z''
and A58:
+ x,
y = xy''
and A59:
+ z,
(+ x,y) = z'' + xy''
by A42, Def2;
thus
+ x,
(+ y,z) = + (+ x,y),
z
by A43, A46, A50, A51, A52, A53, A54, A55, A56, A57, A58, A59, ARYTM_1:12;
:: thesis: verum end; suppose that A60:
y' <=' x''
and A61:
not
y' <=' z'
;
:: thesis: + x,(+ y,z) = + (+ x,y),zA62:
+ y,
z = [0 ,(y' -' z')]
by A45, A61, ARYTM_1:def 2;
then
+ y,
z in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then consider x',
yz' being
Element of
REAL+ such that A63:
x = x'
and A64:
+ y,
z = [0 ,yz']
and A65:
+ x,
(+ y,z) = x' - yz'
by A40, Def2;
A66:
+ x,
y = x'' -' y'
by A48, A49, A60, ARYTM_1:def 2;
then consider z'',
xy'' being
Element of
REAL+ such that A67:
z = z''
and A68:
+ x,
y = xy''
and A69:
+ z,
(+ x,y) = z'' + xy''
by A42, Def2;
thus + x,
(+ y,z) =
x' - (y' -' z')
by A62, A64, A65, ZFMISC_1:33
.=
+ (+ x,y),
z
by A43, A46, A60, A61, A63, A66, A67, A68, A69, ARYTM_1:22
;
:: thesis: verum end; suppose that A70:
not
y' <=' x''
and A71:
y' <=' z'
;
:: thesis: + x,(+ y,z) = + (+ x,y),zA72:
+ y,
x = [0 ,(y' -' x'')]
by A48, A49, A70, ARYTM_1:def 2;
then
+ y,
x in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then consider z'',
yx'' being
Element of
REAL+ such that A73:
z = z''
and A74:
+ y,
x = [0 ,yx'']
and A75:
+ z,
(+ y,x) = z'' - yx''
by A42, Def2;
A76:
+ z,
y = z' -' y'
by A45, A71, ARYTM_1:def 2;
then consider x',
zy'' being
Element of
REAL+ such that A77:
x = x'
and A78:
+ z,
y = zy''
and A79:
+ x,
(+ z,y) = x' + zy''
by A40, Def2;
thus + x,
(+ y,z) =
z'' - (y' -' x'')
by A43, A46, A70, A71, A73, A76, A77, A78, A79, ARYTM_1:22
.=
+ (+ x,y),
z
by A72, A74, A75, ZFMISC_1:33
;
:: thesis: verum end; suppose that A80:
not
y' <=' x''
and A81:
not
y' <=' z'
;
:: thesis: + x,(+ y,z) = + (+ x,y),zA82:
+ y,
x = [0 ,(y' -' x'')]
by A48, A49, A80, ARYTM_1:def 2;
then
+ y,
x in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then consider z'',
yx'' being
Element of
REAL+ such that A83:
z = z''
and A84:
+ y,
x = [0 ,yx'']
and A85:
+ z,
(+ y,x) = z'' - yx''
by A42, Def2;
A86:
+ y,
z = [0 ,(y' -' z')]
by A45, A81, ARYTM_1:def 2;
then
+ y,
z in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then consider x',
yz' being
Element of
REAL+ such that A87:
x = x'
and A88:
+ y,
z = [0 ,yz']
and A89:
+ x,
(+ y,z) = x' - yz'
by A40, Def2;
thus + x,
(+ y,z) =
x' - (y' -' z')
by A86, A88, A89, ZFMISC_1:33
.=
z'' - (y' -' x'')
by A43, A46, A80, A81, A83, A87, ARYTM_1:23
.=
+ (+ x,y),
z
by A82, A84, A85, ZFMISC_1:33
;
:: thesis: verum end; end; end; hence
+ x,
(+ y,z) = + (+ x,y),
z
;
:: thesis: verum end; suppose that A90:
x in REAL+
and A91:
y in [:{0 },REAL+ :]
and A92:
z in [:{0 },REAL+ :]
;
:: thesis: + x,(+ y,z) = + (+ x,y),z
( ( not
z in REAL+ or not
y in REAL+ ) & ( not
z in REAL+ or not
y in [:{0 },REAL+ :] ) & ( not
y in REAL+ or not
z in [:{0 },REAL+ :] ) )
by A91, A92, Th5, XBOOLE_0:3;
then consider y',
z' being
Element of
REAL+ such that A93:
y = [0 ,y']
and A94:
z = [0 ,z']
and A95:
+ y,
z = [0 ,(y' + z')]
by Def2;
consider x'',
y'' being
Element of
REAL+ such that A96:
x = x''
and A97:
y = [0 ,y'']
and A98:
+ x,
y = x'' - y''
by A90, A91, Def2;
+ y,
z in [:{0 },REAL+ :]
by A95, Lm1, ZFMISC_1:106;
then consider x',
yz' being
Element of
REAL+ such that A99:
x = x'
and A100:
+ y,
z = [0 ,yz']
and A101:
+ x,
(+ y,z) = x' - yz'
by A90, Def2;
A102:
y' = y''
by A93, A97, ZFMISC_1:33;
now per cases
( y'' <=' x'' or not y'' <=' x'' )
;
suppose A103:
y'' <=' x''
;
:: thesis: + x,(+ y,z) = + (+ x,y),zthen A104:
+ x,
y = x'' -' y''
by A98, ARYTM_1:def 2;
then consider xy'',
z'' being
Element of
REAL+ such that A105:
+ x,
y = xy''
and A106:
z = [0 ,z'']
and A107:
+ (+ x,y),
z = xy'' - z''
by A92, Def2;
A108:
z' = z''
by A94, A106, ZFMISC_1:33;
thus + x,
(+ y,z) =
x' - (y' + z')
by A95, A100, A101, ZFMISC_1:33
.=
+ (+ x,y),
z
by A96, A99, A102, A103, A104, A105, A107, A108, ARYTM_1:24
;
:: thesis: verum end; suppose A109:
not
y'' <=' x''
;
:: thesis: + x,(+ y,z) = + (+ x,y),zthen A110:
+ x,
y = [0 ,(y'' -' x'')]
by A98, ARYTM_1:def 2;
then
+ x,
y in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then
( ( not
z in REAL+ or not
+ x,
y in REAL+ ) & ( not
z in REAL+ or not
+ x,
y in [:{0 },REAL+ :] ) & ( not
+ x,
y in REAL+ or not
z in [:{0 },REAL+ :] ) )
by A92, Th5, XBOOLE_0:3;
then consider xy'',
z'' being
Element of
REAL+ such that A111:
+ x,
y = [0 ,xy'']
and A112:
z = [0 ,z'']
and A113:
+ (+ x,y),
z = [0 ,(xy'' + z'')]
by Def2;
A114:
z' = z''
by A94, A112, ZFMISC_1:33;
A115:
yz' = z' + y'
by A95, A100, ZFMISC_1:33;
then
y'' <=' yz'
by A102, ARYTM_2:20;
then
not
yz' <=' x'
by A96, A99, A109, ARYTM_1:3;
hence + x,
(+ y,z) =
[0 ,((z' + y') -' x')]
by A101, A115, ARYTM_1:def 2
.=
[0 ,(z'' + (y'' -' x''))]
by A96, A99, A102, A109, A114, ARYTM_1:13
.=
+ (+ x,y),
z
by A110, A111, A113, ZFMISC_1:33
;
:: thesis: verum end; end; end; hence
+ x,
(+ y,z) = + (+ x,y),
z
;
:: thesis: verum end; suppose that A116:
z in REAL+
and A117:
y in REAL+
and A118:
x in [:{0 },REAL+ :]
;
:: thesis: + x,(+ y,z) = + (+ x,y),zconsider y',
x' being
Element of
REAL+ such that A119:
y = y'
and A120:
x = [0 ,x']
and A121:
+ y,
x = y' - x'
by A117, A118, Def2;
consider z'',
y'' being
Element of
REAL+ such that A122:
z = z''
and A123:
y = y''
and A124:
+ z,
y = z'' + y''
by A116, A117, Def2;
consider zy'',
x'' being
Element of
REAL+ such that A125:
+ z,
y = zy''
and A126:
x = [0 ,x'']
and A127:
+ (+ z,y),
x = zy'' - x''
by A118, A124, Def2;
A128:
x' = x''
by A120, A126, ZFMISC_1:33;
now per cases
( x' <=' y' or not x' <=' y' )
;
suppose A129:
x' <=' y'
;
:: thesis: + z,(+ y,x) = + (+ z,y),xthen A130:
+ y,
x = y' -' x'
by A121, ARYTM_1:def 2;
then consider z',
yx' being
Element of
REAL+ such that A131:
z = z'
and A132:
+ y,
x = yx'
and A133:
+ z,
(+ y,x) = z' + yx'
by A116, Def2;
thus
+ z,
(+ y,x) = + (+ z,y),
x
by A119, A122, A123, A124, A125, A127, A128, A129, A130, A131, A132, A133, ARYTM_1:20;
:: thesis: verum end; suppose A134:
not
x' <=' y'
;
:: thesis: + z,(+ y,x) = + (+ z,y),xthen A135:
+ y,
x = [0 ,(x' -' y')]
by A121, ARYTM_1:def 2;
then
+ y,
x in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then consider z',
yx' being
Element of
REAL+ such that A136:
z = z'
and A137:
+ y,
x = [0 ,yx']
and A138:
+ z,
(+ y,x) = z' - yx'
by A116, Def2;
thus + z,
(+ y,x) =
z' - (x' -' y')
by A135, A137, A138, ZFMISC_1:33
.=
+ (+ z,y),
x
by A119, A122, A123, A124, A125, A127, A128, A134, A136, ARYTM_1:21
;
:: thesis: verum end; end; end; hence
+ x,
(+ y,z) = + (+ x,y),
z
;
:: thesis: verum end; suppose that A139:
x in [:{0 },REAL+ :]
and A140:
y in REAL+
and A141:
z in [:{0 },REAL+ :]
;
:: thesis: + x,(+ y,z) = + (+ x,y),zconsider y',
z' being
Element of
REAL+ such that A142:
y = y'
and A143:
z = [0 ,z']
and A144:
+ y,
z = y' - z'
by A140, A141, Def2;
consider x'',
y'' being
Element of
REAL+ such that A145:
x = [0 ,x'']
and A146:
y = y''
and A147:
+ x,
y = y'' - x''
by A139, A140, Def2;
now per cases
( ( x'' <=' y'' & z' <=' y' ) or ( not x'' <=' y'' & z' <=' y' ) or ( not z' <=' y' & x'' <=' y'' ) or ( not x'' <=' y'' & not z' <=' y' ) )
;
suppose that A148:
x'' <=' y''
and A149:
z' <=' y'
;
:: thesis: + x,(+ y,z) = + (+ x,y),zA150:
+ y,
z = y' -' z'
by A144, A149, ARYTM_1:def 2;
then consider x',
yz' being
Element of
REAL+ such that A151:
x = [0 ,x']
and A152:
+ y,
z = yz'
and A153:
+ x,
(+ y,z) = yz' - x'
by A139, Def2;
A154:
x' = x''
by A145, A151, ZFMISC_1:33;
then A155:
+ x,
y = y' -' x'
by A142, A146, A147, A148, ARYTM_1:def 2;
then consider z'',
xy'' being
Element of
REAL+ such that A156:
z = [0 ,z'']
and A157:
+ x,
y = xy''
and A158:
+ z,
(+ x,y) = xy'' - z''
by A141, Def2;
z' = z''
by A143, A156, ZFMISC_1:33;
hence
+ x,
(+ y,z) = + (+ x,y),
z
by A142, A146, A148, A149, A150, A152, A153, A154, A155, A157, A158, ARYTM_1:25;
:: thesis: verum end; suppose that A159:
not
x'' <=' y''
and A160:
z' <=' y'
;
:: thesis: + x,(+ y,z) = + (+ x,y),zA161:
+ y,
z = y' -' z'
by A144, A160, ARYTM_1:def 2;
then consider x',
yz' being
Element of
REAL+ such that A162:
x = [0 ,x']
and A163:
+ y,
z = yz'
and A164:
+ x,
(+ y,z) = yz' - x'
by A139, Def2;
A165:
x' = x''
by A145, A162, ZFMISC_1:33;
A166:
+ y,
x = [0 ,(x'' -' y'')]
by A147, A159, ARYTM_1:def 2;
then
+ y,
x in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then
( ( not
z in REAL+ or not
+ x,
y in REAL+ ) & ( not
z in REAL+ or not
+ x,
y in [:{0 },REAL+ :] ) & ( not
+ x,
y in REAL+ or not
z in [:{0 },REAL+ :] ) )
by A141, Th5, XBOOLE_0:3;
then consider z'',
yx' being
Element of
REAL+ such that A167:
z = [0 ,z'']
and A168:
+ y,
x = [0 ,yx']
and A169:
+ z,
(+ y,x) = [0 ,(z'' + yx')]
by Def2;
A170:
z' = z''
by A143, A167, ZFMISC_1:33;
yz' <=' y'
by A161, A163, ARYTM_1:11;
then
not
x' <=' yz'
by A142, A146, A159, A165, ARYTM_1:3;
hence + x,
(+ y,z) =
[0 ,(x' -' (y' -' z'))]
by A161, A163, A164, ARYTM_1:def 2
.=
[0 ,((x'' -' y'') + z'')]
by A142, A146, A159, A160, A165, A170, ARYTM_1:14
.=
+ (+ x,y),
z
by A166, A168, A169, ZFMISC_1:33
;
:: thesis: verum end; suppose that A171:
not
z' <=' y'
and A172:
x'' <=' y''
;
:: thesis: + x,(+ y,z) = + (+ x,y),zA173:
+ y,
x = y'' -' x''
by A147, A172, ARYTM_1:def 2;
then consider z'',
yx'' being
Element of
REAL+ such that A174:
z = [0 ,z'']
and A175:
+ y,
x = yx''
and A176:
+ z,
(+ y,x) = yx'' - z''
by A141, Def2;
A177:
z'' = z'
by A143, A174, ZFMISC_1:33;
A178:
+ y,
z = [0 ,(z' -' y')]
by A144, A171, ARYTM_1:def 2;
then
+ y,
z in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then
( ( not
x in REAL+ or not
+ z,
y in REAL+ ) & ( not
x in REAL+ or not
+ z,
y in [:{0 },REAL+ :] ) & ( not
+ z,
y in REAL+ or not
x in [:{0 },REAL+ :] ) )
by A139, Th5, XBOOLE_0:3;
then consider x',
yz'' being
Element of
REAL+ such that A179:
x = [0 ,x']
and A180:
+ y,
z = [0 ,yz'']
and A181:
+ x,
(+ y,z) = [0 ,(x' + yz'')]
by Def2;
A182:
x'' = x'
by A145, A179, ZFMISC_1:33;
yx'' <=' y''
by A173, A175, ARYTM_1:11;
then A183:
not
z'' <=' yx''
by A142, A146, A171, A177, ARYTM_1:3;
thus + x,
(+ y,z) =
[0 ,((z' -' y') + x')]
by A178, A180, A181, ZFMISC_1:33
.=
[0 ,(z'' -' (y'' -' x''))]
by A142, A146, A171, A172, A177, A182, ARYTM_1:14
.=
+ (+ x,y),
z
by A173, A175, A176, A183, ARYTM_1:def 2
;
:: thesis: verum end; suppose that A184:
not
x'' <=' y''
and A185:
not
z' <=' y'
;
:: thesis: + x,(+ y,z) = + (+ x,y),zA186:
+ y,
z = [0 ,(z' -' y')]
by A144, A185, ARYTM_1:def 2;
then
+ y,
z in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then
( ( not
x in REAL+ or not
+ z,
y in REAL+ ) & ( not
x in REAL+ or not
+ z,
y in [:{0 },REAL+ :] ) & ( not
+ z,
y in REAL+ or not
x in [:{0 },REAL+ :] ) )
by A139, Th5, XBOOLE_0:3;
then consider x',
yz'' being
Element of
REAL+ such that A187:
x = [0 ,x']
and A188:
+ y,
z = [0 ,yz'']
and A189:
+ x,
(+ y,z) = [0 ,(x' + yz'')]
by Def2;
A190:
+ y,
x = [0 ,(x'' -' y'')]
by A147, A184, ARYTM_1:def 2;
then
+ y,
x in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then
( ( not
z in REAL+ or not
+ x,
y in REAL+ ) & ( not
z in REAL+ or not
+ x,
y in [:{0 },REAL+ :] ) & ( not
+ x,
y in REAL+ or not
z in [:{0 },REAL+ :] ) )
by A141, Th5, XBOOLE_0:3;
then consider z'',
yx' being
Element of
REAL+ such that A191:
z = [0 ,z'']
and A192:
+ y,
x = [0 ,yx']
and A193:
+ z,
(+ y,x) = [0 ,(z'' + yx')]
by Def2;
A194:
z' = z''
by A143, A191, ZFMISC_1:33;
A195:
x' = x''
by A145, A187, ZFMISC_1:33;
thus + x,
(+ y,z) =
[0 ,((z' -' y') + x')]
by A186, A188, A189, ZFMISC_1:33
.=
[0 ,((x'' -' y'') + z'')]
by A142, A146, A184, A185, A194, A195, ARYTM_1:15
.=
+ (+ x,y),
z
by A190, A192, A193, ZFMISC_1:33
;
:: thesis: verum end; end; end; hence
+ x,
(+ y,z) = + (+ x,y),
z
;
:: thesis: verum end; suppose that A196:
z in REAL+
and A197:
y in [:{0 },REAL+ :]
and A198:
x in [:{0 },REAL+ :]
;
:: thesis: + x,(+ y,z) = + (+ x,y),z
( ( not
x in REAL+ or not
y in REAL+ ) & ( not
x in REAL+ or not
y in [:{0 },REAL+ :] ) & ( not
y in REAL+ or not
x in [:{0 },REAL+ :] ) )
by A197, A198, Th5, XBOOLE_0:3;
then consider y',
x' being
Element of
REAL+ such that A199:
y = [0 ,y']
and A200:
x = [0 ,x']
and A201:
+ y,
x = [0 ,(y' + x')]
by Def2;
consider z'',
y'' being
Element of
REAL+ such that A202:
z = z''
and A203:
y = [0 ,y'']
and A204:
+ z,
y = z'' - y''
by A196, A197, Def2;
+ y,
x in [:{0 },REAL+ :]
by A201, Lm1, ZFMISC_1:106;
then consider z',
yx' being
Element of
REAL+ such that A205:
z = z'
and A206:
+ y,
x = [0 ,yx']
and A207:
+ z,
(+ y,x) = z' - yx'
by A196, Def2;
A208:
y' = y''
by A199, A203, ZFMISC_1:33;
now per cases
( y'' <=' z'' or not y'' <=' z'' )
;
suppose A209:
y'' <=' z''
;
:: thesis: + z,(+ y,x) = + (+ z,y),xthen A210:
+ z,
y = z'' -' y''
by A204, ARYTM_1:def 2;
then consider zy'',
x'' being
Element of
REAL+ such that A211:
+ z,
y = zy''
and A212:
x = [0 ,x'']
and A213:
+ (+ z,y),
x = zy'' - x''
by A198, Def2;
A214:
x' = x''
by A200, A212, ZFMISC_1:33;
thus + z,
(+ y,x) =
z' - (y' + x')
by A201, A206, A207, ZFMISC_1:33
.=
+ (+ z,y),
x
by A202, A205, A208, A209, A210, A211, A213, A214, ARYTM_1:24
;
:: thesis: verum end; suppose A215:
not
y'' <=' z''
;
:: thesis: + z,(+ y,x) = + (+ z,y),xthen A216:
+ z,
y = [0 ,(y'' -' z'')]
by A204, ARYTM_1:def 2;
then
+ z,
y in [:{0 },REAL+ :]
by Lm1, ZFMISC_1:106;
then
( ( not
x in REAL+ or not
+ z,
y in REAL+ ) & ( not
x in REAL+ or not
+ z,
y in [:{0 },REAL+ :] ) & ( not
+ z,
y in REAL+ or not
x in [:{0 },REAL+ :] ) )
by A198, Th5, XBOOLE_0:3;
then consider zy'',
x'' being
Element of
REAL+ such that A217:
+ z,
y = [0 ,zy'']
and A218:
x = [0 ,x'']
and A219:
+ (+ z,y),
x = [0 ,(zy'' + x'')]
by Def2;
A220:
x' = x''
by A200, A218, ZFMISC_1:33;
A221:
yx' = x' + y'
by A201, A206, ZFMISC_1:33;
then
y'' <=' yx'
by A208, ARYTM_2:20;
then
not
yx' <=' z'
by A202, A205, A215, ARYTM_1:3;
hence + z,
(+ y,x) =
[0 ,((x' + y') -' z')]
by A207, A221, ARYTM_1:def 2
.=
[0 ,(x'' + (y'' -' z''))]
by A202, A205, A208, A215, A220, ARYTM_1:13
.=
+ (+ z,y),
x
by A216, A217, A219, ZFMISC_1:33
;
:: thesis: verum end; end; end; hence
+ x,
(+ y,z) = + (+ x,y),
z
;
:: thesis: verum end; suppose that A222:
x in [:{0 },REAL+ :]
and A223:
y in [:{0 },REAL+ :]
and A224:
z in [:{0 },REAL+ :]
;
:: thesis: + x,(+ y,z) = + (+ x,y),z
( ( not
z in REAL+ or not
y in REAL+ ) & ( not
z in REAL+ or not
y in [:{0 },REAL+ :] ) & ( not
y in REAL+ or not
z in [:{0 },REAL+ :] ) )
by A223, A224, Th5, XBOOLE_0:3;
then consider y',
z' being
Element of
REAL+ such that A225:
y = [0 ,y']
and A226:
z = [0 ,z']
and A227:
+ y,
z = [0 ,(y' + z')]
by Def2;
( ( not
x in REAL+ or not
y in REAL+ ) & ( not
x in REAL+ or not
y in [:{0 },REAL+ :] ) & ( not
y in REAL+ or not
x in [:{0 },REAL+ :] ) )
by A222, A223, Th5, XBOOLE_0:3;
then consider x'',
y'' being
Element of
REAL+ such that A228:
x = [0 ,x'']
and A229:
y = [0 ,y'']
and A230:
+ x,
y = [0 ,(x'' + y'')]
by Def2;
+ z,
y in [:{0 },REAL+ :]
by A227, Lm1, ZFMISC_1:106;
then
( ( not
x in REAL+ or not
+ z,
y in REAL+ ) & ( not
x in REAL+ or not
+ z,
y in [:{0 },REAL+ :] ) & ( not
+ z,
y in REAL+ or not
x in [:{0 },REAL+ :] ) )
by A222, Th5, XBOOLE_0:3;
then consider x',
yz' being
Element of
REAL+ such that A231:
x = [0 ,x']
and A232:
+ y,
z = [0 ,yz']
and A233:
+ x,
(+ y,z) = [0 ,(x' + yz')]
by Def2;
+ x,
y in [:{0 },REAL+ :]
by A230, Lm1, ZFMISC_1:106;
then
( ( not
z in REAL+ or not
+ x,
y in REAL+ ) & ( not
z in REAL+ or not
+ x,
y in [:{0 },REAL+ :] ) & ( not
+ x,
y in REAL+ or not
z in [:{0 },REAL+ :] ) )
by A224, Th5, XBOOLE_0:3;
then consider xy'',
z'' being
Element of
REAL+ such that A234:
+ x,
y = [0 ,xy'']
and A235:
z = [0 ,z'']
and A236:
+ (+ x,y),
z = [0 ,(xy'' + z'')]
by Def2;
A237:
z' = z''
by A226, A235, ZFMISC_1:33;
A238:
x' = x''
by A228, A231, ZFMISC_1:33;
A239:
y' = y''
by A225, A229, ZFMISC_1:33;
thus + x,
(+ y,z) =
[0 ,((z' + y') + x')]
by A227, A232, A233, ZFMISC_1:33
.=
[0 ,(z'' + (y'' + x''))]
by A237, A238, A239, ARYTM_2:7
.=
+ (+ x,y),
z
by A230, A234, A236, ZFMISC_1:33
;
:: thesis: verum end; end;