LAL  7.5.0.1-8083555
LALAdvLIGOPsd.c
Go to the documentation of this file.
1 /*
2 * Copyright (C) 2007 Bernd Machenschalk, B.S. Sathyaprakash, Thomas Cokelaer
3 *
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 *
14 * You should have received a copy of the GNU General Public License
15 * along with with program; see the file COPYING. If not, write to the
16 * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
17 * MA 02110-1301 USA
18 */
19 
20 #include <lal/LALNoiseModels.h>
21 
22 #ifdef __GNUC__
23 #define UNUSED __attribute__ ((unused))
24 #else
25 #define UNUSED
26 #endif
27 
28 
29 /**
30  * \author Sathyaprakash, B. S.
31  * \ingroup LALNoiseModels_h
32  * \brief Module to calculate the noise power spectral density for the initial LIGO detector.
33  *
34  * ### Description ###
35  *
36  * This function module takes as an input a frequency \f$f\f$ in Hz, and it
37  * calculates the noise spectral density (per Hz) \f$S_{h}(f)\f$
38  * for that frequency. The noise PSD is based on data provided by
39  * Kip Thorne, and the fit by B.S.Sathyaprakash
40  *
41  * \f{equation}{
42  * S_h(f) = S_0\left\{ \left(\frac{f}{f_0}\right)^{-4.14} - 5\left(\frac{f_0}{f}\right)^2 + 111 \left(\frac{1. -
43  * \frac{f}{f_0}^2 + 0.5 \frac{f}{f_0}^4}{1. + 0.5\frac{f}{f_0}^2} \right)\right\};
44  * \f}
45  * where, \f$f_0=215\f$Hz
46  * The returned value is scaled up by \f$S_0 = 10^{49}.\f$
47  *
48  */
49 void
51 {
52 
53  REAL8 x2,x;
54  x = f/215.;
55  x2 = x*x;
56  *psd = pow(x,-4.14) - 5./x2 + 111. * (1. - x2 + 0.5 * x2*x2)/(1. + 0.5*x2);
57 }
static double f(double theta, double y, double xi)
Definition: XLALMarcumQ.c:258
double REAL8
Double precision real floating-point number (8 bytes).
void LALAdvLIGOPsd(LALStatus UNUSED *status, REAL8 *psd, REAL8 f)
Module to calculate the noise power spectral density for the initial LIGO detector.
Definition: LALAdvLIGOPsd.c:50
LAL status structure, see The LALStatus structure for more details.
Definition: LALDatatypes.h:947