MAMBO logo MAMBO & the MAMBO Toolbox MAMBO logo

DefineTriads — Definition of triads [mathematica]

DefineTriads[a,b,rm]

DefineTriads[{a1,b1,rm1}, ..., {an,bn,rmn}]

a,a1, ..., an: names of declared triads

b,b1, ..., bn: names of declared triads

rm,rm1, ..., rmn: rotation-matrix specifications

The function DefineTriads defines a direct relation between two declared triads by specifying the rotation matrix from the first triad to the second triad. A pair of indirectly related triads may not be defined.

The function DefineTriads results in permanent changes to the global variables GlobalTriadDeclarations and GlobalTriadDefinitions.

The syntax of a rotation-matrix specification corresponds to that of the argument to the MakeRotations procedure.

Restart;
DeclareTriads[a,b,c];
DefineTriads[{a,b,phi,1},{b,c,{q3,2},{Pi/2,3}}];
GlobalTriadDeclarations

{ a "->" { b } , b "->" { a , c } , c "->" { b } }

GlobalTriadDefinitions

{ { a , b } "->" { { 1 , 0 , 0 } , { 0 , Cos [ phi ] , - Sin [ phi ] } , { 0 , Sin [ phi ] , Cos [ phi ] } } , { b , a } "->" { { 1 , 0 , 0 } , { 0 , Cos [ phi ] , Sin [ phi ] } , { 0 , - Sin [ phi ] , Cos [ phi ] } } , { b , c } "->" { { 0 , - Cos [ q3 ] , Sin [ q3 ] } , { 1 , 0 , 0 } , { 0 , Sin [ q3 ] , Cos [ q3 ] } } , { c , b } "->" { { 0 , 1 , 0 } , { - Cos [ q3 ] , 0 , Sin [ q3 ] } , { Sin [ q3 ] , 0 , Cos [ q3 ] } } }


Toolbox functions