Last change
on this file since 989 was 801, checked in by ansari, 25 years ago |
Fichiers au format unix
dominique
|
File size:
938 bytes
|
Line | |
---|
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.