Changeset 5157 for LMDZ6/branches/Amaury_dev/libf/dyn3dmem
- Timestamp:
- Aug 1, 2024, 8:55:04 PM (4 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Amaury_dev/libf/dyn3dmem/mod_const_mpi.F90
r5117 r5157 68 68 CALL MPI_INIT_THREAD(thread_required,thread_provided,ierr) 69 69 IF (thread_provided < thread_required) THEN 70 PRINT *,'Warning : The multithreaded level of MPI librairy do not provide the requi ered level', &70 PRINT *,'Warning : The multithreaded level of MPI librairy do not provide the required level', & 71 71 ' in mod_const_mpi::Init_const_mpi' 72 72 ENDIF … … 77 77 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 78 78 IF (using_xios) THEN 79 WRITE(*,*)'IN Init_mpi CALLwxios_init'79 WRITE(*,*)'IN Init_mpi call wxios_init' 80 80 CALL wxios_init("LMDZ", outcom=COMM_LMDZ) 81 81 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.