--- trunk/OOPSE/libmdtools/mpiSimulation_module.F90 2003/04/01 16:50:14 441 +++ trunk/OOPSE/libmdtools/mpiSimulation_module.F90 2003/07/17 19:25:51 631 @@ -1,5 +1,5 @@ -#ifdef IS_MPI + !! MPI support for long range forces using force decomposition !! on a square grid of processors. !! Corresponds to mpiSimunation.cpp for C++ @@ -7,10 +7,11 @@ !! !! @author Charles F. Vardeman II !! @author Matthew Meineke -!! @version $Id: mpiSimulation_module.F90,v 1.4 2003-04-01 16:50:14 chuckv Exp $, $Date: 2003-04-01 16:50:14 $, $Name: not supported by cvs2svn $, $Revision: 1.4 $ +!! @version $Id: mpiSimulation_module.F90,v 1.5 2003-07-17 19:25:51 chuckv Exp $, $Date: 2003-07-17 19:25:51 $, $Name: not supported by cvs2svn $, $Revision: 1.5 $ module mpiSimulation use definitions +#ifdef IS_MPI use mpi implicit none PRIVATE @@ -688,7 +689,7 @@ contains myNode = mpiSim%myNode end function getMyNode - +#endif // is_mpi end module mpiSimulation -#endif // is_mpi +