| Last change
 on this file since 2845 was             2615, checked in by cmv, 21 years ago | 
        
          | 
using namespace sophya enleve de machdefs.h, nouveau sopnamsp.h  cmv 10/09/2004
 | 
        
          | File size:
            1.6 KB | 
      
      
| Line |  | 
|---|
| 1 | #include "sopnamsp.h" | 
|---|
| 2 | #include "longlat.h" | 
|---|
| 3 | //++ | 
|---|
| 4 | // Class        LongLat | 
|---|
| 5 | // | 
|---|
| 6 | // include      longlat.h | 
|---|
| 7 | // | 
|---|
| 8 | //    translation from  coordinates (longitude, latitude) | 
|---|
| 9 | //    to theta,phi | 
|---|
| 10 | // | 
|---|
| 11 | //    longitude=phi | 
|---|
| 12 | // | 
|---|
| 13 | //    latitude=Pi/2-theta | 
|---|
| 14 | // | 
|---|
| 15 | //-- | 
|---|
| 16 | //++ | 
|---|
| 17 | // Titre        Constructors | 
|---|
| 18 | //-- | 
|---|
| 19 | //++ | 
|---|
| 20 | LongLat::LongLat() | 
|---|
| 21 | // | 
|---|
| 22 | //-- | 
|---|
| 23 | { | 
|---|
| 24 | _lon=0.; | 
|---|
| 25 | _lat=0.; | 
|---|
| 26 | } | 
|---|
| 27 | //++ | 
|---|
| 28 | LongLat::LongLat(double longitude, double latitude) | 
|---|
| 29 | // | 
|---|
| 30 | //-- | 
|---|
| 31 | { | 
|---|
| 32 | _lon=mod(longitude,pi2); | 
|---|
| 33 | if( latitude == pi_over_2 ) _lat=latitude; | 
|---|
| 34 | else _lat=mod(latitude+pi_over_2,M_PI)-pi_over_2; // dans [-Pi/2,Pi/2] | 
|---|
| 35 | } | 
|---|
| 36 | //++ | 
|---|
| 37 | LongLat::LongLat(double x, double y, double z) | 
|---|
| 38 | // | 
|---|
| 39 | //-- | 
|---|
| 40 | { | 
|---|
| 41 | double norm=sqrt(x*x+y*y+z*z); | 
|---|
| 42 | double theta; | 
|---|
| 43 | if( norm != 0. ) | 
|---|
| 44 | { | 
|---|
| 45 | theta=acos(z/norm); // dans [0,Pi] | 
|---|
| 46 | if( mod(theta,M_PI) == 0. ) _lon=0.; // on est sur +-Oz, le vecteur z est en phi=0 | 
|---|
| 47 | //      else _lon=acos(x/sin(theta)/norm)+M_PI*(y<0); | 
|---|
| 48 | else _lon=scangle(y/sin(theta)/norm,x/sin(theta)/norm); | 
|---|
| 49 | } | 
|---|
| 50 | else // vecteur nul | 
|---|
| 51 | { | 
|---|
| 52 | theta=0.; | 
|---|
| 53 | _lon=0.; | 
|---|
| 54 | } | 
|---|
| 55 | _lat=pi_over_2-theta; | 
|---|
| 56 | } | 
|---|
| 57 | //++ | 
|---|
| 58 | // Titre        Public Methods | 
|---|
| 59 | //-- | 
|---|
| 60 | //++ | 
|---|
| 61 | void LongLat::Set(double longitude, double latitude) | 
|---|
| 62 | // | 
|---|
| 63 | //-- | 
|---|
| 64 | { | 
|---|
| 65 | _lon=mod(longitude,pi2); | 
|---|
| 66 | if( latitude == pi_over_2 ) _lat=latitude; | 
|---|
| 67 | else _lat=mod(latitude+pi_over_2,M_PI)-pi_over_2; // dans [-Pi/2,Pi/2] | 
|---|
| 68 | } | 
|---|
| 69 | //++ | 
|---|
| 70 | void LongLat::Print(ostream& os) const | 
|---|
| 71 | // | 
|---|
| 72 | //-- | 
|---|
| 73 | { | 
|---|
| 74 | os << "LongLat : longitude = " << _lon << " phi   = " << this->Phi() << endl; | 
|---|
| 75 | os << "LongLat : latitude    = " << _lat << " theta = " << this->Theta() << endl; | 
|---|
| 76 | } | 
|---|
| 77 | //++ | 
|---|
| 78 | // | 
|---|
| 79 | //  double Longitude() const | 
|---|
| 80 | //  double Phi() const | 
|---|
| 81 | //  double Latitude() | 
|---|
| 82 | //  double Theta() const | 
|---|
| 83 | //-- | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.