:: SERIES_2 semantic presentation

theorem Th1: :: SERIES_2:1
for b1 being Nat holds abs ((- 1) |^ b1) = 1
proof end;

Lemma2: for b1 being real number holds b1 |^ 3 = (b1 * b1) * b1
proof end;

Lemma3: for b1 being real number holds b1 |^ 3 = (b1 |^ 2) * b1
proof end;

Lemma4: for b1, b2 being real number holds
( 4 = 2 |^ 2 & (b1 + b2) |^ 2 = ((b1 |^ 2) + ((2 * b1) * b2)) + (b2 |^ 2) )
proof end;

Lemma5: for b1 being real number holds (b1 + 1) |^ 3 = (((b1 |^ 3) + (3 * (b1 |^ 2))) + (3 * b1)) + 1
proof end;

Lemma6: for b1 being Nat holds ((b1 * ((2 * b1) + 1)) * (((3 * (b1 |^ 2)) + (3 * b1)) - 1)) + (((b1 + 1) |^ 3) * 30) = ((b1 + 2) * ((2 * (b1 + 1)) + 1)) * (((3 * ((b1 + 1) |^ 2)) + (3 * (b1 + 1))) - 1)
proof end;

Lemma7: for b1 being real number holds
( (b1 + 1) |^ 4 = ((((b1 |^ 4) + (4 * (b1 |^ 3))) + (6 * (b1 |^ 2))) + (4 * b1)) + 1 & (b1 + 1) |^ 5 = (((((b1 |^ 5) + (5 * (b1 |^ 4))) + (10 * (b1 |^ 3))) + (10 * (b1 |^ 2))) + (5 * b1)) + 1 )
proof end;

theorem Th2: :: SERIES_2:2
for b1 being real number holds
( (b1 + 1) |^ 3 = (((b1 |^ 3) + (3 * (b1 |^ 2))) + (3 * b1)) + 1 & (b1 + 1) |^ 4 = ((((b1 |^ 4) + (4 * (b1 |^ 3))) + (6 * (b1 |^ 2))) + (4 * b1)) + 1 & (b1 + 1) |^ 5 = (((((b1 |^ 5) + (5 * (b1 |^ 4))) + (10 * (b1 |^ 3))) + (10 * (b1 |^ 2))) + (5 * b1)) + 1 ) by Lemma5, Lemma7;

Lemma8: for b1 being Nat holds
( 1 - (1 / (b1 + 2)) = (b1 + 1) / (b1 + 2) & 1 / ((b1 + 1) ! ) = (b1 + 2) / (((b1 + 1) ! ) * (b1 + 2)) )
proof end;

Lemma9: for b1 being Nat holds (1 / (b1 + 1)) - (2 / ((b1 + 1) * (b1 + 3))) = 1 / (b1 + 3)
proof end;

Lemma10: for b1 being Nat holds (1 / (b1 + 1)) - (3 / ((b1 + 1) * (b1 + 4))) = 1 / (b1 + 4)
proof end;

Lemma11: for b1 being Nat holds ((b1 |^ 2) + (3 * b1)) + 2 = (b1 + 1) * (b1 + 2)
proof end;

Lemma12: for b1 being Nat holds (((b1 * (4 * (b1 |^ 2))) + (11 * b1)) + (12 * (b1 |^ 2))) + 3 = (b1 + 1) * ((4 * ((b1 + 1) |^ 2)) - 1)
proof end;

Lemma13: for b1 being Nat holds ((b1 + 1) |^ 2) * ((2 * ((b1 + 1) |^ 2)) - 1) = ((((((b1 |^ 2) * (b1 |^ 2)) * 2) + ((12 - 1) * (b1 |^ 2))) + (8 * (b1 |^ 3))) + (6 * b1)) + 1
proof end;

Lemma14: for b1 being Nat holds (b1 + 2) * ((((b1 + 1) |^ 2) + (b1 + 1)) - 1) = (((b1 |^ 3) + (5 * (b1 |^ 2))) + (7 * b1)) + 2
proof end;

Lemma15: for b1, b2 being real number
for b3 being Real_Sequence st ( for b4 being Nat holds b3 . b4 = (b1 * b4) + b2 ) holds
for b4 being Nat holds (Partial_Sums b3) . b4 = ((((b1 * (b4 + 1)) * b4) / 2) + (b4 * b2)) + b2
proof end;

theorem Th3: :: SERIES_2:3
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = b2 ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (b2 * (b2 + 1)) / 2
proof end;

theorem Th4: :: SERIES_2:4
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = 2 * b2 ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = b2 * (b2 + 1)
proof end;

theorem Th5: :: SERIES_2:5
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = (2 * b2) + 1 ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (b2 + 1) |^ 2
proof end;

theorem Th6: :: SERIES_2:6
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = b2 * (b2 + 1) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = ((b2 * (b2 + 1)) * (b2 + 2)) / 3
proof end;

theorem Th7: :: SERIES_2:7
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = (b2 * (b2 + 1)) * (b2 + 2) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (((b2 * (b2 + 1)) * (b2 + 2)) * (b2 + 3)) / 4
proof end;

theorem Th8: :: SERIES_2:8
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = ((b2 * (b2 + 1)) * (b2 + 2)) * (b2 + 3) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = ((((b2 * (b2 + 1)) * (b2 + 2)) * (b2 + 3)) * (b2 + 4)) / 5
proof end;

theorem Th9: :: SERIES_2:9
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = 1 / (b2 * (b2 + 1)) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = 1 - (1 / (b2 + 1))
proof end;

theorem Th10: :: SERIES_2:10
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = 1 / ((b2 * (b2 + 1)) * (b2 + 2)) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (1 / 4) - (1 / ((2 * (b2 + 1)) * (b2 + 2)))
proof end;

theorem Th11: :: SERIES_2:11
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = 1 / (((b2 * (b2 + 1)) * (b2 + 2)) * (b2 + 3)) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (1 / 18) - (1 / (((3 * (b2 + 1)) * (b2 + 2)) * (b2 + 3)))
proof end;

theorem Th12: :: SERIES_2:12
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = b2 |^ 2 ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = ((b2 * (b2 + 1)) * ((2 * b2) + 1)) / 6
proof end;

theorem Th13: :: SERIES_2:13
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = ((- 1) |^ (b2 + 1)) * (b2 |^ 2) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = ((((- 1) |^ (b2 + 1)) * b2) * (b2 + 1)) / 2
proof end;

theorem Th14: :: SERIES_2:14
for b1 being Real_Sequence st ( for b2 being Nat st b2 >= 1 holds
( b1 . b2 = ((2 * b2) - 1) |^ 2 & b1 . 0 = 0 ) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = (b2 * ((4 * (b2 |^ 2)) - 1)) / 3
proof end;

theorem Th15: :: SERIES_2:15
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = b2 |^ 3 ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = ((b2 |^ 2) * ((b2 + 1) |^ 2)) / 4
proof end;

theorem Th16: :: SERIES_2:16
for b1 being Real_Sequence st ( for b2 being Nat st b2 >= 1 holds
( b1 . b2 = ((2 * b2) - 1) |^ 3 & b1 . 0 = 0 ) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = (b2 |^ 2) * ((2 * (b2 |^ 2)) - 1)
proof end;

theorem Th17: :: SERIES_2:17
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = b2 |^ 4 ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (((b2 * (b2 + 1)) * ((2 * b2) + 1)) * (((3 * (b2 |^ 2)) + (3 * b2)) - 1)) / 30
proof end;

theorem Th18: :: SERIES_2:18
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = ((- 1) |^ (b2 + 1)) * (b2 |^ 4) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (((((- 1) |^ (b2 + 1)) * b2) * (b2 + 1)) * (((b2 |^ 2) + b2) - 1)) / 2
proof end;

Lemma16: for b1 being Nat holds ((b1 |^ 2) * (((2 * (b1 |^ 2)) + (2 * b1)) - 1)) + (((b1 + 1) |^ 3) * 12) = ((b1 + 2) |^ 2) * (((2 * ((b1 + 1) |^ 2)) + (2 * (b1 + 1))) - 1)
proof end;

theorem Th19: :: SERIES_2:19
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = b2 |^ 5 ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (((b2 |^ 2) * ((b2 + 1) |^ 2)) * (((2 * (b2 |^ 2)) + (2 * b2)) - 1)) / 12
proof end;

Lemma17: for b1 being Nat holds ((b1 + 2) * ((2 * (b1 + 1)) + 1)) * ((((3 * ((b1 + 1) |^ 4)) + (6 * ((b1 + 1) |^ 3))) - (3 * (b1 + 1))) + 1) = ((((((6 * (b1 |^ 6)) + (57 * (b1 |^ 5))) + (216 * (b1 |^ 4))) + (414 * (b1 |^ 3))) + (419 * (b1 |^ 2))) + (211 * b1)) + 42
proof end;

theorem Th20: :: SERIES_2:20
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = b2 |^ 6 ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (((b2 * (b2 + 1)) * ((2 * b2) + 1)) * ((((3 * (b2 |^ 4)) + (6 * (b2 |^ 3))) - (3 * b2)) + 1)) / 42
proof end;

Lemma18: for b1 being Nat holds ((b1 + 2) |^ 2) * (((((3 * ((b1 + 1) |^ 4)) + (6 * ((b1 + 1) |^ 3))) - ((b1 + 1) |^ 2)) - (4 * (b1 + 1))) + 2) = ((b1 |^ 2) * (((((3 * (b1 |^ 4)) + (6 * (b1 |^ 3))) - (b1 |^ 2)) - (4 * b1)) + 2)) + (((b1 + 1) |^ 5) * 24)
proof end;

Lemma19: for b1 being Nat holds (2 |^ (b1 + 2)) + ((- 1) |^ (b1 + 2)) > 0
proof end;

Lemma20: for b1 being Nat holds (2 |^ (b1 + 3)) + ((- 1) |^ (b1 + 3)) > 0
proof end;

theorem Th21: :: SERIES_2:21
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = b2 |^ 7 ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (((b2 |^ 2) * ((b2 + 1) |^ 2)) * (((((3 * (b2 |^ 4)) + (6 * (b2 |^ 3))) - (b2 |^ 2)) - (4 * b2)) + 2)) / 24
proof end;

theorem Th22: :: SERIES_2:22
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = b2 * ((b2 + 1) |^ 2) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (((b2 * (b2 + 1)) * (b2 + 2)) * ((3 * b2) + 5)) / 12
proof end;

theorem Th23: :: SERIES_2:23
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = (b2 * ((b2 + 1) |^ 2)) * (b2 + 2) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = ((((b2 * (b2 + 1)) * (b2 + 2)) * (b2 + 3)) * ((2 * b2) + 3)) / 10
proof end;

theorem Th24: :: SERIES_2:24
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = (b2 * (b2 + 1)) * (2 |^ b2) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = ((2 |^ (b2 + 1)) * (((b2 |^ 2) - b2) + 2)) - 4
proof end;

theorem Th25: :: SERIES_2:25
for b1 being Real_Sequence st ( for b2 being Nat st b2 >= 1 holds
( b1 . b2 = 1 / ((b2 - 1) * (b2 + 1)) & b1 . 0 = 0 ) ) holds
for b2 being Nat st b2 >= 2 holds
(Partial_Sums b1) . b2 = ((3 / 4) - (1 / (2 * b2))) - (1 / (2 * (b2 + 1)))
proof end;

theorem Th26: :: SERIES_2:26
for b1 being Real_Sequence st ( for b2 being Nat st b2 >= 1 holds
( b1 . b2 = 1 / (((2 * b2) - 1) * ((2 * b2) + 1)) & b1 . 0 = 0 ) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = b2 / ((2 * b2) + 1)
proof end;

theorem Th27: :: SERIES_2:27
for b1 being Real_Sequence st ( for b2 being Nat st b2 >= 1 holds
( b1 . b2 = 1 / (((3 * b2) - 2) * ((3 * b2) + 1)) & b1 . 0 = 0 ) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = b2 / ((3 * b2) + 1)
proof end;

theorem Th28: :: SERIES_2:28
for b1 being Real_Sequence st ( for b2 being Nat st b2 >= 1 holds
( b1 . b2 = 1 / ((((2 * b2) - 1) * ((2 * b2) + 1)) * ((2 * b2) + 3)) & b1 . 0 = 0 ) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = (1 / 12) - (1 / ((4 * ((2 * b2) + 1)) * ((2 * b2) + 3)))
proof end;

theorem Th29: :: SERIES_2:29
for b1 being Real_Sequence st ( for b2 being Nat st b2 >= 1 holds
( b1 . b2 = 1 / ((((3 * b2) - 2) * ((3 * b2) + 1)) * ((3 * b2) + 4)) & b1 . 0 = 0 ) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = (1 / 24) - (1 / ((6 * ((3 * b2) + 1)) * ((3 * b2) + 4)))
proof end;

theorem Th30: :: SERIES_2:30
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = ((2 * b2) - 1) / ((b2 * (b2 + 1)) * (b2 + 2)) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = ((3 / 4) - (2 / (b2 + 2))) + (1 / ((2 * (b2 + 1)) * (b2 + 2)))
proof end;

theorem Th31: :: SERIES_2:31
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = (b2 + 2) / ((b2 * (b2 + 1)) * (b2 + 3)) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = (((29 / 36) - (1 / (b2 + 3))) - (3 / ((2 * (b2 + 2)) * (b2 + 3)))) - (4 / (((3 * (b2 + 1)) * (b2 + 2)) * (b2 + 3)))
proof end;

theorem Th32: :: SERIES_2:32
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = ((b2 + 1) * (2 |^ b2)) / ((b2 + 2) * (b2 + 3)) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = ((2 |^ (b2 + 1)) / (b2 + 3)) - (1 / 2)
proof end;

theorem Th33: :: SERIES_2:33
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = ((b2 |^ 2) * (4 |^ b2)) / ((b2 + 1) * (b2 + 2)) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = (2 / 3) + (((b2 - 1) * (4 |^ (b2 + 1))) / (3 * (b2 + 2)))
proof end;

theorem Th34: :: SERIES_2:34
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = (b2 + 2) / ((b2 * (b2 + 1)) * (2 |^ b2)) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = 1 - (1 / ((b2 + 1) * (2 |^ b2)))
proof end;

theorem Th35: :: SERIES_2:35
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = ((2 * b2) + 3) / ((b2 * (b2 + 1)) * (3 |^ b2)) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = 1 - (1 / ((b2 + 1) * (3 |^ b2)))
proof end;

theorem Th36: :: SERIES_2:36
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = (((- 1) |^ b2) * (2 |^ (b2 + 1))) / (((2 |^ (b2 + 1)) + ((- 1) |^ (b2 + 1))) * ((2 |^ (b2 + 2)) + ((- 1) |^ (b2 + 2)))) ) holds
for b2 being Nat holds (Partial_Sums b1) . b2 = (1 / 3) + (((- 1) |^ (b2 + 2)) / (3 * ((2 |^ (b2 + 2)) + ((- 1) |^ (b2 + 2)))))
proof end;

theorem Th37: :: SERIES_2:37
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = (b2 ! ) * b2 ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = ((b2 + 1) ! ) - 1
proof end;

theorem Th38: :: SERIES_2:38
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = b2 / ((b2 + 1) ! ) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = 1 - (1 / ((b2 + 1) ! ))
proof end;

theorem Th39: :: SERIES_2:39
for b1 being Real_Sequence st ( for b2 being Nat st b2 >= 1 holds
( b1 . b2 = (((b2 |^ 2) + b2) - 1) / ((b2 + 2) ! ) & b1 . 0 = 0 ) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = (1 / 2) - ((b2 + 1) / ((b2 + 2) ! ))
proof end;

theorem Th40: :: SERIES_2:40
for b1 being Real_Sequence st ( for b2 being Nat holds b1 . b2 = (b2 * (2 |^ b2)) / ((b2 + 2) ! ) ) holds
for b2 being Nat st b2 >= 1 holds
(Partial_Sums b1) . b2 = 1 - ((2 |^ (b2 + 1)) / ((b2 + 2) ! ))
proof end;

theorem Th41: :: SERIES_2:41
for b1, b2 being real number
for b3 being Real_Sequence st ( for b4 being Nat holds b3 . b4 = (b1 * b4) + b2 ) holds
for b4 being Nat holds (Partial_Sums b3) . b4 = ((((b1 * (b4 + 1)) * b4) / 2) + (b4 * b2)) + b2 by Lemma15;

theorem Th42: :: SERIES_2:42
for b1, b2 being real number
for b3 being Real_Sequence st ( for b4 being Nat holds b3 . b4 = (b1 * b4) + b2 ) holds
for b4 being Nat holds (Partial_Sums b3) . b4 = ((b4 + 1) * ((b3 . 0) + (b3 . b4))) / 2
proof end;