Advertisement
adwas33

Untitled

Dec 16th, 2022
29
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.58 KB | None | 0 0
  1. matrix fe3(matrix x,matrix ud1,matrix ud2)
  2. {
  3. matrix y;
  4. matrix y0(4,new double[4]{0,x(0),100,0});
  5. matrix *Y= solve_ode(df,0,0.01,7,y0,ud1,x(1));
  6. int n=get_len(Y[0]) ;
  7. int i50=0,i0=0;
  8. for(int i=0;i<n;i++)
  9. {
  10. if(abs(Y[1](i,2)-50)<abs(Y[1](i50,2)-50))
  11. if(abs(Y[1](i,2))<abs(Y[1](i0,2)))
  12. i0=i;
  13. }
  14. y= -Y[1](i0,0);
  15. if(abs(x(0))-10>0) y=y+ud2* pow(abs(x(0))-10,2);
  16. if(abs(x(1))-25>0) y=y +ud2*pow(abs(1)-25,2);
  17. if(abs(Y[1](i50,0)-5)-1>0) y=y+ud2*pow(abs(Y[1](i50,0)-5)-1,2));
  18. return y;
  19. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement