forked from lijiext/lammps
git-svn-id: svn://svn.icms.temple.edu/lammps-ro/trunk@1747 f3b2605a-c512-4ea7-a41b-209d697bcdaa
This commit is contained in:
parent
89bddb0624
commit
9f1a69e25a
|
@ -151,8 +151,8 @@ void PairLubricate::compute(int eflag, int vflag)
|
||||||
} else {
|
} else {
|
||||||
inv_inertia = 1.0 / (0.4*atom->mass[itype]*radi*radi);
|
inv_inertia = 1.0 / (0.4*atom->mass[itype]*radi*radi);
|
||||||
w1 = inv_inertia * (angmom[i][0] + angmom[j][0]);
|
w1 = inv_inertia * (angmom[i][0] + angmom[j][0]);
|
||||||
w1 = inv_inertia * (angmom[i][0] + angmom[j][0]);
|
w2 = inv_inertia * (angmom[i][1] + angmom[j][1]);
|
||||||
w1 = inv_inertia * (angmom[i][0] + angmom[j][0]);
|
w3 = inv_inertia * (angmom[i][2] + angmom[j][2]);
|
||||||
}
|
}
|
||||||
|
|
||||||
// relative velocities n X P . (v1-v2) = n X (I-nn) . (v1-v2)
|
// relative velocities n X P . (v1-v2) = n X (I-nn) . (v1-v2)
|
||||||
|
@ -181,8 +181,8 @@ void PairLubricate::compute(int eflag, int vflag)
|
||||||
wr3 = omega[i][2] - omega[j][2];
|
wr3 = omega[i][2] - omega[j][2];
|
||||||
} else {
|
} else {
|
||||||
wr1 = inv_inertia * (angmom[i][0] - angmom[j][0]);
|
wr1 = inv_inertia * (angmom[i][0] - angmom[j][0]);
|
||||||
wr1 = inv_inertia * (angmom[i][0] - angmom[j][0]);
|
wr2 = inv_inertia * (angmom[i][1] - angmom[j][1]);
|
||||||
wr1 = inv_inertia * (angmom[i][0] - angmom[j][0]);
|
wr3 = inv_inertia * (angmom[i][2] - angmom[j][2]);
|
||||||
}
|
}
|
||||||
|
|
||||||
wnnr = wr1*delx + wr2*dely + wr3*delz;
|
wnnr = wr1*delx + wr2*dely + wr3*delz;
|
||||||
|
@ -219,7 +219,7 @@ void PairLubricate::compute(int eflag, int vflag)
|
||||||
(2.0/r)*a_shear*n_cross_omega_t_2;
|
(2.0/r)*a_shear*n_cross_omega_t_2;
|
||||||
fz = -a_squeeze*vn3 - a_shear*(2.0/r)*(2.0/r)*vt3 +
|
fz = -a_squeeze*vn3 - a_shear*(2.0/r)*(2.0/r)*vt3 +
|
||||||
(2.0/r)*a_shear*n_cross_omega_t_3;
|
(2.0/r)*a_shear*n_cross_omega_t_3;
|
||||||
|
|
||||||
torque[i][0] += -(2.0/r)*a_shear*v_shear1 - a_shear*omega_t_1 -
|
torque[i][0] += -(2.0/r)*a_shear*v_shear1 - a_shear*omega_t_1 -
|
||||||
a_pump*P_dot_wrel_1 - a_twist*wn1;
|
a_pump*P_dot_wrel_1 - a_twist*wn1;
|
||||||
torque[i][1] += -(2.0/r)*a_shear*v_shear2 - a_shear*omega_t_2 -
|
torque[i][1] += -(2.0/r)*a_shear*v_shear2 - a_shear*omega_t_2 -
|
||||||
|
|
Loading…
Reference in New Issue