x

y

x(t)=BSx

y(t)=BSy

Kurve(x(t),y(t),t,0,21)

Ziehe die Steuerpunkte umher und
  beobachte wie sich der NURBS ändert und wie x(t) und y(t) reagieren.

B03(x) = If[x < 0, 0, If[x < 1, x^(3) / 6, If[x < 2, ((-x^(3))) / 2 + (2 * x^(2)) - (2 * x) + 2 / 3, If[x < 3, x^(3) / 2 - (4 * x^(2)) + (10 * x) - 22 / 3, If[x ≤ 4, (-1 / 6 * (x - 4)^(3)), 0]]]]]
B13(x) = B03(x - 1)
B23(x) = B03(x - 2)
B33(x) = B03(x - 3)
B43(x) = B03(x - 4)
B53(x) = B03(x - 5)
B63(x) = B03(x - 6)
B73(x) = B03(x - 7)
B83(x) = B03(x - 8)
B93(x) = B03(x - 9)
B103(x) = B03(x - 10)
B113(x) = B03(x - 11)
B123(x) = B03(x - 12)
B133(x) = B03(x - 13)
B = (1, 3.5)
C = (6.34, 4.2)
D = (3, 0.5)
E = (2.72, 4.44)
F: (5, 0)
G = (8.3, 2.2)
H: (7, 3)
I = (7.84, 3.9)
J: (9, 3)
K = (9.14, 1.26)
L = (11, 1)
M = (12, 3)
A = (0, 3)
B143(x) = B03(x - 14)
B153(x) = B03(x - 15)
B163(x) = B03(x - 16)
B173(x) = B03(x - 17)
N = (19.5, 2.5)
O = (14.3, 0.02)
P = (9.1, 3.5)
Q = (16, 3)
R: (17, 3)
BSx(t) = (x(A) * B03(t)) + (x(B) * B13(t)) + (x(C) * B23(t)) + (x(D) * B33(t)) + (x(E) * B43(t)) + (x(F) * B53(t)) + (x(G) * B63(t)) + (x(H) * B73(t)) + (x(I) * B83(t)) + (x(J) * B93(t)) + (x(K) * B103(t)) + (x(L) * B113(t)) + (x(M) * B123(t)) + (x(N) * B133(t)) + (x(O) * B143(t)) + (x(P) * B153(t)) + (x(Q) * B163(t)) + (x(R) * B173(t))
BSy(t) = (y(A) * B03(t)) + (y(B) * B13(t)) + (y(C) * B23(t)) + (y(D) * B33(t)) + (y(E) * B43(t)) + (y(F) * B53(t)) + (y(G) * B63(t)) + (y(H) * B73(t)) + (y(I) * B83(t)) + (y(J) * B93(t)) + (y(K) * B103(t)) + (y(L) * B113(t)) + (y(M) * B123(t)) + (y(N) * B133(t)) + (y(O) * B143(t)) + (y(P) * B153(t)) + (y(Q) * B163(t)) + (y(R) * B173(t))
a = CurveCartesian(BSx(t), BSy(t), t, 3, 17)
f = PolyLine(A, B, C, D, E, F, G, H, I, J, K, L, M, N, O, P, Q, R)