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

This commit is contained in:
pscrozi
2007-06-01 00:05:02 +00:00
parent df6168bbfe
commit 87f60e997a

View File

@ -71,7 +71,7 @@ void FixHeat::end_of_step()
double vsub[3],vcm[3];
double ke = group->ke(igroup);
double ke = group->ke(igroup)*force->ftm2v;
group->vcm(igroup,masstotal,vcm);
double vcmsq = vcm[0]*vcm[0] + vcm[1]*vcm[1] + vcm[2]*vcm[2];
double escale = (ke + heat - 0.5*vcmsq*masstotal)/(ke - 0.5*vcmsq*masstotal);