Naloga 7

Napetosti so podane v pascalih [Pa].

Podatki

In[44]:=

σij = {{1, -1, 0}, {-1, 1, 0}, {0, 0, 1}} ;  ex = {1, 0, 0} ; ey = {0, 1, 0} ; ez = {0, 0, 1} ; eξ = -ey ; eη = ex ; eζ = ez ;

Transformacijska matrika [T].

In[48]:=

T = Transpose[{eξ, eη, eζ}] ;

Komponente tenzorja v novi bazi

In[49]:=

σαβ = Transpose[T] . σij . T ; σαβ // MatrixForm // Print["σαβ=", #] & ;

σαβ= ( 1 1 0 ) 1 1 0 0 0 1

In[51]:=

Clear[σij, ex, ey, ez, eξ, eη, eζ, T, σαβ] ;

Created by Mathematica  (October 30, 2003)