griejipger

next
parent 92ea220d2d
commit b229c92d30

@ -10,9 +10,11 @@
"LAPACKE", "LAPACKE",
"MATDENSE", "MATDENSE",
"MATMPIAIJ", "MATMPIAIJ",
"matwrite",
"PETSC", "PETSC",
"PETSCVIEWERHDF", "PETSCVIEWERHDF",
"Reorthogonalization", "Reorthogonalization",
"spdiagm",
"VECMPI" "VECMPI"
] ]
} }

@ -194,9 +194,10 @@ int main(int argc, char **argv) {
PetscErrorCode ArnoldiIteration(Mat A, Vec b, PetscInt n, PetscInt m, Vec *Q, double *h) { PetscErrorCode ArnoldiIteration(Mat A, Vec b, PetscInt n, PetscInt m, Vec *Q, double *h) {
PetscFunctionBeginUser; PetscFunctionBeginUser;
int rank; int rank, total;
MPI_Comm_rank(PETSC_COMM_WORLD, &rank); MPI_Comm_rank(PETSC_COMM_WORLD, &rank);
printf("Rank %d\n", rank); MPI_Comm_size(PETSC_COMM_WORLD, &total);
printf("Process %d of %d\n", rank, total);
PetscScalar eps = 1e-12; PetscScalar eps = 1e-12;

@ -2,8 +2,8 @@ using SparseArrays
using MAT using MAT
# 11 x 16 # 11 x 16
nx = 10 nx = 11 - 1
ny = 15 ny = 16 - 1
ex = fill(1, nx) ex = fill(1, nx)
ey = fill(1, ny) ey = fill(1, ny)
Dxx = spdiagm(-1 => ex, 0 => -2 * ex, +1 => ex) Dxx = spdiagm(-1 => ex, 0 => -2 * ex, +1 => ex)

Loading…
Cancel
Save