aboutsummaryrefslogtreecommitdiffstats
path: root/vmodels/bpl.hpp
blob: e99efe3952de64038b5685840dbd5c174122a60c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
#ifndef BROKEN_POWER_LAW_MODEL_H_
#define BROKEN_POWER_LAW_MODEL_H_
#define OPT_HEADER
#include <core/fitter.hpp>
#include <cmath>
#include <misc/optvec.hpp>

namespace opt_utilities
{
  template <typename T>
  class bpl1d
    :public model<optvec<T>,optvec<T>,optvec<T>,std::string>
  {
  private:
    bpl1d* do_clone()const
    {
      return new bpl1d<T>(*this);
    }

    const char* do_get_type_name()const
    {
      return "broken power law";
    }
  public:
    bpl1d()
    {
      this->push_param_info(param_info<optvec<T> >("bpx",1));
      this->push_param_info(param_info<optvec<T> >("bpy",1));
      this->push_param_info(param_info<optvec<T> >("gamma1",1));
      this->push_param_info(param_info<optvec<T> >("gamma2",1));
    }

    optvec<T> do_eval(const optvec<T>& x,const optvec<T>& param)
    {
      T x_b=get_element(param,0);
      T f_b=get_element(param,1);
      T gamma1=get_element(param,2);
      T gamma2=get_element(param,3);
      
      optvec<T> result(x.size());
      for(int i=0;i<result.size();++i)
	{
	  if(x[i]<x_b)
	    {
	      result[i]=f_b*pow(x[i],gamma1)/pow(x_b,gamma1);
	    }
	  else
	    {
	      result[i]=f_b*pow(x[i],gamma2)/pow(x_b,gamma2);
	    }
	}
      return result;
    }
    

  private:
    std::string do_get_information()const
    {
      return "";
    }
  };
}



#endif
//EOF