Loading [MathJax]/extensions/TeX/AMSsymbols.js
LAL 7.7.0.1-3a66518
All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Modules Pages
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 */
49void
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