Last change
on this file since 801 was 801, checked in by ansari, 25 years ago |
Fichiers au format unix
dominique
|
File size:
938 bytes
|
Rev | Line | |
---|
[801] | 1 | // Dominique YVON, CEA/DAPNIA/SPP 02/2000
|
---|
| 2 |
|
---|
| 3 | #include <math.h>
|
---|
| 4 | #ifdef __MWERKS__
|
---|
| 5 | #include "mwerksmath.h"
|
---|
| 6 | #include "unixmac.h"
|
---|
| 7 | #endif
|
---|
| 8 | #include "meanlobe.h"
|
---|
| 9 |
|
---|
| 10 |
|
---|
| 11 |
|
---|
| 12 | class Lobe4PiGaussien:public MeanFreqLobe
|
---|
| 13 | {
|
---|
| 14 | public:
|
---|
| 15 | Lobe4PiGaussien(double FWHM_degre, double freqMin, double freqMax)
|
---|
| 16 | :MeanFreqLobe(freqMin,freqMax){
|
---|
| 17 | sigma=minToRad(FWHM_degre/2.354*60.);
|
---|
| 18 | angleMax=M_PI;
|
---|
| 19 | cosanglemax=cos(angleMax);
|
---|
| 20 | sprintf(Name, "Lobe 4Pi Gaussien");
|
---|
| 21 | }
|
---|
| 22 | virtual ~Lobe4PiGaussien(){ };
|
---|
| 23 | virtual double weigthAmpl(const UnitVector& VInteg, const UnitVector& VP,
|
---|
| 24 | const UnitVector& VY) const {
|
---|
| 25 | double ang= acos(VP*VInteg);
|
---|
| 26 | return exp(-ang*ang/(2*sigma*sigma));
|
---|
| 27 | }
|
---|
| 28 | virtual double lobeResol() const{
|
---|
| 29 | return sigma*2.354/3.; // On veut pixeliser/calculer au moins FWHM/3.
|
---|
| 30 | }
|
---|
| 31 | virtual double ResolutionCurve(double angleShift) const{
|
---|
| 32 | return (double) (1.+(angleShift/sigma/7.));
|
---|
| 33 | }
|
---|
| 34 |
|
---|
| 35 | protected:
|
---|
| 36 | double sigma;
|
---|
| 37 | };
|
---|
Note:
See
TracBrowser
for help on using the repository browser.