Finite Element Concepts by Gautam Dasgupta

Author:Gautam Dasgupta
Language: eng
Format: epub
Publisher: Springer New York, New York, NY

termCount::usage = "termCount[x] returns the number of parameters in x."

termCount[x_] := termList[x] // Length

Listing 7.8 Determining the similar coupled mode by tensorial symmetry

Clear[nextMode];

nextMode::usage = "nextMode[thisMode,xy] generates the mode by rotating left

the coordinate system xy from the given thisMode."

nextMode[thisMode_?VectorQ, xy_] :=

RotateRight[thisMode /. Thread[xy -> RotateLeft[xy]]]

nextMode[theseModes_?MatrixQ, xy_] := nextMode[#, xy] & /@ theseModes

7.2.3 Execution

Download

Copyright Disclaimer:
This site does not store any files on its server. We only index and link to content provided by other sites. Please contact the content providers to delete copyright contents if any and email us, we'll remove relevant links or contents immediately.