Last change
on this file since 1147 was 801, checked in by ansari, 25 years ago |
Fichiers au format unix
dominique
|
File size:
513 bytes
|
Rev | Line | |
---|
[801] | 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;
|
---|
[798] | 23 | } |
---|
Note:
See
TracBrowser
for help on using the repository browser.