|
求fh3函数在[0.001 0.01]和[0.003 0.1]之间的最小值,估计在1至5之间。 7 g& b9 ]# b+ u' G) j
function f=fh3(n)
" H3 k3 {* W5 Bg2=2^0.5-1;% y- q/ |4 E9 e
mu0=4*pi*10^(-7);
' {. _/ p: Y6 B7 Xgaf=7.8*10^3;( _) G# o; v% S3 [* T! x# C) r8 M1 h
gacu=8.9*10^3;
Y8 q- U1 j& x, ngat=4.5*10^3;' V$ G. x7 @8 V( Q# ]7 l
gaa=2.7*10^3;
+ P7 \4 h& S; a3 ~8 D e' Np=2.7*10^4;
, J$ E8 N j8 E5 C- [3 zq=3*10^(-5);% R, a2 d9 T& I% O; Y" O3 }
rou=0.7;
: G! a' r( I8 U0 T+ Bkb=0.9;/ ^9 R1 b |' v9 U; c
%j0=8*10^6;
3 z8 r6 N$ I# B0 ?6 t; [& I$ l8 Ij0=2*10^6;; C5 x( T8 J5 Y) a! k7 z( h
kd=3;
, J& U6 A" e6 i p1 `; d* q% ^" Q9 O, S$ fbm=2;9 a/ O, G. |/ s0 w
ht=2*10^(-3);
, l/ B5 [# A% \& |0 Gmu1=10^8/1.75;
; Q, Q3 B; W. U$ N; e. p( \1 i1 nkt1=2*pi*gat*ht;
6 ?7 H9 H& D- `4 V; ikt2=2*pi*gaa*ht;. P- n F1 U; D$ Y/ L6 E0 ?: E
kr=1.02;: Z2 d# E* F! f! S' z
ku=(mu0/2/bm)^0.5; M g! z+ U( J& [, y! H% y8 R
kx=mu0^0.5*kb*kd^2*j0;: E/ L e$ s6 d# [( t2 c; p
kp=(2*q/pi/p)^0.5;2 q& f5 f, W% V! u5 n" f' M4 b
kg=mu0^0.5*kb*kd*j0*g2;
( }& }$ o% g# e, q; Xrx=ku*kx-kp*kg;
5 U" m6 N, C; |% o: ]ra=ku*kg;
# V: X" k/ C6 R3 w& ?! lrc=kp*kx;6 U0 }; R( w/ W5 c5 i5 l, e/ o- c
kj=mu0*kb*kd*j0;
+ n: e( x; U+ ikj=kj/kx;- W% \' b1 U$ d* I! M, l
h0=3*ht;
$ Z; n5 u8 K1 L \7 C* N) ^h1=2*(1+1/rou)*q/pi;
! U* ^2 P3 k7 q4 E! ^h2=2*(kd-1);& {, _: {2 w: ?
h3=1/bm*(mu0*p*q/(2*pi))^0.5;" m4 [: a. c9 ^
h4=1/kj*(mu0*p*q/(2*pi))^0.5;
% Y: H% \4 y. ], `) q: xhg=2*pi*kr*ht;
3 G! x$ a# Q; Q& B$ b+ E; ~w1=gaf/bm*(pi*p*q*mu0/2)^0.5;, Q* V' }' [1 c) q
w1p=8*g2*kd*w1;+ {9 x/ O% o0 p: @% n b% a
w2=2*kd^2*gaf*(2*pi*mu0*p*q)^0.5/kj;
4 ~2 |7 Q# Z$ d/ h7 R" p9 v0 w# Z# i3 R& Ew3p=2*g2*gacu/kj*(2*pi*p*q*mu0)^0.5;2 F: |: d5 j7 ]! t( Y& T
w3pp=hg*h3;3 v, k' T* f/ ~* H
w3=w3p+w3pp;
( X8 h# K7 L3 ?: @w4=2*kd*gacu/kj*(2*pi*p*q*mu0);
1 L; N, `6 v9 q) \w5=5*pi*ht*gat;
9 h- j5 f& `3 e. ^. ?w6=hg*h0*gat;
5 i7 S. c d! O- a4 |! p( qw7=hg*h1*gat;
1 f% d; |- b7 ^w8=hg*h0*gat;
& O8 J7 n' A/ ^1 ^( m! ew9=hg*h4*gat;, K8 S9 ]# V/ z' I$ R7 U, E
f=w1p*r*x^0.5+w2*x^1.5/(g2*r-kd*x)+w3*r*x^(-0.5)+w4*x^0.5+w5*r^2+w6*r+w7/r+w8*r*x+w9*r*x^(-0.5)/(g2*r-kd*x);
: F% x: g5 s+ B1 O- u* k* R |