jianmu
/
lammps
forked from lijiext/lammps
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

git-svn-id: svn://svn.icms.temple.edu/lammps-ro/trunk@15353 f3b2605a-c512-4ea7-a41b-209d697bcdaa

This commit is contained in:
sjplimp 2016-07-22 22:50:41 +00:00
parent 5abac962ed
commit e519cfb1dc
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/fix_shear_history.cpp
View File

@ -578,7 +578,7 @@ void FixShearHistory::set_arrays(int i)
int FixShearHistory::pack_reverse_comm_size(int n, int first) int FixShearHistory::pack_reverse_comm_size(int n, int first)
{ {
int i,j,k,last; int i,last;
int m = 0; int m = 0;
last = first + n; last = first + n;
@ -595,7 +595,7 @@ int FixShearHistory::pack_reverse_comm_size(int n, int first)
int FixShearHistory::pack_reverse_comm(int n, int first, double *buf) int FixShearHistory::pack_reverse_comm(int n, int first, double *buf)
{ {
int i,j,k,last; int i,k,last;
int m = 0; int m = 0;
last = first + n; last = first + n;
@ -607,7 +607,7 @@ int FixShearHistory::pack_reverse_comm(int n, int first, double *buf)
} else if (commflag == PERPARTNER) { } else if (commflag == PERPARTNER) {
for (i = first; i < last; i++) { for (i = first; i < last; i++) {
buf[m++] = npartner[i]; buf[m++] = npartner[i];
for (int k = 0; k < npartner[i]; k++) { for (k = 0; k < npartner[i]; k++) {
buf[m++] = partner[i][k]; buf[m++] = partner[i][k];
memcpy(&buf[m],&shearpartner[i][dnum*k],dnumbytes); memcpy(&buf[m],&shearpartner[i][dnum*k],dnumbytes);
m += dnum; m += dnum;
@ -637,7 +637,7 @@ void FixShearHistory::unpack_reverse_comm(int n, int *list, double *buf)
for (i = 0; i < n; i++) { for (i = 0; i < n; i++) {
j = list[i]; j = list[i];
ncount = static_cast<int> (buf[m++]); ncount = static_cast<int> (buf[m++]);
for (int k = 0; k < ncount; k++) { for (k = 0; k < ncount; k++) {
kk = npartner[j]++; kk = npartner[j]++;
partner[j][kk] = static_cast<tagint> (buf[m++]); partner[j][kk] = static_cast<tagint> (buf[m++]);
memcpy(&shearpartner[j][dnum*kk],&buf[m],dnumbytes); memcpy(&shearpartner[j][dnum*kk],&buf[m],dnumbytes);