From 15aede86262b28dc962d5974b0ae7d150333a881 Mon Sep 17 00:00:00 2001
From: Antoine <antoine.hoffmann@epfl.ch>
Date: Mon, 27 Nov 2023 11:18:22 +0100
Subject: [PATCH] cosmetic change
---
src/auxval.F90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/auxval.F90 b/src/auxval.F90
index 64cdf8b3..e6e6ec1a 100644
--- a/src/auxval.F90
+++ b/src/auxval.F90
@@ -59,7 +59,7 @@ subroutine auxval
CALL mpi_barrier(MPI_COMM_WORLD, ierr)
IF (my_id .EQ. i_) THEN
IF (my_id .EQ. 0) WRITE(*,*) ''
- IF (my_id .EQ. 0) WRITE(*,*) '--------- Parallel environement ----------'
+ IF (my_id .EQ. 0) WRITE(*,*) '--------- Parallel environment ----------'
IF (my_id .EQ. 0) WRITE(*,'(A12,I3)') 'n_procs ', num_procs
IF (my_id .EQ. 0) WRITE(*,'(A12,I3,A14,I3,A14,I3)') 'num_procs_p = ', num_procs_p, ', num_procs_ky = ', num_procs_ky, ', num_procs_z = ', num_procs_z
IF (my_id .EQ. 0) WRITE(*,*) ''
--
GitLab