Различные алгоритмы минимизации, реализованные в С++ / all / MSG

#include <conio.h>
#include <iostream.h>
#include <math.h>

struct Vector
{
 double x1,x2;
 Vector()
 {
  x1=0;
  x2=0;
 }
 Vector(double ax1,double ax2)
 {
  x1=ax1;
  x2=ax2;
 }
 const Vector operator * (const double &vec) const
 {
  return Vector(x1*vec,x2*vec);
 }

 const void operator = (const Vector &vec)
 {
  x1=vec.x1;
  x2=vec.x2;
 }

 const double operator * (const Vector &vec) const
 {
  return (x1*vec.x1+x2*vec.x2);
 }

 const Vector operator + (const Vector &vec) const
 {
  return Vector(x1+vec.x1,x2+vec.x2);
 }

 const Vector operator - (const Vector &vec) const
 {
  return Vector(x1-vec.x1,x2-vec.x2);
 }
};

double function(Vector vec)
{
//return((vec.x1*vec.x1+vec.x2-11)*(vec.x1*vec.x1+vec.x2-11)+(vec.x1+vec.x2*vec.x2-7)*(vec.x1+vec.x2*vec.x2-7));
//return(4*vec.x1*vec.x1+3*vec.x2*vec.x2-4*vec.x1*vec.x2+vec.x1);
return(-12*vec.x2+4*vec.x1*vec.x1+4*vec.x2*vec.x2-4*vec.x1*vec.x2);
//return(3*vec.x1*vec.x1+3*vec.x2*vec.x2-vec.x1*vec.x2+vec.x1);
//return (4*(vec.x1-5)*(vec.x1-5)+(vec.x2-6)*(vec.x2-6));
}

double f_dx1(Vector vec)
{
//return(4*vec.x1*(vec.x1*vec.x1+vec.x2-11)+2*(vec.x1+vec.x2*vec.x2-7));
//return(8*vec.x1-4*vec.x2+1);
return(8*vec.x1-4*vec.x2);
//return(6*vec.x1-vec.x2+1);
//return (8*(vec.x1-5));
}

double f_dx2(Vector vec)
{
//return(2*(vec.x1*vec.x1+vec.x2-11)+4*vec.x2*(vec.x1+vec.x2*vec.x2-7));
//return(6*vec.x2-4*vec.x1);
return(-12+8*vec.x2-4*vec.x1);
//return(6*vec.x2-vec.x1);
//return (2*(vec.x2-6));
}

Vector Angrad(Vector vec)
{
 Vector grad;
 grad=Vector(f_dx1(vec),f_dx2(vec));
 return (grad*(-1));
}

/*double Alfa(Vector vec,Vector p)
{
 double a;
 a=(40*p.x1+12*p.x2-8*vec.x1*p.x1-2*vec.x2*p.x2)/(8*p.x1*p.x1+2*p.x2*p.x2);
 return(a);
} */
double proizv(Vector vec,Vector p)
{
 Vector grad;
 grad=Vector(f_dx1(vec),f_dx2(vec));
 return (grad*p);
}

void Swann4(Vector &x1,double &a,double &b,Vector &p)
{
 double pr;
 Vector x2;
 pr=proizv(x1,p);
 if(pr>0) p=Vector(0,0)-p;
 b=fabs(function(x1)/pr-1);
 if(b>1) b=1;
 x2=x1+p*b;
 while(proizv(x1,p)*proizv(x2,p)>0)
 {
  a=b;
  b*=2;
  x1=x2;
  x2=x1+p*b;
 }
}

double Alfa(Vector &x1,Vector p,double a1,double b1)
{
 double w,z,ar,k;
 Vector r;
 Swann4(x1,a1,b1,p);
 z=proizv(x1+p*a1,p)+proizv(x1+p*b1,p)+3*(function(x1+p*a1)-function(x1+p*b1))/(b1-a1);
 w=sqrt(z*z-proizv(x1+p*a1,p)*proizv(x1+p*b1,p));
 ar=b1*(w-proizv(x1+p*a1,p)+z)/(2*w-proizv(x1+p*a1,p)+proizv(x1+p*b1,p));
 return(ar);
}

void main()
{
 clrscr();
 double e=0.001,betta,a,a1,b1;
 Vector x1,x2,x3,x4,x5,p1,p2,g1,g2,an_g2;
 x1=Vector(1,0);
 p1=Angrad(x1);
// g1=Angrad(x1)*(-1);
 a=Alfa(x1,p1,a1,b1);
 x2=x1+p1*a;
 g2=Angrad(x2);
// an_g2=g2*(-1);
 if (sqrt(p1.x1*p1.x1+p1.x2*p1.x2)<e) cout<<x2.x1<<endl<<x2.x2;
 else
 {
   betta=(g2.x1*g2.x1+g2.x2*g2.x2)/(p1.x1*p1.x1+p1.x2*p1.x2);
   p2=g2+p1*betta;
   a=Alfa(x2,p2,a1,b1);
   x3=x2+p2*a;
   if (sqrt(g2.x1*g2.x1+g2.x2*g2.x2)<e) cout<<x3.x1<<endl<<x3.x2;
 }
 while(sqrt(g2.x1*g2.x1+g2.x2*g2.x2)>e)
 {
  p1=Angrad(x3);
 // g1=Angrad(x3)*(-1);
  a=Alfa(x3,p1,a1,b1);
  x4=x3+p1*a;
  g2=Angrad(x4);
 // an_g2=g2*(-1);
  if (sqrt(p1.x1*p1.x1+p1.x2*p1.x2)<e) cout<<x4.x1<<endl<<x4.x2;
  else
 {
   betta=(g2.x1*g2.x1+g2.x2*g2.x2)/(p1.x1*p1.x1+p1.x2*p1.x2);
   p2=g2+p1*betta;
   a=Alfa(x4,p2,a1,b1);
   x5=x4+p2*a;
   if (sqrt(g2.x1*g2.x1+g2.x2*g2.x2)<e) cout<<x5.x1<<endl<<x5.x2;
 }
}
 getch();
}