Application of the Finite Element Method to Some Simple Systems in One and Two Dimensions. Page: 71
View a full description of this thesis.
Extracted Text
The following text was automatically extracted from the image on this page using optical character recognition software:
Eigenvals = Eigenvals.newsize(numOfNodes);
// zero out the buffers
K = 0.0;
M = 0.0;
Eigenvecs = 0.0;
Eigenvals = 0.0;
// assemble the system equations
for(int tri=0;tri<numOfTriangles;tri++)
{
AssembleLinearElement(tri, K, M);
}
int OK = 0;
// solve the general symmetric eigenproblem
SolveGenSymEigen(K,M,Eigenvecs,Eigenvals,OK);
// check if we found a solution
if(OK!=0)
{
cout<<"The eigenproblem solution failed with failure code: "<<OK<<endl<<endl;
}
}
void CleanUp0
{
delete [] nodeCoords;
delete [] triangles;
nodeCoords = 0;
triangles = 0;
}
// solve symmetric general eigenvalue problem
void SolveGenSymEigen(const Matrix<double> &A, const Matrix<double> &B,
Matrix<double> &Eigenvectors, Vector<double> &Eigenvalues,
int &Info)
{
assert(A.size0 == B.size0);
assert(A.size0 == Eigenvectors.size0);
Subscript N = A.numrows0;
assert(N == A.num_colsO);
assert(N == Eigenvalues.size0);
charjobz =' V'
char uplo =' U'
int itype = 1;
int worksize = 3*N;
Vector<double> work(worksize);
Fortran_Matrix<double> Tmpl( A.num_cols0, A.num_rows0, &A(1,1));71
Upcoming Pages
Here’s what’s next.
Search Inside
This thesis can be searched. Note: Results may vary based on the legibility of text within the document.
Tools / Downloads
Get a copy of this page or view the extracted text.
Citing and Sharing
Basic information for referencing this web page. We also provide extended guidance on usage rights, references, copying or embedding.
Reference the current page of this Thesis.
Hunnell, Jason C. Application of the Finite Element Method to Some Simple Systems in One and Two Dimensions., thesis, May 2002; Denton, Texas. (https://digital.library.unt.edu/ark:/67531/metadc3087/m1/78/: accessed April 19, 2024), University of North Texas Libraries, UNT Digital Library, https://digital.library.unt.edu; .