DistSQ# = vx^2+vy^2+vz^2 if(DistSQ > 0) then DistSQ = 1 / sqr(DistSQ) vx = vx * DistSQ vy = vy * DistSQ vz = vz * DistSQ endif