(%i1) "Cornelsen, S. 32, Nr. 5"$ (%i2) "Punkt A"$ (%i3) A: transpose(matrix ([3.0,0.0,1.0])); [ 3.0 ] [ ] (%o3) [ 0.0 ] [ ] [ 1.0 ] (%i4) "Punkt A'"$ (%i5) A': transpose(matrix ([3.0,6.0,3.0])); [ 3.0 ] [ ] (%o5) [ 6.0 ] [ ] [ 3.0 ] (%i6) "Punkt P"$ (%i7) P: transpose(matrix ([3.0,3.0,2.0])); [ 3.0 ] [ ] (%o7) [ 3.0 ] [ ] [ 2.0 ] (%i8) "Punkt B"$ (%i9) B: transpose(matrix ([0.0,0.0,4.0])); [ 0.0 ] [ ] (%o9) [ 0.0 ] [ ] [ 4.0 ] (%i10) "Punkt B'"$ (%i11) B': transpose(matrix ([6.0,6.0,0.0])); [ 6.0 ] [ ] (%o11) [ 6.0 ] [ ] [ 0.0 ]