JAttenuationLength.cc

Go to the documentation of this file.

#include <iostream>
#include <iomanip>

#include "TROOT.h"
#include "TFile.h"
#include "TH1D.h"

#include "JAcoustics/JAcousticsSupportkit.hh"

#include "Jeep/JParser.hh"
#include "Jeep/JMessage.hh"


/**
 * \file
 *
 * Auxiliary program to plot attenuation length.
 *
 * See Figure 4.1 in reference:
 * Robert Lahmann: "Ultra-High-Energy Neutrinos and Their Acoustic Detection in the Sea"
 * <a href="https://ecap.nat.fau.de/wp-content/uploads/2017/04/habil_schrift.pdf">Habilitation Thesis</a>, University of Erlangen 
 *
 * \author mdejong
 */
int main(int argc, char **argv)
{
  using namespace std;
  using namespace JPP;

  string      outputFile;
  double      D_m;
  int         debug;

  try {

    JParser<> zap("Auxiliary program to plot attenuation length.");

    zap['o'] = make_field(outputFile)          = "attenuation_length.root";
    zap['D'] = make_field(D_m,     "depth [m]");
    zap['d'] = make_field(debug)               = 1;

    zap(argc, argv);
  }
  catch(const exception &error) {
    FATAL(error.what() << endl);
  }


  TFile out(outputFile.c_str(), "recreate");

  TH1D h0("h0", NULL, 1000, 0.0, 3.0);

  for (Int_t ix = 1; ix <= h0.GetXaxis()->GetNbins(); ++ix) {

    const double x     = h0.GetBinCenter(ix);
    const double f_kHz = pow(10.0, x);
    const double y     = getAttenuationLength(D_m, f_kHz);
    
    h0.SetBinContent(ix, y * 1.0e-3);
  }

  out.Write();
  out.Close();
}