Die Addition von Vektoren
> restart; with(plots):
Definition der Objekte Q1, Q2, v1, v2 und v3;
Zeichnen dieser Objekte in Parallelprojektion:
> Q1:= plottools[cuboid] ([0,0,0], [1,4,3],
color = blue,
thickness = 1):
Q2:= plottools[cuboid] ([1,4,3], [3,7,5],
color = maroon,
thickness = 1):
v1:= arrow (<0,0,0>, <1,4,3>,
shape = arrow,
color = black,
thickness = 2):
v2:= arrow (<1,4,3>, <2,3,2>,
shape = arrow,
color = red,
thickness = 2):
v3:= arrow (<0,0,0>, <3,7,5>,
shape = arrow,
color = magenta,
head_length = 1,
thickness = 2):
display([v1, v2, v3, Q1, Q2],
style = wireframe,
thickness = 2,
size = [450, 450],
axes = normal,
axesfont = [Courier, normal, 10],
labels = [x1, x2, x3],
labelfont = [Courier, normal, 12],
orientation = [-41, 60]);
thickness = 1):
Q2:= plottools[cuboid] ([1,4,3], [3,7,5],
color = maroon,
thickness = 1):
v1:= arrow (<0,0,0>, <1,4,3>,
shape = arrow,
color = black,
thickness = 2):
v2:= arrow (<1,4,3>, <2,3,2>,
shape = arrow,
color = red,
thickness = 2):
v3:= arrow (<0,0,0>, <3,7,5>,
shape = arrow,
color = magenta,
head_length = 1,
thickness = 2):
display([v1, v2, v3, Q1, Q2],
style = wireframe,
thickness = 2,
size = [450, 450],
axes = normal,
axesfont = [Courier, normal, 10],
labels = [x1, x2, x3],
labelfont = [Courier, normal, 12],
orientation = [-41, 60]);
> display([v1, v2, v3, Q1],
style = wireframe,
size = [450, 450],
axes = normal,
axesfont = [Courier, normal, 10],
labels = [x1, "", x3],
labelfont = [Courier, normal, 12],
orientation = [-90, 90]);
size = [450, 450],
axes = normal,
axesfont = [Courier, normal, 10],
labels = [x1, "", x3],
labelfont = [Courier, normal, 12],
orientation = [-90, 90]);