Changeset 5157 for LMDZ6/branches/Amaury_dev/libf/dyn3dmem/mod_const_mpi.F90

Timestamp:

Aug 1, 2024, 8:55:04 PM (3 months ago)

Author:

abarral

Message:

Fix cosp compilation

File:

• LMDZ6/branches/Amaury_dev/libf/dyn3dmem/mod_const_mpi.F90 (modified) (2 diffs)

LMDZ6/branches/Amaury_dev/libf/dyn3dmem/mod_const_mpi.F90

@@ -68 +68 @@
       CALL MPI_INIT_THREAD(thread_required,thread_provided,ierr)
       IF (thread_provided < thread_required) THEN
-        PRINT *,'Warning : The multithreaded level of MPI librairy do not provide the requiered level',  &
+        PRINT *,'Warning : The multithreaded level of MPI librairy do not provide the required level',  &
                 ' in mod_const_mpi::Init_const_mpi'
       ENDIF
@@ -77 +77 @@
 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
       IF (using_xios) THEN
-        WRITE(*,*)'IN Init_mpi CALL wxios_init'
+        WRITE(*,*)'IN Init_mpi call wxios_init'
         CALL wxios_init("LMDZ", outcom=COMM_LMDZ)
       ENDIF