PDF-Version - am Institut für Baustatik
PDF-Version - am Institut für Baustatik
PDF-Version - am Institut für Baustatik
Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.
YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.
inverse(A);<br />
⎡ 3<br />
⎢<br />
−<br />
−3<br />
+ 2x<br />
⎢ 2<br />
⎢<br />
⎣ −3<br />
+ 2x<br />
x ⎤<br />
−3<br />
+ 2x<br />
⎥<br />
1 ⎥<br />
− ⎥<br />
−3<br />
+ 2x⎦<br />
transpose - compute the transpose of a matrix<br />
> with(linalg):<br />
Warning, new definition for norm<br />
Warning, new definition for trace<br />
> A := array( [[1,2,3],[4,5]] );<br />
⎡1<br />
2 3 ⎤<br />
⎢ ⎥<br />
⎣4<br />
5 A2,<br />
3 ⎦<br />
> transpose(A);<br />
⎡1<br />
⎢<br />
⎢<br />
2<br />
⎢<br />
⎣3<br />
4 ⎤<br />
⎥<br />
5<br />
⎥<br />
A ⎥ 2,<br />
3 ⎦<br />
Obwohl nicht Bestandteil des linalg Packages sind die folgenden Anweisungen bei der Bearbeitung<br />
von Matrizen von Bedeutung:<br />
array - create an array<br />
> v := array(1..4):<br />
> for i to 3 do v[i] := i^2 od:<br />
> print(v);<br />
[1, 4, 9, v4]<br />
> v[2];<br />
4<br />
> A := array(1..2,1..2):<br />
> A[1,2] := x:<br />
> A[1,1];<br />
A1,1<br />
> A[1,2];<br />
x<br />
> print(A);<br />
⎡A1,<br />
1 x ⎤<br />
⎢ ⎥<br />
⎣A2<br />
, 1 A2,<br />
2 ⎦<br />
> A := array( symmetric, 1..2,1..2, [] ):<br />
> A[1,1] := 1: A[1,2] := x: A[2,2] := x^2:<br />
> print(A);<br />
⎡1<br />
x ⎤<br />
⎢ 2 ⎥<br />
⎣x<br />
x ⎦<br />
map - apply a procedure to each operand of an expression<br />
> map(diff,A,x);<br />
⎡0<br />
1 ⎤<br />
⎢ ⎥<br />
⎣1<br />
2x⎦<br />
evalm - evaluate a matrix expression<br />
• The function evalm evaluates an expression involving matrices. It performs any sums, products, or<br />
integer powers involving matrices, and will map functions onto matrices.<br />
116