| [601] | 1 | //--------------------------------------------------------------------------
 | 
|---|
 | 2 | // File and Version Information:
 | 
|---|
| [927] | 3 | //      $Id: trianglefilt.cc,v 1.6 2000-04-14 07:28:14 ansari Exp $
 | 
|---|
| [601] | 4 | //
 | 
|---|
 | 5 | // Description:
 | 
|---|
 | 6 | //
 | 
|---|
 | 7 | // History (add to end):
 | 
|---|
 | 8 | //      Sophie   Oct, 1999  - creation
 | 
|---|
 | 9 | //
 | 
|---|
 | 10 | //------------------------------------------------------------------------
 | 
|---|
 | 11 | 
 | 
|---|
 | 12 | //---------------
 | 
|---|
 | 13 | // C++ Headers --
 | 
|---|
 | 14 | //---------------
 | 
|---|
 | 15 | #include "machdefs.h"
 | 
|---|
 | 16 | #include <iostream.h>
 | 
|---|
 | 17 | 
 | 
|---|
 | 18 | #include "trianglefilt.h"
 | 
|---|
 | 19 | 
 | 
|---|
 | 20 | //----------------
 | 
|---|
 | 21 | // Constructor --
 | 
|---|
 | 22 | //----------------
 | 
|---|
| [909] | 23 | /*! 
 | 
|---|
 | 24 |  * \class SOPHYA::TriangleFilter
 | 
|---|
| [927] | 25 |  \ingroup SkyT
 | 
|---|
| [909] | 26 |  * triangle detector response
 | 
|---|
 | 27 |  */
 | 
|---|
| [668] | 28 | TriangleFilter::TriangleFilter()
 | 
|---|
 | 29 |    : SpectralResponse()
 | 
|---|
 | 30 | {
 | 
|---|
 | 31 | }
 | 
|---|
| [909] | 32 | /*! Constructor: nupeak is the frequency value at the hat of the triangle and
 | 
|---|
 | 33 |   valueatpeak is the corresponding transmission value. */
 | 
|---|
| [601] | 34 | TriangleFilter::TriangleFilter(double numin, double numax,double nupeak, double valueatpeak)
 | 
|---|
 | 35 |    : SpectralResponse(numin, numax)
 | 
|---|
 | 36 | {
 | 
|---|
 | 37 |   _nuPeak = nupeak ;
 | 
|---|
 | 38 |   _peakTransmission = valueatpeak;
 | 
|---|
 | 39 | }
 | 
|---|
 | 40 | 
 | 
|---|
 | 41 | //--------------
 | 
|---|
 | 42 | // Destructor --
 | 
|---|
 | 43 | //--------------
 | 
|---|
 | 44 | TriangleFilter::~TriangleFilter()
 | 
|---|
 | 45 | {
 | 
|---|
 | 46 | }
 | 
|---|
 | 47 | 
 | 
|---|
 | 48 | //              ---------------------------
 | 
|---|
 | 49 | //              --  Function Definitions --
 | 
|---|
 | 50 | //              ---------------------------
 | 
|---|
 | 51 | 
 | 
|---|
| [909] | 52 | /*! The transmission function is a triangle defined in the constructor
 | 
|---|
 | 53 | by numin and numax (for which the transmission goes to 0.) and
 | 
|---|
 | 54 | the hat of the triangle (defined by a peak frequency and the corresponding
 | 
|---|
 | 55 | transmission value. */
 | 
|---|
| [601] | 56 | double 
 | 
|---|
 | 57 | TriangleFilter::transmission(double nu) const
 | 
|---|
 | 58 | {
 | 
|---|
 | 59 |   if(nu < -1.e99) nu = -1.e99;
 | 
|---|
 | 60 |   if(nu > 1.e99) nu = 1.e99;
 | 
|---|
 | 61 |   
 | 
|---|
 | 62 |   if(nu>_numin && nu<_nuPeak) return (_peakTransmission*nu/_nuPeak);
 | 
|---|
 | 63 |   if(nu>=_nuPeak && nu<_numax) return (_peakTransmission*nu/(_nuPeak-_numax)+_peakTransmission-_peakTransmission*_nuPeak/(_nuPeak-_numax));
 | 
|---|
 | 64 |   return 0.;
 | 
|---|
 | 65 | }
 | 
|---|
 | 66 | 
 | 
|---|
 | 67 | double 
 | 
|---|
 | 68 | TriangleFilter::peakFreq() const 
 | 
|---|
 | 69 | {
 | 
|---|
 | 70 | return _nuPeak;
 | 
|---|
 | 71 | }
 | 
|---|
 | 72 | 
 | 
|---|
 | 73 | double 
 | 
|---|
 | 74 | TriangleFilter::peakTransmission() const 
 | 
|---|
 | 75 | {
 | 
|---|
| [909] | 76 |   return _peakTransmission;
 | 
|---|
| [601] | 77 | }
 | 
|---|
| [668] | 78 | 
 | 
|---|
| [669] | 79 | /*
 | 
|---|
| [668] | 80 | void
 | 
|---|
 | 81 | TriangleFilter::WriteSelf(POutPersist& s) 
 | 
|---|
 | 82 | {
 | 
|---|
 | 83 |   s.PutR8(this->peakFreq());
 | 
|---|
 | 84 |   s.PutR8(this->peakTransmission());
 | 
|---|
 | 85 |   s.PutR8(this->minFreq());
 | 
|---|
 | 86 |   s.PutR8(this->maxFreq());
 | 
|---|
 | 87 |   
 | 
|---|
 | 88 | }
 | 
|---|
 | 89 | 
 | 
|---|
 | 90 | void
 | 
|---|
 | 91 | TriangleFilter::ReadSelf(PInPersist& s)   
 | 
|---|
 | 92 | {
 | 
|---|
 | 93 |   //  double peakFreq, peakTransmission, minFreq,  maxFreq;
 | 
|---|
 | 94 |   s.GetR8(_nuPeak);
 | 
|---|
 | 95 |   s.GetR8(_peakTransmission);
 | 
|---|
 | 96 |   s.GetR8(_numin);
 | 
|---|
 | 97 |   s.GetR8(_numax);
 | 
|---|
 | 98 |   cout << "peakFreq - peakTransmission - minFreq - maxFreq " << endl; 
 | 
|---|
 | 99 |   cout <<  _nuPeak << "-" <<  _peakTransmission<< "-" <<  _numin << "-" <<  _numax << endl;
 | 
|---|
 | 100 | 
 | 
|---|
 | 101 | }
 | 
|---|
| [669] | 102 | 
 | 
|---|
 | 103 | */
 | 
|---|