2Lapp_OberflächeAbwicklung_mitSpline

b_0

b(y)

b_0

g(x, y) = If[sqrt(x^(2) + y^(2)) ≤ 1, 0]
d(x, y) = If[sqrt(x^(2) + y^(2)) ≤ 1, (2 * x^(2))]
f(x) = ((1 / 2 * sqrt((16 * (1 - x^(2))) + 1)) * sqrt(1 - x^(2))) + (1 / 8 * ln(sqrt((16 * (1 - x^(2))) + 1) + (4 * sqrt(1 - x^(2)))))
v_1 = Rotate(f, -90°)
w_1 = Rotate(f, 90°)
c_4 = Circle((0, 0, 0), 1, xOyPlane)
a = CurveCartesian(cos(t), sin(t), (2 * (cos(t))^(2)), t, 0, (2 * pi))
i = CurveCartesian((1.696 * cos(t)), sin(t), ((0.5 * 1.696^(2)) * (cos(t))^(2)), t, 0, (2 * pi))
j = CurveCartesian((2.017 * cos(t)), sin(t), ((0.25 * 2.017^(2)) * (cos(t))^(2)), t, 0, (2 * pi))
k = CurveCartesian(t, 0, (1 / 4 * t^(2)), t, -2.017, 2.017)
A: (0, 0, 0)
B: (2.32339, 0, 0)
h = Segment(A, B)
C: (-2.32339, 0, 0)
l = Segment(A, C)
b = CurveCartesian(t, 0, (2 * t^(2)), t, 0, 1)
A1: 2.3233918718075
C1: 0
A2: 2.27891921121937
C2: 0.450783842243873
A3: 2.1619478588869
C3: 0.844779143554759
A4: 2.00632167790395
C4: 1.15879300674237
A5: 1.84274952120603
C5: 1.39419961696483
A6: 1.55609796175536
C6: 1.68731755410644
A7: 1.34865024911111
C7: 1.83784039857778
A8: 1.20835075560307
C8: 1.91670151120614
A9: 1.11623543554726
C9: 1.95896504531342
A10: 1.05773191415029
C10: 1.98164935962081
A11: 1.02292015730047
C11: 1.99334450336149
A12: 1.00517029443074
C12: 1.99861305995067
A13: 1
C13: 2
B1: 0
B2: 0
B3: 0
B4: 0
B5: 0
B6: 0
B7: 0
B8: 0
B9: 0
B10: 0
B11: 0
B12: 0
B13: 0
D: (A1, B1, C1)
E: (A2, B2, C2)
F: (A3, B3, C3)
G: (A4, B4, C4)
H: (A5, B5, C5)
I: (A6, B6, C6)
J: (A7, B7, C7)
K: (A8, B8, C8)
L: (A9, B9, C9)
M: (A10, B10, C10)
N: (A11, B11, C11)
O: (A12, B12, C12)
P: (A13, B13, C13)
l1: {D, E, F, G, H, I, J, K, L, M, N, O, P}
c = Spline(l1, 3)