积极 AI Logo 积极 AI

Match it! Graph & Term：线性函数图形与方程的匹配练习

Match it! Graph & Term：线性函数图形与方程的匹配练习
几何画板及绘图内容加载中，请稍等……
2025-10-15 15:09
所属专题 Homogen lineare Funktionen
这个范例演示了如何通过匹配线性函数的方程和图形来理解其几何意义。核心数学概念包括线性函数、斜率、截距以及函数与图形的对应关系。作图要点涉及使用GeoGebra命令如Sequence、Join、Shuffle、Textfield等来构建图形和方程。适合小学7-8年级学生，用于巩固函数与图形之间的联系，适用于课堂教学或自主学习。

GeoGebra 命令及参数

  1. Sequence(PStart + (k * (0, (-2 * heightPuzzle) - disPuzzleY)), k, 0, 5) → ParkLeftList
  2. Join({Shuffle[1…numberOfOptionsLeft], Sequence[k, k, numberOfOptionsLeft + 1, 6]}) → OrderLeft
  3. Join({Shuffle[1…numberOfOptionsRight], Sequence[k, k, numberOfOptionsRight + 1, 8]}) → OrderRight
  4. Sequence(MPList(k) ≟ PRList(OrderRight(IndexOf[k, OrderLeft])), k, 1, numberOfOptionsLeft) → CorrectList
  5. Shuffle(1…numberOfQuestions) → randomQuestions, {4, 1, 2, 3}
  6. Textfield(input) → inputBox
  7. Element(randomQuestions, Mod[questionCount - 1, Length[randomQuestions]] + 1) → randomQuestion
  8. Join({Sequence[Segment[Corner[4] + (RasterPixMat * ((k * RasterStepXY), 0)), Corner[4] + (RasterPixMat * ((k * RasterStepXY), RasterMaxY))], k, 0, RasterMaxX / RasterStepXY], Sequence[Segment[Corner[4] + (RasterPixMat * (0, (k * RasterStepXY))), Corner[4] + (RasterPixMat * (RasterMaxX, (k * RasterStepXY)))], k, 0, RasterMaxY / RasterStepXY]}) → RasterStrecken
  9. Join({Sequence[Text[UnicodeToLetter[65 + k], Midpoint[Corner[4] + (RasterPixMat * ((k * RasterStepXY), RasterMaxY)), Corner[4] + (RasterPixMat * (((k + 1) * RasterStepXY), RasterMaxY))], false, true, 0, -1], k, 0, RasterMaxX / RasterStepXY - 1], Sequence[Text[("" * k), Midpoint[Corner[4] + (RasterPixMat * (RasterMaxX, ((k - 1) * RasterStepXY))), Corner[4] + (RasterPixMat * (RasterMaxX, (k * RasterStepXY)))], false, true, 1, 0], k, 1, RasterMaxY / RasterStepXY]}) → RasterBeschriftung
  10. Sequence(Sequence[Corner[4] + (RasterPixMat * ((k * RasterStepXY), (m * RasterStepXY))), k, 0, RasterMaxX / RasterStepXY], m, 0, RasterMaxY / RasterStepXY) → RasterPunkte
  11. PolyLine(Join[{Sequence[PL1 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL1 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL1 + widthPuzzleLeft + lengthPuzzle), y(PL1 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL1 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL1 + widthPuzzleLeft + lengthPuzzle), y(PL1 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL1 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL1 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL1 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleLeft1
  12. Polygon(Join[{Sequence[PL1 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL1 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL1 + widthPuzzleLeft + lengthPuzzle), y(PL1 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL1 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL1 + widthPuzzleLeft + lengthPuzzle), y(PL1 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL1 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL1 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL1 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleLeft1
  13. PolyLine(Join[{Sequence[PL2 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL2 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL2 + widthPuzzleLeft + lengthPuzzle), y(PL2 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL2 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL2 + widthPuzzleLeft + lengthPuzzle), y(PL2 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL2 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL2 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL2 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleLeft2
  14. Polygon(Join[{Sequence[PL2 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL2 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL2 + widthPuzzleLeft + lengthPuzzle), y(PL2 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL2 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL2 + widthPuzzleLeft + lengthPuzzle), y(PL2 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL2 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL2 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL2 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleLeft2
  15. PolyLine(Join[{Sequence[PL3 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL3 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL3 + widthPuzzleLeft + lengthPuzzle), y(PL3 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL3 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL3 + widthPuzzleLeft + lengthPuzzle), y(PL3 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL3 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL3 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL3 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleLeft3
  16. Polygon(Join[{Sequence[PL3 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL3 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL3 + widthPuzzleLeft + lengthPuzzle), y(PL3 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL3 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL3 + widthPuzzleLeft + lengthPuzzle), y(PL3 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL3 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL3 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL3 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleLeft3
  17. PolyLine(Join[{Sequence[PL4 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL4 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL4 + widthPuzzleLeft + lengthPuzzle), y(PL4 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL4 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL4 + widthPuzzleLeft + lengthPuzzle), y(PL4 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL4 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL4 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL4 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleLeft4
  18. Polygon(Join[{Sequence[PL4 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL4 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL4 + widthPuzzleLeft + lengthPuzzle), y(PL4 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL4 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL4 + widthPuzzleLeft + lengthPuzzle), y(PL4 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL4 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL4 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL4 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleLeft4
  19. PolyLine(Join[{Sequence[PL5 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL5 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL5 + widthPuzzleLeft + lengthPuzzle), y(PL5 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL5 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL5 + widthPuzzleLeft + lengthPuzzle), y(PL5 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL5 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL5 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL5 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleLeft5
  20. Polygon(Join[{Sequence[PL5 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL5 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL5 + widthPuzzleLeft + lengthPuzzle), y(PL5 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL5 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL5 + widthPuzzleLeft + lengthPuzzle), y(PL5 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL5 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL5 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL5 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleLeft5
  21. PolyLine(Join[{Sequence[PL6 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL6 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL6 + widthPuzzleLeft + lengthPuzzle), y(PL6 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL6 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL6 + widthPuzzleLeft + lengthPuzzle), y(PL6 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL6 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL6 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL6 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleLeft6
  22. Polygon(Join[{Sequence[PL6 + ((-widthPuzzleLeft), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PL6 + (widthPuzzleLeft + lengthPuzzle, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[(x(PL6 + widthPuzzleLeft + lengthPuzzle), y(PL6 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL6 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 315, 45, -1], Sequence[(x(PL6 + widthPuzzleLeft + lengthPuzzle), y(PL6 + (widthPuzzleLeft + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PL6 + (widthPuzzleLeft + lengthPuzzle, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PL6 + ((-widthPuzzleLeft), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], {PL6 + ((-widthPuzzleLeft), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleLeft6
  23. PolyLine(Join[{Sequence[PR1 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR1 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR1 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR1 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR1 + (-widthPuzzleRight)), y(PR1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR1 + (-widthPuzzleRight)), y(PR1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR1 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleRight1
  24. Polygon(Join[{Sequence[PR1 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR1 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR1 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR1 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR1 + (-widthPuzzleRight)), y(PR1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR1 + (-widthPuzzleRight)), y(PR1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR1 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleRight1
  25. PolyLine(Join[{Sequence[PR2 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR2 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR2 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR2 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR2 + (-widthPuzzleRight)), y(PR2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR2 + (-widthPuzzleRight)), y(PR2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR2 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleRight2
  26. Polygon(Join[{Sequence[PR2 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR2 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR2 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR2 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR2 + (-widthPuzzleRight)), y(PR2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR2 + (-widthPuzzleRight)), y(PR2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR2 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleRight2
  27. PolyLine(Join[{Sequence[PR3 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR3 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR3 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR3 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR3 + (-widthPuzzleRight)), y(PR3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR3 + (-widthPuzzleRight)), y(PR3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR3 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleRight3
  28. Polygon(Join[{Sequence[PR3 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR3 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR3 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR3 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR3 + (-widthPuzzleRight)), y(PR3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR3 + (-widthPuzzleRight)), y(PR3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR3 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleRight3
  29. PolyLine(Join[{Sequence[PR4 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR4 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR4 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR4 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR4 + (-widthPuzzleRight)), y(PR4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR4 + (-widthPuzzleRight)), y(PR4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR4 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleRight4
  30. Polygon(Join[{Sequence[PR4 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR4 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR4 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR4 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR4 + (-widthPuzzleRight)), y(PR4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR4 + (-widthPuzzleRight)), y(PR4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR4 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleRight4
  31. PolyLine(Join[{Sequence[PR5 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR5 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR5 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR5 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR5 + (-widthPuzzleRight)), y(PR5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR5 + (-widthPuzzleRight)), y(PR5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR5 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleRight5
  32. Polygon(Join[{Sequence[PR5 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR5 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR5 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR5 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR5 + (-widthPuzzleRight)), y(PR5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR5 + (-widthPuzzleRight)), y(PR5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR5 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleRight5
  33. PolyLine(Join[{Sequence[PR6 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR6 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR6 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR6 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR6 + (-widthPuzzleRight)), y(PR6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR6 + (-widthPuzzleRight)), y(PR6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR6 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleRight6
  34. Polygon(Join[{Sequence[PR6 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR6 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR6 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR6 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR6 + (-widthPuzzleRight)), y(PR6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR6 + (-widthPuzzleRight)), y(PR6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR6 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleRight6
  35. PolyLine(Join[{Sequence[PR7 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR7 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR7 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR7 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR7 + (-widthPuzzleRight)), y(PR7 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR7 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR7 + (-widthPuzzleRight)), y(PR7 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR7 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleRight7
  36. Polygon(Join[{Sequence[PR7 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR7 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR7 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR7 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR7 + (-widthPuzzleRight)), y(PR7 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR7 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR7 + (-widthPuzzleRight)), y(PR7 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR7 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleRight7
  37. PolyLine(Join[{Sequence[PR8 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR8 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR8 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR8 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR8 + (-widthPuzzleRight)), y(PR8 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR8 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR8 + (-widthPuzzleRight)), y(PR8 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR8 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleRight8
  38. Polygon(Join[{Sequence[PR8 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[PR8 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[PR8 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[PR8 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(PR8 + (-widthPuzzleRight)), y(PR8 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[PR8 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(PR8 + (-widthPuzzleRight)), y(PR8 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {PR8 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleRight8
  39. Text(If[IsImageLeft(OrderLeft(IndexOf[1, OrderLeft])), "", AllTxtLeft(IndexOf[1, OrderLeft])], PL1 + (0, 0.05), false, true, 0, 0) → txtPuzzleLeft1
  40. Text(If[IsImageLeft(OrderLeft(IndexOf[2, OrderLeft])), "", AllTxtLeft(IndexOf[2, OrderLeft])], PL2 + (0, 0.05), false, true, 0, 0) → txtPuzzleLeft2
  41. Text(If[IsImageLeft(OrderLeft(IndexOf[3, OrderLeft])), "", AllTxtLeft(IndexOf[3, OrderLeft])], PL3 + (0, 0.05), false, true, 0, 0) → txtPuzzleLeft3
  42. Text(If[IsImageLeft(OrderLeft(IndexOf[4, OrderLeft])), "", AllTxtLeft(IndexOf[4, OrderLeft])], PL4 + (0, 0.05), false, true, 0, 0) → txtPuzzleLeft4
  43. Text(If[IsImageLeft(OrderLeft(IndexOf[5, OrderLeft])), "", AllTxtLeft(IndexOf[5, OrderLeft])], PL5 + (0, 0.05), false, true, 0, 0) → txtPuzzleLeft5
  44. Text(If[IsImageLeft(OrderLeft(IndexOf[6, OrderLeft])), "", AllTxtLeft(IndexOf[6, OrderLeft])], PL6 + (0, 0.05), false, true, 0, 0) → txtPuzzleLeft6
  45. Text(If[IsImageRight(OrderRight(IndexOf[1, OrderRight])), "", AllTxtRight(IndexOf[1, OrderRight])], PR1 + (0, 0.05), false, true, 0, 0) → txtPuzzleRight1
  46. Text(If[IsImageRight(OrderRight(IndexOf[2, OrderRight])), "", AllTxtRight(IndexOf[2, OrderRight])], PR2 + (0, 0.05), false, true, 0, 0) → txtPuzzleRight2
  47. Text(If[IsImageRight(OrderRight(IndexOf[3, OrderRight])), "", AllTxtRight(IndexOf[3, OrderRight])], PR3 + (0, 0.05), false, true, 0, 0) → txtPuzzleRight3
  48. Text(If[IsImageRight(OrderRight(IndexOf[4, OrderRight])), "", AllTxtRight(IndexOf[4, OrderRight])], PR4 + (0, 0.05), false, true, 0, 0) → txtPuzzleRight4
  49. Text(If[IsImageRight(OrderRight(IndexOf[5, OrderRight])), "", AllTxtRight(IndexOf[5, OrderRight])], PR5 + (0, 0.05), false, true, 0, 0) → txtPuzzleRight5
  50. Text(If[IsImageRight(OrderRight(IndexOf[6, OrderRight])), "", AllTxtRight(IndexOf[6, OrderRight])], PR6 + (0, 0.05), false, true, 0, 0) → txtPuzzleRight6
  51. Text(If[IsImageRight(OrderRight(IndexOf[7, OrderRight])), "", AllTxtRight(IndexOf[7, OrderRight])], PR7 + (0, 0.05), false, true, 0, 0) → txtPuzzleRight7
  52. Text(If[IsImageRight(OrderRight(IndexOf[8, OrderRight])), "", AllTxtRight(IndexOf[8, OrderRight])], PR8 + (0, 0.05), false, true, 0, 0) → txtPuzzleRight8
  53. Sequence(MPList(k) ∈ PRList, k, 1, 6) → ConnectionLeft
  54. Sequence(PRList(k) ≟ MPList(OrderLeft(IndexOf[k, OrderRight])), k, 1, numberOfOptionsRight) → CorrectRightList
  55. PolyLine(Join[{Sequence[MP1 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP1 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP1 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP1 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP1 + (-widthPuzzleRight)), y(MP1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP1 + (-widthPuzzleRight)), y(MP1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP1 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleSolution1
  56. Polygon(Join[{Sequence[MP1 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP1 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP1 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP1 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP1 + (-widthPuzzleRight)), y(MP1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP1 + (-widthPuzzleRight)), y(MP1 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP1 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleSolution1
  57. PolyLine(Join[{Sequence[MP2 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP2 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP2 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP2 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP2 + (-widthPuzzleRight)), y(MP2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP2 + (-widthPuzzleRight)), y(MP2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP2 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleSolution2
  58. Polygon(Join[{Sequence[MP2 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP2 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP2 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP2 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP2 + (-widthPuzzleRight)), y(MP2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP2 + (-widthPuzzleRight)), y(MP2 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP2 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleSolution2
  59. PolyLine(Join[{Sequence[MP3 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP3 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP3 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP3 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP3 + (-widthPuzzleRight)), y(MP3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP3 + (-widthPuzzleRight)), y(MP3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP3 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleSolution3
  60. Polygon(Join[{Sequence[MP3 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP3 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP3 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP3 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP3 + (-widthPuzzleRight)), y(MP3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP3 + (-widthPuzzleRight)), y(MP3 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP3 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleSolution3
  61. PolyLine(Join[{Sequence[MP4 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP4 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP4 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP4 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP4 + (-widthPuzzleRight)), y(MP4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP4 + (-widthPuzzleRight)), y(MP4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP4 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleSolution4
  62. Polygon(Join[{Sequence[MP4 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP4 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP4 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP4 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP4 + (-widthPuzzleRight)), y(MP4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP4 + (-widthPuzzleRight)), y(MP4 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP4 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleSolution4
  63. PolyLine(Join[{Sequence[MP5 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP5 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP5 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP5 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP5 + (-widthPuzzleRight)), y(MP5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP5 + (-widthPuzzleRight)), y(MP5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP5 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleSolution5
  64. Polygon(Join[{Sequence[MP5 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP5 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP5 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP5 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP5 + (-widthPuzzleRight)), y(MP5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP5 + (-widthPuzzleRight)), y(MP5 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP5 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleSolution5
  65. PolyLine(Join[{Sequence[MP6 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP6 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP6 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP6 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP6 + (-widthPuzzleRight)), y(MP6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP6 + (-widthPuzzleRight)), y(MP6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP6 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleSolution6
  66. Polygon(Join[{Sequence[MP6 + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[MP6 + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[MP6 + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[MP6 + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(MP6 + (-widthPuzzleRight)), y(MP6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[MP6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(MP6 + (-widthPuzzleRight)), y(MP6 + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {MP6 + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → polyPuzzleSolution6
  67. Text(If[IsImageRight(IndexOf[1, OrderLeft]), "", AllTxtRight(IndexOf[1, OrderLeft])], MP1 + (0, 0.05), false, true, 0, 0) → txtSolution1
  68. Text(If[IsImageRight(IndexOf[2, OrderLeft]), "", AllTxtRight(IndexOf[2, OrderLeft])], MP2 + (0, 0.05), false, true, 0, 0) → txtSolution2
  69. Text(If[IsImageRight(IndexOf[3, OrderLeft]), "", AllTxtRight(IndexOf[3, OrderLeft])], MP3 + (0, 0.05), false, true, 0, 0) → txtSolution3
  70. Text(If[IsImageRight(IndexOf[4, OrderLeft]), "", AllTxtRight(IndexOf[4, OrderLeft])], MP4 + (0, 0.05), false, true, 0, 0) → txtSolution4
  71. Text(If[IsImageRight(IndexOf[5, OrderLeft]), "", AllTxtRight(IndexOf[5, OrderLeft])], MP5 + (0, 0.05), false, true, 0, 0) → txtSolution5
  72. Text(If[IsImageRight(IndexOf[6, OrderLeft]), "", AllTxtRight(IndexOf[6, OrderLeft])], MP6 + (0, 0.05), false, true, 0, 0) → txtSolution6
  73. PolyLine(Join[{Sequence[ParkRightList(1) + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[ParkRightList(1) + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[ParkRightList(1) + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[ParkRightList(1) + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(ParkRightList(1) - widthPuzzleRight), y(ParkRightList(1) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[ParkRightList(1) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(ParkRightList(1) - widthPuzzleRight), y(ParkRightList(1) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {ParkRightList(1) + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleSolutionPark1
  74. PolyLine(Join[{Sequence[ParkRightList(2) + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[ParkRightList(2) + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[ParkRightList(2) + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[ParkRightList(2) + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(ParkRightList(2) - widthPuzzleRight), y(ParkRightList(2) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[ParkRightList(2) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(ParkRightList(2) - widthPuzzleRight), y(ParkRightList(2) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {ParkRightList(2) + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleSolutionPark2
  75. PolyLine(Join[{Sequence[ParkRightList(3) + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[ParkRightList(3) + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[ParkRightList(3) + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[ParkRightList(3) + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(ParkRightList(3) - widthPuzzleRight), y(ParkRightList(3) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[ParkRightList(3) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(ParkRightList(3) - widthPuzzleRight), y(ParkRightList(3) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {ParkRightList(3) + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleSolutionPark3
  76. PolyLine(Join[{Sequence[ParkRightList(4) + ((-widthPuzzleRight), (-heightPuzzle)) + (radiusKante, radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 180, 270, 1], Sequence[ParkRightList(4) + (widthPuzzleRight, (-heightPuzzle)) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 270, 360, 1], Sequence[ParkRightList(4) + (widthPuzzleRight, heightPuzzle) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 0, 90, 1], Sequence[ParkRightList(4) + ((-widthPuzzleRight), heightPuzzle) + (radiusKante, (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 180, 1], Sequence[(x(ParkRightList(4) - widthPuzzleRight), y(ParkRightList(4) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(45°), sin(45°))))) + ((-radiusKante), radiusKante) + (radiusKante * (cos(k°), sin(k°))), k, 360, 270, -1], Sequence[ParkRightList(4) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(k°), sin(k°))), k, 45, 315, 1], Sequence[(x(ParkRightList(4) - widthPuzzleRight), y(ParkRightList(4) + ((-widthPuzzleRight) - lengthPuzzle + radiusPuzzle, 0) + (radiusPuzzle * (cos(-45°), sin(-45°))))) + ((-radiusKante), (-radiusKante)) + (radiusKante * (cos(k°), sin(k°))), k, 90, 0, -1], {ParkRightList(4) + ((-widthPuzzleRight), (-heightPuzzle)) + (0, radiusKante)}}]) → segPuzzleSolutionPark4
  77. Text(AllTxtRight(numberOfOptionsLeft + 1), ParkRightList(1) + (0, 0.05), false, true, 0, 0) → txtParkSolution1
  78. Text(AllTxtRight(numberOfOptionsLeft + 2), ParkRightList(2) + (0, 0.05), false, true, 0, 0) → txtParkSolution2
  79. Text(AllTxtRight(numberOfOptionsLeft + 3), ParkRightList(3) + (0, 0.05), false, true, 0, 0) → txtParkSolution3
  80. Text(AllTxtRight(numberOfOptionsLeft + 4), ParkRightList(4) + (0, 0.05), false, true, 0, 0) → txtParkSolution4
  81. Segment(PosOrigin1 + ((-AxisEdge) - stepLine, 0), PosOrigin1 + ((6 * stepLine) + AxisEdge, 0)) → axisX1
  82. Segment(PosOrigin1 + (stepLine * (0, StartYList(questionCount, 1) - AxisEdge)), PosOrigin1 + (stepLine * (0, 8 + StartYList(questionCount, 1)))) → axisY1
  83. Segment(PosOrigin2 + ((-AxisEdge) - stepLine, 0), PosOrigin2 + ((6 * stepLine) + AxisEdge, 0)) → axisX2
  84. Segment(PosOrigin3 + ((-AxisEdge) - stepLine, 0), PosOrigin3 + ((6 * stepLine) + AxisEdge, 0)) → axisX3
  85. Segment(PosOrigin4 + ((-AxisEdge) - stepLine, 0), PosOrigin4 + ((6 * stepLine) + AxisEdge, 0)) → axisX4
  86. Segment(PosOrigin2 + (stepLine * (0, StartYList(questionCount, 2) - AxisEdge)), PosOrigin2 + (stepLine * (0, 8 + StartYList(questionCount, 2)))) → axisY2
  87. Segment(PosOrigin3 + (stepLine * (0, StartYList(questionCount, 3) - AxisEdge)), PosOrigin3 + (stepLine * (0, 8 + StartYList(questionCount, 3)))) → axisY3
  88. Segment(PosOrigin4 + (stepLine * (0, StartYList(questionCount, 4) - AxisEdge)), PosOrigin4 + (stepLine * (0, 8 + StartYList(questionCount, 4)))) → axisY4
  89. If(zoom01, StartYList(questionCount, IndexOf[1, OrderLeft]), zoom02, StartYList(questionCount, IndexOf[2, OrderLeft]), zoom03, StartYList(questionCount, IndexOf[3, OrderLeft]), StartYList(questionCount, IndexOf[4, OrderLeft])) → StartYZoom
  90. Element({Polygon[PosZoom, PosZoom + (widthZoom, 0), PosZoom + (widthZoom, heightZoom), PosZoom + (0, heightZoom)]}, 1) → polyZoom
  91. Segment(OriginZoom + ((-AxisEdgeZoom) - stepZoom, 0), OriginZoom + ((5 * stepZoom) + AxisEdgeZoom + 0.25, 0)) → axisXZoom
  92. Segment(OriginZoom + (0, (-AxisEdgeZoom) + (StartYZoom * stepZoom)), OriginZoom + (0, ((StartYZoom + 7) * stepZoom) + AxisEdgeZoom + 0.25)) → axisYZoom
  93. If(zoom01, Steigung(questionCount, IndexOf[1, OrderLeft]), zoom02, Steigung(questionCount, IndexOf[2, OrderLeft]), zoom03, Steigung(questionCount, IndexOf[3, OrderLeft]), Steigung(questionCount, IndexOf[4, OrderLeft])) → SteigungZoom
  94. Invert(FuncOriginal) → InvFunc
  95. Max(FuncTransform, Max[x(OriginZoom) - 1 / stepZoom - AxisEdgeZoom, x(OriginZoom) + (InvFunc(If[Slope[FuncOriginal] > 0, StartYZoom - (AxisEdgeZoom * stepZoom), StartYZoom + 7 + (AxisEdgeZoom * stepZoom)]) * stepZoom)], Min[x(OriginZoom) + (5 * stepZoom) + AxisEdgeZoom, x(OriginZoom) + (InvFunc(If[Slope[FuncOriginal] < 0, StartYZoom - (AxisEdgeZoom * stepZoom), StartYZoom + 7 + (AxisEdgeZoom * stepZoom)]) * stepZoom)]) → PosGraphMax
  96. Text("\textsf{\bold{\textcolor{#50c1ce}{Zieh mich!}}}", Midpoint[ParkRightList(1), ParkRightList(numberOfOptionsRight)] + ((-widthPuzzleRight) - (2 * radiusPuzzle) - 0.5, 0), false, true, -1, 0) → CapZiehMich