1
1. , , . :
n(z0)=n(0)sinΘ0, (1)
___
n(z)=√ε(z), n(0)
( ) , n(0)=1.
(1)
sinΘ n(z0)=n(0)sinΘ0 ,
Θ=π/2 z= z0 ( ).
:
,
,
ε(z)=1-80,8 N(z)/f2,
N0=0 ( ),
:
, (2)
(1)
(3)
,
2. , , .
(4)
1=z t(Θ0), - , - .
(4):
(2),
(3)
, 1=z t(Θ0),
:
3. .
:
(x2-x1)=2 z t(Θ0),
:
(x2-x1)=2 z t(Θ0),
Θ, .
.
2*106
-2 +2
1
.
:
,
η>0,
,
η<0.
-,
- 1/3 -1/3,
z1- , - ,
ω=2πf .
.
(z).
clc
a=10^7;
z0=220;
theta1=pi/4;
N0=10^8;
f=1.5*(10^6);
z1=(((f*cos(theta1))^2)/(80.8*a))-N0/a+z0;
z1
c=300000;
w=2*pi*f;
A=(2/3)*(sqrt(pi))*((w*z1/c)^(1/6));
hold on
z=z1-500:20:z1;
et=(((w^2)/((c^2)*z1))^(1/3))*(z1-z);
E=A*(et.^(1/2)).*(besselj(1/3,((2/3)*(et.^(3/2)))))+A*(et.^(1/2)).*(besselj(-1/3,((2/3)*(et.^(3/2)))));
r=0;
plot(z,E);
plot(z,r);
z=z1:20:z1+500;
et=(((w^2)/((c^2)*z1))^(1/3))*(z1-z);
K=A*((-et).^(1/2)).*(-besseli(1/3,((2/3)*((-et).^(3/2)))))+A*((-et).^(1/2)).*(besseli(-1/3,((2/3)*((-et).^(3/2)))));
|
|
r=0;
plot(z,r);
plot(z,K);
y=-15:0.1:15;
plot(z1,y);
grid on
xlabel('z')
ylabel('E')
hold off
Z .
(η).
a=10^7;
z0=220;
theta1=pi/4;
f=1500000;
N0=10^8;
z1=(((f*cos(theta1))^2)/(80.8*a))-N0/a+z0;
c=300000;
w=2*pi*f
A=(2/3)*(sqrt(pi))*((w*z1/c)^(1/6))
hold on
z=z1-500:20:z1
et=(((w^2)/((c^2)*z1))^(1/3))*(z1-z)
E=A*(et.^(1/2)).*(besselj(1/3,((2/3)*(et.^(3/2)))))+A*(et.^(1/2)).*(besselj(-1/3,((2/3)*(et.^(3/2)))))
plot(et,E)
z=z1:20:z1+200
et=(((w^2)/((c^2)*z1))^(1/3))*(z1-z)
K=A*((-et).^(1/2)).*(-besseli(1/3,((2/3)*((-et).^(3/2)))))+A*((-et).^(1/2)).*(besseli(-1/3,((2/3)*((-et).^(3/2)))))
plot(et,K)
y=-15:0.1:15
grid on
xlabel('et')
ylabel('E')
hold off
η .
z1= 1.6023e+003 .
: , . , . , , , , , .
:
1. . . , . . , . .
. .; , 1989.
2. . .
atlab