Context Navigation

mod_phys_lmdz_mpi_data.F90

Timestamp:

May 13, 2015, 11:40:56 AM (10 years ago)

Author:

ymipsl

Message:

Bug fix for parallel configuration.
Result with 4 MPi proc and 1 proc are now identical.
Actually not tested with openMP.

File:

r3826	r3827
87	87	IF (is_using_mpi) THEN
88	88	#ifdef CPP_MPI
89		CALL MPI_ALLGATHER(nbp,1,MPI_~~REAL8,distrib,1,MPI_REAL_LMDZ~~,COMM_LMDZ_PHY,ierr)
	89	CALL MPI_ALLGATHER(nbp,1,MPI_INTEGER,distrib,1,MPI_INTEGER,COMM_LMDZ_PHY,ierr)
90	90	#endif
91	91	ELSE

Note: See TracChangeset for help on using the changeset viewer.