| Last change
 on this file since 975 was             801, checked in by ansari, 26 years ago | 
        
          | 
Fichiers au format unix
 
dominique
 | 
        
          | File size:
            513 bytes | 
      
      
| Line |  | 
|---|
| 1 | // Dominique YVON, CEA/DAPNIA/SPP | 
|---|
| 2 |  | 
|---|
| 3 | #include <math.h> | 
|---|
| 4 | #ifdef __MWERKS__ | 
|---|
| 5 | #include "mwerksmath.h" | 
|---|
| 6 | //   #include "unixmac.h" | 
|---|
| 7 | #endif | 
|---|
| 8 |  | 
|---|
| 9 | #include "abslobenopolar.h" | 
|---|
| 10 |  | 
|---|
| 11 | int AbsLobeNoPolar::gorskyNlatFromRes() const { | 
|---|
| 12 | double rlat= M_PI/2./lobeResol(); | 
|---|
| 13 | int nlat=2; | 
|---|
| 14 | while(nlat<rlat) nlat*=2; | 
|---|
| 15 | if (nlat>8192) cerr<<"warning: taille gorskyNlat: "<< nlat<<endl; | 
|---|
| 16 | return nlat; | 
|---|
| 17 | } | 
|---|
| 18 |  | 
|---|
| 19 | void AbsLobeNoPolar::print(ostream& OutStr) const | 
|---|
| 20 | {       OutStr<<"Lobe: "<<Name<<endl; | 
|---|
| 21 | OutStr<<"Angle Max: "<< angleMax<<endl; | 
|---|
| 22 | return; | 
|---|
| 23 | } | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.