clear; clc
format long g

T=0.3;
Vsw=2500;
Vvw=3900;
Vs=100;
Vv=187;
yc=25;
yd=16;
yst=19;
yw=10;
kh1=0.3;
H=10;
ru=0.2;
b=0.2*H;
h=0.75*H;
B=30*pi/180;
D=B/2;
C=10*pi/180;

% A=0:0.01*pi/180:pi/2;
%  t=0:0.001:0.3;

syms A t

yy=((h/H)^2*yst+(1-(h/H)^2)*yd);
kh=yst*kh1/(yy*(1-ru));
kv=0.5*kh;

m1=T*Vs*kh*(1+tan(A)*tan(C))/(2*pi^2*H^2*tan(A))*(2*pi*H*cos(2*pi*(t/T-H/(T*Vs)))+T*Vs*(sin(2*pi*(t/T-H/(T*Vs)))-sin(2*pi*t/T)));
m2=T*Vv*kv*(1+tan(A)*tan(C))/(2*pi^2*H^2*tan(A))*(2*pi*H*cos(2*pi*(t/T-H/(T*Vv)))+T*Vv*(sin(2*pi*(t/T-H/(T*Vv)))-sin(2*pi*t/T)));
Ke = (1+tan(A)*tan(C))*sin((A+B))/tan(A)/cos((A+B+D-C))-m1*cos((A+B))/cos((A+B+D-C))-m2*sin((A+B))/cos((A+B+D-C));

Kem = matlabFunction(Ke);

[x,fval,exitflag] = fminsearch(@(x) Kem(x(1),x(2)),[0.5, 1.3]);

A0 = x(1)
t0 = x(2)
Ke_min = fval

2楼: Originally posted by zyh700600 at 2022-05-05 11:58:26
clear; clc
format long g

T=0.3;
Vsw=2500;
Vvw=3900;
Vs=100;
Vv=187;
yc=25;
yd=16;
yst=19;
yw=10;
kh1=0.3;
H=10;
ru=0.2;
b=0.2*H;
h=0.75*H;
B=30*pi/180;
D=B/2;
C=10*pi/180;

...