Liebe Gitlab-Nutzerin, lieber Gitlab-Nutzer,
es ist nun möglich sich mittels des ZIH-Logins/LDAP an unserem Dienst anzumelden. Die Konten der externen Nutzer:innen sind über den Reiter "Standard" erreichbar.
Die Administratoren


Dear Gitlab user,
it is now possible to log in to our service using the ZIH login/LDAP. The accounts of external users can be accessed via the "Standard" tab.
The administrators

Commit 518c24d9 authored by Thomas Witkowski's avatar Thomas Witkowski
Browse files

So on

parent 58a86bc4
......@@ -677,6 +677,18 @@ namespace AMDiS {
MatAssemblyEnd(mat_lagrange, MAT_FINAL_ASSEMBLY);
int nZeroRows = PetscSolverFetiDebug::testZeroRows(mat_lagrange);
int m,n;
MatGetSize(mat_lagrange, &m ,&n);
MSG("Lagrange matrix has %d zero rows and global size of %d %d!\n", nZeroRows, m, n);
PetscViewer petscView;
PetscViewerBinaryOpen(PETSC_COMM_WORLD, "lagrange.mat",
FILE_MODE_WRITE, &petscView);
MatView(mat_lagrange, petscView);
PetscViewerDestroy(&petscView);
// === If required, create \ref mat_lagrange_scaled ===
VecAssemblyBegin(vec_scale_lagrange);
......@@ -797,6 +809,11 @@ namespace AMDiS {
MatAssemblyBegin(mat_augmented_lagrange, MAT_FINAL_ASSEMBLY);
MatAssemblyEnd(mat_augmented_lagrange, MAT_FINAL_ASSEMBLY);
int nZeroRows = PetscSolverFetiDebug::testZeroRows(mat_augmented_lagrange);
int m,n;
MatGetSize(mat_augmented_lagrange, &m ,&n);
MSG("Augmented lagrange matrix has %d zero rows and global size of %d %d!\n", nZeroRows, m, n);
if (printTimings) {
MPI::COMM_WORLD.Barrier();
MSG("FETI-DP timing 05a: %.5f seconds (creation of augmented lagrange constraint matrix)\n",
......@@ -994,8 +1011,13 @@ namespace AMDiS {
// matTmp = inv(A_BB) trans(J) trans(Q)
Mat qT, jTqT;
MatTranspose(mat_augmented_lagrange, MAT_INITIAL_MATRIX, &qT);
Mat jT;
MSG("START COMPUTING MAT TRANS\n");
MatTranspose(mat_lagrange, MAT_INITIAL_MATRIX, &jT);
MSG("DONE\n");
MatTransposeMatMult(mat_lagrange, qT, MAT_INITIAL_MATRIX, PETSC_DEFAULT,
&jTqT);
MSG("DONE WITH THIS!\n");
petsc_helper::blockMatMatSolve(subdomain->getSolver(), jTqT, matTmp);
MatDestroy(&qT);
MatDestroy(&jTqT);
......@@ -1024,6 +1046,7 @@ namespace AMDiS {
MatDestroy(&mat10);
MatDestroy(&mat11);
MatDestroy(&matTmp);
MSG("FINISHED!\n");
} else {
Mat tmp;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment