raumschiff1

$x_2$

$x_1$

$x_3$

$A =$

$\vec{v} =$

\alpha : \vec{x}\;' = A \cdot \vec{x} + \vec{v} 

Ausgangsposition

Neue Position

$x_1 - x_2 - Ebene$

$x_1 - x_3 - Ebene$

$x_2 - x_3 - Ebene$

(a)

(c)

(b)

(d)

(e)

(f)

X1: (5 | 0 | 0)
X2: (0 | 5 | 0)
X3: (0 | 0 | 5)
M: {{1, 0, 0}, {0, 1, 0}, {0, 0, 1}}
Punkte: {(-3 | 0 | 0), (-2 | 0 | 0), (-1 | 0 | 0), (0 | 0 | 0), (1 | 0 | 0), (1 | 1 | 0), (0 | -1 | 0)}
v = (0, 0, 0)
Bildpunkte = Zip((M * Vector[P]) + v, P, Punkte)
Eingabefeld1 = Textfield(M)
Eingabefeld2 = Textfield(v)
f: y = 0
gl1: x = 0
g: z = 0
a = false
b = false
c = false
v1: (0, 3, 0)
M1: {{1, 0, 0}, {0, 1, 0}, {0, 0, 1}}
PunktePosition1 = Zip((M1 * Vector[P]) + v1, P, Punkte)
Verbindungen: {(1 | 2), (2 | 3), (3 | 4), (4 | 5), (5 | 6), (4 | 7)}
d = false
v3: (0, 0, 2)
M3: {{1, 0, 0}, {0, 0, -1}, {0, 1, 0}}
PunktePosition3 = Zip((M3 * Vector[P]) + v3, P, Punkte)
e = false
v2: (0, 0, -2)
M2: {{-1, 0, 0}, {0, -1, 0}, {0, 0, 1}}
PunktePosition2 = Zip((M2 * Vector[P]) + v2, P, Punkte)
h = false
v4: (0, 2, 0)
M4: {{-1, 0, 0}, {0, 0, -1}, {0, 1, 0}}
PunktePosition4 = Zip((M4 * Vector[P]) + v4, P, Punkte)
i = false
v5: (0, 0, 1)
M5: {{0, 0, -1}, {0, 1, 0}, {-1, 0, 0}}
PunktePosition5 = Zip((M5 * Vector[P]) + v5, P, Punkte)
j = false
v6: (0, 0, -1)
M6: {{0, -1, 0}, {2, 0, 0}, {0, 0, 1}}
PunktePosition6 = Zip((M6 * Vector[P]) + v6, P, Punkte)
k = false
VerbindungenPunkte = Sequence(Segment[Element[Punkte, x(Element[Verbindungen, i])], Element[Punkte, y(Element[Verbindungen, i])]], i, 1, Length[Verbindungen])
VerbindungenBildpunkte = Sequence(Segment[Element[Bildpunkte, x(Element[Verbindungen, i])], Element[Bildpunkte, y(Element[Verbindungen, i])]], i, 1, Length[Verbindungen])
VerbindungenPunktePosition1 = Sequence(Segment[Element[PunktePosition1, x(Element[Verbindungen, i])], Element[PunktePosition1, y(Element[Verbindungen, i])]], i, 1, Length[Verbindungen])
VerbindungenPunktePosition2 = Sequence(Segment[Element[PunktePosition2, x(Element[Verbindungen, i])], Element[PunktePosition2, y(Element[Verbindungen, i])]], i, 1, Length[Verbindungen])
VerbindungenPunktePosition3 = Sequence(Segment[Element[PunktePosition3, x(Element[Verbindungen, i])], Element[PunktePosition3, y(Element[Verbindungen, i])]], i, 1, Length[Verbindungen])
VerbindungenPunktePosition4 = Sequence(Segment[Element[PunktePosition4, x(Element[Verbindungen, i])], Element[PunktePosition4, y(Element[Verbindungen, i])]], i, 1, Length[Verbindungen])
VerbindungenPunktePosition5 = Sequence(Segment[Element[PunktePosition5, x(Element[Verbindungen, i])], Element[PunktePosition5, y(Element[Verbindungen, i])]], i, 1, Length[Verbindungen])
VerbindungenPunktePosition6 = Sequence(Segment[Element[PunktePosition6, x(Element[Verbindungen, i])], Element[PunktePosition6, y(Element[Verbindungen, i])]], i, 1, Length[Verbindungen])