1 files changed, 92 insertions, 0 deletions
diff --git a/models/dbeta2d.hpp b/models/dbeta2d.hpp
new file mode 100644
index 0000000..6811270
--- /dev/null
+++ b/models/dbeta2d.hpp
@@ -0,0 +1,92 @@
+#ifndef DBETA_MODEL2d_H_
+#define DBETA_MODEL2d_H_
+#include <core/fitter.hpp>
+#include <cmath>
+#include <cassert>
+#include "vecn.hpp"
+
+namespace opt_utilities
+{
+  
+  template <typename T>
+  class dbeta2d
+    :public model<T,vecn<T,2>,std::vector<T>,std::string>
+  {
+  private:
+    model<T,vecn<T,2>,std::vector<T> >* do_clone()const
+    {
+      return new dbeta2d<T>(*this);
+    }
+    
+    
+    
+  public:
+    dbeta2d()
+    {
+      push_param_info(param_info<std::vector<T> >("S01",1));
+      push_param_info(param_info<std::vector<T> >("rc11",50));
+      push_param_info(param_info<std::vector<T> >("rc21",50));
+      push_param_info(param_info<std::vector<T> >("rho1",0));
+      push_param_info(param_info<std::vector<T> >("x01",200));
+      push_param_info(param_info<std::vector<T> >("y01",200));
+      push_param_info(param_info<std::vector<T> >("beta1",2./3.));
+      
+      push_param_info(param_info<std::vector<T> >("S02",1));
+      push_param_info(param_info<std::vector<T> >("rc12",60));
+      push_param_info(param_info<std::vector<T> >("rc22",60));
+      push_param_info(param_info<std::vector<T> >("rho2",0));
+      push_param_info(param_info<std::vector<T> >("x02",200));
+      push_param_info(param_info<std::vector<T> >("y02",200));
+      push_param_info(param_info<std::vector<T> >("beta2",2./2.5));
+      push_param_info(param_info<std::vector<T> >("bkg",0));
+    }
+    
+    T do_eval(const vecn<T,2>& xy,const std::vector<T>& param)
+    {
+      T S01=get_element(param,0);
+      T rc11=get_element(param,1);
+      T rc21=get_element(param,2);
+      T rho1=get_element(param,3);
+      T x01=get_element(param,4);
+      T y01=get_element(param,5);
+      T beta1=get_element(param,6);
+      T S02=get_element(param,7);
+      T rc12=get_element(param,8);
+      T rc22=get_element(param,9);
+      T rho2=get_element(param,10);
+      T x02=get_element(param,11);
+      T y02=get_element(param,12);
+      T beta2=get_element(param,13);
+      T bkg=get_element(param,14);
+      
+      
+      T x=xy[0];
+      T y=xy[1];
+
+      rho1=rho1>1?1:rho1;
+      rho1=rho1<-1?-1:rho1;
+      rho2=rho2>1?1:rho2;
+      rho2=rho2<-1?-1:rho2;
+      
+      T r1=(x-x01)*(x-x01)/(rc11*rc11)+(y-y01)*(y-y01)/(rc21*rc21)
+	-2*rho1*(x-x01)*(y-y01)/(rc11*rc21);
+
+      T r2=(x-x02)*(x-x02)/(rc12*rc12)+(y-y02)*(y-y02)/(rc22*rc22)
+	-2*rho2*(x-x02)*(y-y02)/(rc12*rc22);
+      //      r1=r1<0?0:r1;
+      //r2=r2<0?0:r2;
+      assert(r1>=0);
+      assert(r2>=0);
+      
+
+      return bkg+S01*pow(1+r1,-3*beta1+static_cast<T>(.5))+
+	S02*pow(1+r2,-3*beta2+static_cast<T>(.5));
+    }
+  };
+};
+
+
+
+#endif
+//EOF
+