/usr/include/libmints/vector3_i.cc is in libpsi3-dev 3.4.0-6.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 | #include <cmath>
inline Vector3 operator*(double d, const Vector3& x)
{
Vector3 result;
for (int i=0; i<3; ++i)
result[0] = d * x[i];
return result;
}
inline double Vector3::distance(const Vector3& s) const
{
double x = v_[0] - s.v_[0];
double y = v_[1] - s.v_[1];
double z = v_[2] - s.v_[2];
return sqrt(x*x + y*y + z*z);
}
inline void Vector3::normalize()
{
double temp=0.0;
int i;
for (i=0; i<3; ++i)
temp += v_[i] * v_[i];
temp = 1.0 / sqrt(temp);
for (i=0; i<3; ++i)
v_[i] *= temp;
}
inline Vector3 Vector3::cross(const Vector3& x) const
{
Vector3 result(v_[1] * x.v_[2] - v_[2] * x.v_[1],
v_[2] * x.v_[0] - v_[0] * x.v_[2],
v_[0] * x.v_[1] - v_[1] * x.v_[0]);
return result;
}
|