From b2fe00c075006119d93049a4f7f4cc1dad086bd9 Mon Sep 17 00:00:00 2001
From: Antonio De Lucreziis <antonio.delucreziis@gmail.com>
Date: Sun, 16 Mar 2025 18:38:30 +0100
Subject: [PATCH] fewokfew

---
 arnoldi.c | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/arnoldi.c b/arnoldi.c
index ef5df8d..a1a7701 100644
--- a/arnoldi.c
+++ b/arnoldi.c
@@ -214,6 +214,9 @@ int main(int argc, char **argv) {
 PetscErrorCode ArnoldiIteration(Mat A, Vec b, PetscInt n, PetscInt m, Vec *Q, double *h) {
     PetscFunctionBeginUser;
 
+    int rank;
+    MPI_Comm_rank(PETSC_COMM_WORLD, &rank);
+
     PetscScalar eps = 1e-12;
 
     Vec q;
@@ -232,7 +235,8 @@ PetscErrorCode ArnoldiIteration(Mat A, Vec b, PetscInt n, PetscInt m, Vec *Q, do
 
     for (PetscInt k = 1; k < n + 1; k++) {
 
-        // PetscCall(PetscPrintf(PETSC_COMM_WORLD, "[Arnoldi] Iteration %d\n", k));
+        if (rank == 0)
+            PetscCall(PetscPrintf(PETSC_COMM_WORLD, "[Arnoldi] Iteration %d\n", k));
 
         Vec v;
         PetscCall(VecDuplicate(b, &v));