init

FOTF Toolbox/Simulink/bench/bp3_fcn.m

@@ -0,0 +1,4 @@
+function y=bp3_fcn(u)
+   y=u^(1.5-sqrt(2))*exp(u)*...
+       ml_func([1,3-sqrt(2)],-u)./ml_func([1,1.5],-u);
+end

FOTF Toolbox/Simulink/bench/bp4_fcn.m

@@ -0,0 +1,4 @@
+function y=bp4_fcn(t)
+   y=1/8*t*(ml_func([1,1.8],-t/2)*ml_func([1,1.2],-t/2)+...
+       ml_func([1,1.7],-t/2)*ml_func([1,1.3],-t/2));
+end

FOTF Toolbox/Simulink/bench/bp5_fcn.m

@@ -0,0 +1,5 @@
+function y=bp5_fcn(u)
+   y=[(((u(2)-0.5)*(u(3)-0.3))^(1/5)+sqrt(u(4)))/sqrt(pi);
+      (u(1)-1)*gamma(2.2); (u(2)-0.5)*gamma(2.3)/gamma(2.2)];
+   y=real(y);   %{\kaishu\,因未知原因混入微小的虚数，所以需要提取实部}
+end

FOTF Toolbox/Simulink/bench/bp5a_fcn2.m

@@ -0,0 +1,6 @@
+function y=c8mfss3a(u)
+   y=[2/sqrt(pi)*(((u(2)-0.3)*(u(3)-0.5*u(1)))^(1/5)+sqrt(u(5)));
+      gamma(1.4)/gamma(1.3)*((u(1)-1)/2)^0.3;
+      u(4); gamma(3.1)/gamma(1.6)*sqrt((u(2)-0.3)^3)];
+   y=real(y);   %{\kaishu\,因未知原因混入微小的虚数，所以需要提取实部}
+end

FOTF Toolbox/Simulink/bench/bp5b_fcn.m

@@ -0,0 +1,6 @@
+function y=bp5b_fcn(u)
+   y=[4/sqrt(pi)*((u(2)-0.3)*(u(3)-0.5*u(1)))^(1/5);
+      gamma(1.4)/gamma(1.3)*((u(1)-1)/2)^0.3;
+      gamma(3.1)/gamma(1.6)*sqrt((u(2)-0.3)^3)];
+   y=real(y);   %{\kaishu\,因未知原因混入微小的虚数，所以需要提取实部}
+end

FOTF Toolbox/Simulink/bench/bp6_fcn.m

@@ -0,0 +1,3 @@
+function y = bp6_fcn(u)
+y=u^(1.5-sqrt(2))*exp(u)*...
+    ml_func([1,3-sqrt(2)],-u)./ml_func([1,1.5],-u);

FOTF Toolbox/Simulink/bench/bp7_opts.m

@@ -0,0 +1,5 @@
+function y=bp7_opts(x)
+   W=get_param(gcs,'ModelWorkspace'); assignin(W,'a',x(1))
+   try, txy=sim('bp7_model'); y0=txy.yout; y=abs(y0(end)-exp(-1));
+   catch, y=10; end
+end

FOTF Toolbox/Simulink/bench/bp8_fcn.m

@@ -0,0 +1,3 @@
+function y = bp7_fcn(u)
+y=u^(1.5-sqrt(2))*exp(u)*...
+    ml_func([1,3-sqrt(2)],-u)./ml_func([1,1.5],-u);

FOTF Toolbox/Simulink/bench/bp8a_fcn.m

@@ -0,0 +1,4 @@
+function y=bp8a_fcn(t)
+   y=t^(1.5-sqrt(2))*exp(t-0.3)*...
+       ml_func([1,3-sqrt(2)],-t)./ml_func([1,1.5],-t);
+end