[764] | 1 | #include "machdefs.h"
|
---|
| 2 | #include <math.h>
|
---|
| 3 | #include "pexceptions.h"
|
---|
| 4 | #include "vector3d.h"
|
---|
| 5 | #include "utilgeom.h"
|
---|
| 6 | //++
|
---|
| 7 | // Class Vector3d
|
---|
| 8 | //
|
---|
| 9 | // include vector3d.h utilgeom.h longlat.h math.h
|
---|
| 10 | //
|
---|
| 11 | //
|
---|
| 12 | // 3-D geometry.
|
---|
| 13 | // All computations are made with angles in radians and with spherical
|
---|
| 14 | // coordinates theta, phi.
|
---|
| 15 | //
|
---|
| 16 | // Concerning Euler's angles, the reference is :
|
---|
| 17 | //
|
---|
| 18 | // "Classical Mechanics" 2nd edition, H. Goldstein, Addison Wesley
|
---|
| 19 | //--
|
---|
| 20 | //++
|
---|
| 21 | // Titre Constructors
|
---|
| 22 | //--
|
---|
| 23 | //++
|
---|
| 24 | Vector3d::Vector3d()
|
---|
| 25 | //
|
---|
| 26 | //--
|
---|
| 27 | {
|
---|
| 28 | Setxyz(1.,0.,0.);
|
---|
| 29 | }
|
---|
| 30 | //++
|
---|
| 31 | Vector3d::Vector3d(double x, double y, double z)
|
---|
| 32 | //
|
---|
| 33 | //--
|
---|
| 34 | {
|
---|
| 35 | _x=x;
|
---|
| 36 | _y=y;
|
---|
| 37 | _z=z;
|
---|
| 38 | xyz2ThetaPhi();
|
---|
| 39 | }
|
---|
| 40 | //++
|
---|
| 41 | Vector3d::Vector3d(double theta, double phi)
|
---|
| 42 | //
|
---|
| 43 | //--
|
---|
| 44 | {
|
---|
[1177] | 45 | // _theta=mod(theta,M_PI); // dans [0;pi]
|
---|
| 46 | // Version precedente fausse: _theta=M_PI est valide. Or mod(M_PI,M_PI)=0!
|
---|
| 47 | // De plus theta>pi ou <0 n'a pas de sens. Dominique Yvon
|
---|
| 48 | if( (theta<0.) || (theta>M_PI) )
|
---|
| 49 | { string exmsg = "Wrong initialisation of theta in Vector3d::Vector3d(double theta, double phi)";
|
---|
| 50 | throw( ParmError(exmsg) );
|
---|
| 51 | }
|
---|
| 52 | _theta=theta; // dans [0;pi]
|
---|
[764] | 53 | _phi=mod(phi,pi2); // dans [0;2pi]
|
---|
| 54 | ThetaPhi2xyz();
|
---|
| 55 | }
|
---|
| 56 | //++
|
---|
| 57 | Vector3d::Vector3d(const LongLat& ll)
|
---|
| 58 | //
|
---|
| 59 | //--
|
---|
| 60 | {
|
---|
| 61 | _theta=ll.Theta(); // dans [0;pi]
|
---|
| 62 | _phi=ll.Phi(); // dans [0;2pi]
|
---|
| 63 | ThetaPhi2xyz();
|
---|
| 64 | }
|
---|
| 65 | //++
|
---|
| 66 | Vector3d::Vector3d(const Vector3d& v)
|
---|
| 67 | //
|
---|
| 68 | //--
|
---|
| 69 | {
|
---|
| 70 | _x=v._x;
|
---|
| 71 | _y=v._y;
|
---|
| 72 | _z=v._z;
|
---|
| 73 | _theta=v._theta;
|
---|
| 74 | _phi=v._phi;
|
---|
| 75 | }
|
---|
| 76 | //++
|
---|
| 77 | // Titre Public methods
|
---|
| 78 | //--
|
---|
| 79 | //++
|
---|
| 80 | void Vector3d::SetThetaPhi(double theta, double phi)
|
---|
| 81 | //
|
---|
| 82 | //--
|
---|
| 83 | {
|
---|
| 84 | _theta=mod(theta,M_PI);
|
---|
| 85 | _phi=mod(phi,pi2);
|
---|
| 86 | ThetaPhi2xyz();
|
---|
| 87 | }
|
---|
| 88 | //++
|
---|
| 89 | void Vector3d::Setxyz(double x, double y, double z)
|
---|
| 90 | //
|
---|
| 91 | //--
|
---|
| 92 | {
|
---|
| 93 | _x=x;
|
---|
| 94 | _y=y;
|
---|
| 95 | _z=z;
|
---|
| 96 | xyz2ThetaPhi();
|
---|
| 97 | }
|
---|
| 98 | //++
|
---|
| 99 | void Vector3d::ThetaPhi2xyz()
|
---|
| 100 | //
|
---|
| 101 | //--
|
---|
| 102 | {
|
---|
| 103 | _x=sin(_theta)*cos(_phi);
|
---|
| 104 | _y=sin(_theta)*sin(_phi);
|
---|
| 105 | _z=cos(_theta);
|
---|
| 106 | }
|
---|
| 107 | //++
|
---|
| 108 | void Vector3d::xyz2ThetaPhi()
|
---|
| 109 | //
|
---|
| 110 | //--
|
---|
| 111 | {
|
---|
| 112 | double norm=this->Norm();
|
---|
| 113 | if( norm != 0. )
|
---|
| 114 | {
|
---|
| 115 | _theta=acos(_z/norm); // dans [0,Pi]
|
---|
| 116 | if( mod(_theta,M_PI) == 0. ) _phi=0.; // on est sur +-Oz, le vecteur z est en phi=0
|
---|
| 117 | // else _phi=acos(_x/sin(_theta)/norm)+M_PI*(_y<0);
|
---|
| 118 | else _phi=scangle(_y/sin(_theta)/norm,_x/sin(_theta)/norm);
|
---|
| 119 | }
|
---|
| 120 | else // vecteur nul
|
---|
| 121 | {
|
---|
| 122 | _theta=0.;
|
---|
| 123 | _phi=0.;
|
---|
| 124 | }
|
---|
| 125 | }
|
---|
| 126 | //++
|
---|
| 127 | Vector3d& Vector3d::Normalize()
|
---|
| 128 | //
|
---|
| 129 | //--
|
---|
| 130 | {
|
---|
| 131 | double norm=this->Norm();
|
---|
| 132 | if( norm != 0. ) (*this)/=norm;
|
---|
| 133 | else cerr << "Division par zero" << endl;
|
---|
| 134 | return *this;
|
---|
| 135 | }
|
---|
| 136 | //++
|
---|
| 137 | double Vector3d::Norm() const
|
---|
| 138 | //
|
---|
| 139 | //--
|
---|
| 140 | {
|
---|
| 141 | return sqrt(_x*_x+_y*_y+_z*_z);
|
---|
| 142 | }
|
---|
| 143 | //++
|
---|
| 144 | double Vector3d::Psc(const Vector3d& v) const
|
---|
| 145 | //
|
---|
| 146 | // dot product
|
---|
| 147 | //--
|
---|
| 148 | {
|
---|
| 149 | return _x*v._x+_y*v._y+_z*v._z;
|
---|
| 150 | }
|
---|
| 151 | //++
|
---|
| 152 | double Vector3d::SepAngle(const Vector3d& v) const
|
---|
| 153 | //
|
---|
| 154 | // angular gap between 2 vectors in [0,Pi]
|
---|
| 155 | //--
|
---|
| 156 | {
|
---|
| 157 | double n1=this->Norm();
|
---|
| 158 | double n2=v.Norm();
|
---|
| 159 | double ret;
|
---|
| 160 | if( n1!=0. && n2!=0. ) ret=acos((this->Psc(v))/n1/n2);
|
---|
| 161 | else
|
---|
| 162 | {
|
---|
| 163 | cerr << "Division par zero" << endl;
|
---|
| 164 | ret=0.;
|
---|
| 165 | }
|
---|
| 166 | return ret;
|
---|
| 167 | }
|
---|
| 168 | //++
|
---|
| 169 | Vector3d Vector3d::Vect(const Vector3d& v) const
|
---|
| 170 | //
|
---|
| 171 | // vector product
|
---|
| 172 | //--
|
---|
| 173 | {
|
---|
| 174 | double xo=_y*v._z-_z*v._y;
|
---|
| 175 | double yo=_z*v._x-_x*v._z;
|
---|
| 176 | double zo=_x*v._y-_y*v._x;
|
---|
| 177 | return Vector3d(xo,yo,zo);
|
---|
| 178 | }
|
---|
| 179 | //++
|
---|
| 180 | Vector3d Vector3d::VperpPhi() const
|
---|
| 181 | //
|
---|
| 182 | // perpendicular vector, with equal phi
|
---|
| 183 | //--
|
---|
| 184 | {
|
---|
| 185 | double theta;
|
---|
| 186 | if( _theta != pi_over_2 ) theta=_theta+(0.5-(_theta>pi_over_2))*M_PI; // on tourne theta de +-pi/2
|
---|
| 187 | else theta=0.;
|
---|
| 188 | return Vector3d(theta,_phi);
|
---|
| 189 | }
|
---|
| 190 | //++
|
---|
| 191 | Vector3d Vector3d::VperpTheta() const
|
---|
| 192 | //
|
---|
| 193 | // perpendicular vector with equal theta
|
---|
| 194 | //--
|
---|
[784] | 195 | { cerr<< " Erreur in Vector3d::VperpTheta()"<<endl;
|
---|
[764] | 196 | throw PError("Vector3d::VperpTheta() - Logic Error DY/Reza 20/02/2000");
|
---|
| 197 | // Bug ??? (D. Yvon, Fevrier 2000)
|
---|
| 198 | // double phi=mod(_phi+pi_over_2,pi2); // on tourne phi de pi/2
|
---|
| 199 | // return Vector3d(_theta,phi);
|
---|
| 200 | }
|
---|
| 201 |
|
---|
| 202 | Vector3d Vector3d::EPhi() const
|
---|
| 203 | {
|
---|
| 204 | Vector3d temp;
|
---|
| 205 | if ( fabs(_z) == 1. ) // si on est en +- Oz
|
---|
| 206 | {
|
---|
| 207 | temp=Vector3d(1.,0.,0.);
|
---|
| 208 | }
|
---|
| 209 | else
|
---|
| 210 | {
|
---|
| 211 | Vector3d k(0,0,-1);
|
---|
| 212 | temp=this->Vect(k);
|
---|
| 213 | temp.Normalize();
|
---|
| 214 | }
|
---|
| 215 | return temp;
|
---|
| 216 | }
|
---|
| 217 | //++
|
---|
| 218 | Vector3d Vector3d::ETheta() const
|
---|
| 219 | //
|
---|
| 220 | //--
|
---|
| 221 | {
|
---|
| 222 | Vector3d temp=this->Vect(EPhi());
|
---|
| 223 | temp.Normalize();
|
---|
| 224 | return temp;
|
---|
| 225 | }
|
---|
| 226 |
|
---|
| 227 | //++
|
---|
| 228 | Vector3d Vector3d::Euler(double phi, double theta, double psi) const
|
---|
| 229 | //
|
---|
| 230 | // Euler's rotations
|
---|
| 231 | //--
|
---|
| 232 | {
|
---|
| 233 | double cpsi=cos(psi);
|
---|
| 234 | double ctheta=cos(theta);
|
---|
| 235 | double cphi=cos(phi);
|
---|
| 236 | double spsi=sin(psi);
|
---|
| 237 | double stheta=sin(theta);
|
---|
| 238 | double sphi=sin(phi);
|
---|
| 239 | double xnew=(cpsi*cphi-ctheta*sphi*spsi)*_x
|
---|
| 240 | +(cpsi*sphi+ctheta*cphi*spsi)*_y
|
---|
| 241 | +spsi*stheta*_z;
|
---|
| 242 | double ynew=(-spsi*cphi-ctheta*sphi*cpsi)*_x
|
---|
| 243 | +(-spsi*sphi+ctheta*cphi*cpsi)*_y
|
---|
| 244 | +cpsi*stheta*_z;
|
---|
| 245 | double znew=stheta*sphi*_x-stheta*cphi*_y+ctheta*_z;
|
---|
| 246 | return Vector3d(xnew,ynew,znew);
|
---|
| 247 | }
|
---|
| 248 | //++
|
---|
| 249 | Vector3d Vector3d::InvEuler(double phi, double theta, double psi) const
|
---|
| 250 | //
|
---|
| 251 | // inverse rotation
|
---|
| 252 | //--
|
---|
| 253 | {
|
---|
| 254 | double cpsi=cos(psi);
|
---|
| 255 | double ctheta=cos(theta);
|
---|
| 256 | double cphi=cos(phi);
|
---|
| 257 | double spsi=sin(psi);
|
---|
| 258 | double stheta=sin(theta);
|
---|
| 259 | double sphi=sin(phi);
|
---|
| 260 | double xnew=(cpsi*cphi-ctheta*sphi*spsi)*_x
|
---|
| 261 | -(spsi*cphi+ctheta*sphi*cpsi)*_y
|
---|
| 262 | +sphi*stheta*_z;
|
---|
| 263 | double ynew=(cpsi*sphi+ctheta*cphi*spsi)*_x
|
---|
| 264 | +(-spsi*sphi+ctheta*cphi*cpsi)*_y
|
---|
| 265 | -cphi*stheta*_z;
|
---|
| 266 | double znew=stheta*spsi*_x+stheta*cpsi*_y+ctheta*_z;
|
---|
| 267 | return Vector3d(xnew,ynew,znew);
|
---|
| 268 | }
|
---|
| 269 | //++
|
---|
[792] | 270 | Vector3d Vector3d::Rotate(const Vector3d& omega, double phi) const
|
---|
[764] | 271 | //
|
---|
| 272 | // rotation of angle phi around an axis omega (Maxwell's rule)
|
---|
| 273 | //--
|
---|
| 274 | {
|
---|
| 275 | Vector3d rotationaxis=omega;
|
---|
| 276 | rotationaxis.Normalize();
|
---|
| 277 | double n=this->Psc(rotationaxis);
|
---|
| 278 | Vector3d myself=*this;
|
---|
| 279 | Vector3d rotate=n*rotationaxis+(myself-n*rotationaxis)*cos(phi)-(myself^rotationaxis)*sin(phi);
|
---|
| 280 | return rotate;
|
---|
| 281 | }
|
---|
| 282 | //++
|
---|
| 283 | void Vector3d::Print(ostream& os) const
|
---|
| 284 | //
|
---|
| 285 | //--
|
---|
| 286 | {
|
---|
| 287 | os << "Vector3: (X,Y,Z)= (" << _x << ", " << _y << ", " << _z
|
---|
| 288 | << ") --- Theta,Phi= " << _theta << ", " << _phi << "\n"
|
---|
| 289 | << "Norme = " << this->Norm() << endl;
|
---|
| 290 | }
|
---|
| 291 | //++
|
---|
| 292 | // Titre Operators
|
---|
| 293 | //--
|
---|
| 294 | //++
|
---|
| 295 | Vector3d& Vector3d::operator += (const Vector3d& v)
|
---|
| 296 | //
|
---|
| 297 | //--
|
---|
| 298 | {
|
---|
| 299 | *this=*this+v;
|
---|
| 300 | return *this;
|
---|
| 301 | }
|
---|
| 302 | //++
|
---|
| 303 | Vector3d& Vector3d::operator -= (const Vector3d& v)
|
---|
| 304 | //
|
---|
| 305 | //--
|
---|
| 306 | {
|
---|
| 307 | *this=*this-v;
|
---|
| 308 | return *this;
|
---|
| 309 | }
|
---|
| 310 | //++
|
---|
| 311 | Vector3d& Vector3d::operator += (double d)
|
---|
| 312 | //
|
---|
| 313 | //--
|
---|
| 314 | {
|
---|
| 315 | Setxyz(_x+d,_y+d,_z+d);
|
---|
| 316 | return *this;
|
---|
| 317 | }
|
---|
| 318 | //++
|
---|
| 319 | Vector3d& Vector3d::operator /= (double d)
|
---|
| 320 | //
|
---|
| 321 | //--
|
---|
| 322 | {
|
---|
| 323 | if( d != 0. ) Setxyz(_x/d,_y/d,_z/d);
|
---|
| 324 | else cerr << "Division par zero." << endl;
|
---|
| 325 | return *this;
|
---|
| 326 | }
|
---|
| 327 | //++
|
---|
| 328 | Vector3d& Vector3d::operator *= (double d)
|
---|
| 329 | //
|
---|
| 330 | //--
|
---|
| 331 | {
|
---|
| 332 | Setxyz(_x*d,_y*d,_z*d);
|
---|
| 333 | return *this;
|
---|
| 334 | }
|
---|
| 335 | //++
|
---|
| 336 | Vector3d Vector3d::operator ^ (const Vector3d& v) const
|
---|
| 337 | //
|
---|
| 338 | // vector product
|
---|
| 339 | //--
|
---|
| 340 | {
|
---|
| 341 | return this->Vect(v);
|
---|
| 342 | }
|
---|
| 343 | //++
|
---|
| 344 | Vector3d Vector3d::operator + (double d) const
|
---|
| 345 | //
|
---|
| 346 | //--
|
---|
| 347 | {
|
---|
| 348 | return Vector3d(_x+d,_y+d,_z+d);
|
---|
| 349 | }
|
---|
| 350 | //++
|
---|
| 351 | Vector3d Vector3d::operator + (const Vector3d& v) const
|
---|
| 352 | //
|
---|
| 353 | //--
|
---|
| 354 | {
|
---|
| 355 | return Vector3d(_x+v._x,_y+v._y,_z+v._z);
|
---|
| 356 | }
|
---|
| 357 | //++
|
---|
| 358 | Vector3d Vector3d::operator - (double d) const
|
---|
| 359 | //
|
---|
| 360 | //--
|
---|
| 361 | {
|
---|
| 362 | return *this+(-d);
|
---|
| 363 | }
|
---|
| 364 | //++
|
---|
| 365 | Vector3d Vector3d::operator - (const Vector3d& v) const
|
---|
| 366 | //
|
---|
| 367 | //--
|
---|
| 368 | {
|
---|
| 369 | return *this+(v*(-1.));
|
---|
| 370 | }
|
---|
| 371 | //++
|
---|
| 372 | Vector3d Vector3d::operator * (double d) const
|
---|
| 373 | //
|
---|
| 374 | //--
|
---|
| 375 | {
|
---|
| 376 | return Vector3d(d*_x,d*_y,d*_z);
|
---|
| 377 | }
|
---|
| 378 | //++
|
---|
| 379 | double Vector3d::operator * (const Vector3d& v) const
|
---|
| 380 | //
|
---|
| 381 | // dot product
|
---|
| 382 | //--
|
---|
| 383 | {
|
---|
| 384 | return this->Psc(v);
|
---|
| 385 | }
|
---|
| 386 | //++
|
---|
| 387 | Vector3d Vector3d::operator / (double d) const
|
---|
| 388 | //
|
---|
| 389 | //--
|
---|
| 390 | {
|
---|
| 391 | Vector3d ret=*this;
|
---|
| 392 | if( d != 0. ) ret/=d;
|
---|
| 393 | else cerr << "Division par zero." << endl;
|
---|
| 394 | return ret;
|
---|
| 395 | }
|
---|
| 396 | //++
|
---|
| 397 | Vector3d& Vector3d::operator = (const Vector3d& v)
|
---|
| 398 | //
|
---|
| 399 | //--
|
---|
| 400 | {
|
---|
| 401 | if( this != &v )
|
---|
| 402 | {
|
---|
| 403 | _x=v._x;
|
---|
| 404 | _y=v._y;
|
---|
| 405 | _z=v._z;
|
---|
| 406 | _theta=v._theta;
|
---|
| 407 | _phi=v._phi;
|
---|
| 408 | }
|
---|
| 409 | return *this;
|
---|
| 410 | }
|
---|
| 411 | //++
|
---|
| 412 | bool Vector3d::operator == (const Vector3d& v)
|
---|
| 413 | //
|
---|
| 414 | //--
|
---|
| 415 | {
|
---|
| 416 | return (this==&v);
|
---|
| 417 | }
|
---|
| 418 |
|
---|