Changes in src/mpi_mod.f90 [8ed5f11:ec7fc72] in flexpart.git
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/mpi_mod.f90
r8ed5f11 rec7fc72 120 120 logical, parameter :: mp_dbg_out = .false. 121 121 logical, parameter :: mp_time_barrier=.true. 122 logical, parameter :: mp_measure_time=. true.122 logical, parameter :: mp_measure_time=.false. 123 123 logical, parameter :: mp_exact_numpart=.true. 124 124 … … 195 195 if (dep_prec==dp) then 196 196 mp_cp = MPI_REAL8 197 ! TODO: write info message for serial version as well 198 if (lroot.and.verbosity>0) write(*,*) 'Using double precision for deposition fields' 197 if (lroot) write(*,*) 'Using double precision for deposition fields' 199 198 else if (dep_prec==sp) then 200 199 mp_cp = MPI_REAL4 201 if (lroot .and.verbosity>0) write(*,*) 'Using single precision for deposition fields'200 if (lroot) write(*,*) 'Using single precision for deposition fields' 202 201 else 203 202 write(*,*) 'ERROR: something went wrong setting MPI real precision'
Note: See TracChangeset
for help on using the changeset viewer.