n

z

A = Point(yAxis)
r: y(A)
A2 = 0
B2: r
A3: A2 + 1.0
B3: B2 * r
A4: A3 + 1.0
B4: B3 * r
A5: A4 + 1.0
B5: B4 * r
A6: A5 + 1.0
B6: B5 * r
A7: A6 + 1.0
B7: B6 * r
A8: A7 + 1.0
B8: B7 * r
A9: A8 + 1.0
B9: B8 * r
A10: A9 + 1.0
B10: B9 * r
A11: A10 + 1.0
B11: B10 * r
A12: A11 + 1.0
B12: B11 * r
A13: A12 + 1.0
B13: B12 * r
A14: A13 + 1.0
B14: B13 * r
A15: A14 + 1.0
B15: B14 * r
A16: A15 + 1.0
B16: B15 * r
A17: A16 + 1.0
B17: B16 * r
A18: A17 + 1.0
B18: B17 * r
A19: A18 + 1.0
B19: B18 * r
A20: A19 + 1.0
B20: B19 * r
A21: A20 + 1.0
B21: B20 * r
A22: A21 + 1.0
B22: B21 * r
P_1: (A2, B2)
P_2: (A3, B3)
P_3: (A4, B4)
P_4: (A5, B5)
P_5: (A6, B6)
P_6: (A7, B7)
P_7: (A8, B8)
P_8: (A9, B9)
P_9: (A10, B10)
P_{10}: (A11, B11)
P_{11}: (A12, B12)
P_{12}: (A13, B13)
P_{13}: (A14, B14)
P_{14}: (A15, B15)
P_{15}: (A16, B16)
P_{16}: (A17, B17)
P_{17}: (A18, B18)
P_{18}: (A19, B19)
P_{19}: (A20, B20)
P_{20}: (A21, B21)
P_{21}: (A22, B22)
Liste1: {P_1, P_2, P_3, P_4, P_5, P_6, P_7, P_8, P_9, P_{10}, P_{11}, P_{12}, P_{13}, P_{14}, P_{15}, P_{16}, P_{17}, P_{18}, P_{19}, P_{20}, P_{21}}
Liste2 = Sequence(Segment[Element[Liste1, i], Element[Liste1, i + 1.0]], i, 0.0, 20.0)