--- trunk/OOPSE/libmdtools/simulation_module.F90 2003/07/16 21:30:56 626 +++ trunk/OOPSE/libmdtools/simulation_module.F90 2003/07/23 22:13:59 648 @@ -142,17 +142,19 @@ contains deallocate(c_idents_Row) endif -#else +#endif + +! We build the local atid's for both mpi and nonmpi do i = 1, nLocal me = getFirstMatchingElement(atypes, "c_ident", c_idents(i)) atid(i) = me enddo -#endif + do i = 1, nExcludes_Local excludesLocal(1,i) = CexcludesLocal(1,i) excludesLocal(2,i) = CexcludesLocal(2,i)