Изучение оптических свойств кривых и поверхностей на примере моделирование оптических систем в прикладных программах
Изучение теорий каустик, оптических свойств кривых и поверхностей на примере моделирования оптических систем в СКM Maple. Понятие каустики в рамках геометрической оптики, ее образования. Построение модели каустики, написание программных процедур.
Рубрика | Физика и энергетика |
Вид | дипломная работа |
Язык | русский |
Дата добавления | 16.06.2017 |
Размер файла | 1,6 M |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
Line_ [i] [3] [1]: =x [1]
else Line_ [i] [3] [1]: =x [2]
end if:
if evalf (sqrt ( (x [1] - Line_ [i] [1] [1]) ^2+ (y [1] - Line_ [i] [1] [2]) ^2)) <evalf (sqrt ( (x [2] - Line_ [i] [1] [1]) ^2+ (y [2] - Line_ [i] [1] [2]) ^2)) then
Line_ [i] [3] [2]: =y [1]
else Line_ [i] [3] [2]: =y [2]
endif:
# Нормаль в новой точке
dr: =diff (r1,t):
kas: =evalf (subs (t=Line_ [i] [3] [2],dr)):
norm: = [kas [2],-kas [1]]:
if evalf (norm [1] * (Line_ [i] [1] [1] - Line_ [i] [2] [1]) +norm [2] * (Line_ [i] [1] [2] - Line_ [i] [2] [2])) <0 then norm: = [-kas [2],kas [1]]:
end if:
#Вектор направления отражения
n1: = (Line_ [i] [2] [1] *norm [1] +Line_ [i] [2] [2] *norm [2]) / (norm [1] *norm [1] +norm [2] *norm [2]):
n2: = [norm [1] *2*n1,norm [2] *2*n1]:
l: = [Line_ [i] [2] [1] - n2 [1],Line_ [i] [2] [2] - n2 [2]]:
#точка отраженная
Line_ [i] [4] [1]: =l [1]:
Line_ [i] [4] [2]: =l [2]:
end do:
endproc:
3) Третья процедура будет демонстрировать лучи падения и лучи отражения:
pprbLines: =proc (L,h,N)
global r1,t1,t2:
local pltprb,pltLines,pltLines1;
print (r1);
pltprb: =plot ([op (r1),t=t1. t2],scaling=constrained,
color=black,
thickness=3):
pltLines: =display (
seq (
line (
Line_ [i] [1],
Line_ [i] [3],
color=red),
i=1. N),
insequence=false,
scaling=constrained
);
pltLines1: =display (
seq (
line (
Line_ [i] [3],
Line_ [i] [4],
color=green),
i=1. N),
insequence=false,
scaling=constrained
);
display ([pltLines,pltprb,pltLines1],scaling=constrained,axes=none);
endproc:
И самая главная процедура которая будет включать три предыдущие и выводить наши отражения:
Mainproc: =proc (L,h,d1,d2,N)
global r1,t1,t2:
prbRefLines (L,h,d1,d2,N):
prbRefArray (L,N):
pprbLines (L,h,N):
end proc:
Mainproc (20, 20,-10,-.1,10);
eval (Line_):
В результате получим следующую картинку (Рис.3.7).
Рисунок 3.7 - Каустика, при отражении лучей от параболы (параллельно падающие)
Аналогично записывается написание процедур для пучка света с поправками начальные условия. Процедуру будем задавать в более удобной для нас форме. Процедура будет включать в себя три под процедуры, у каждой из которых будет своя функция (рис.3.8).
Рисунок 3.8 - Каустика, при отражении лучей от параболы (пучок)
Трехмерный случай
Отражение на плоскости будем рассматривать на примере параболоида.
Задаем начальные условия для прямой:
x [0]: =0:
y [0]: =0:
z [0]: =0:
ax: =1:
ay: =-.3:
az: =10:
Задаем уравнение плоскости и уравнения прямой:
a: =x^2+y^2-z; b: =x-x [0] /ax=y-y [0] /ay; c: =y-y [0] /ay= (z-z [0]) /az;
Рисуем прямую и параболоид:
pl_b: =spacecurve ([ax*t+x [0],ay*t+y [0],az*t+z [0]],t=-10.10):
pl_a: =implicitplot3d (a,x=-10.10,y=-10.10,z=-10.10,numpoints=5000):
Находим точку пересечения прямой и плоскости:
sol: =evalf (solve ({a,b,c},{x,y,z}));
x_: =evalf (subs (sol,x));
y_: =evalf (subs (sol,y));
z_: =evalf (subs (sol,z));
pl_b: =spacecurve ([ax*t+x [0],ay*t+y [0],az*t+z [0]],t=-1.1):
pl_a: =implicitplot3d (a,x=-10.10,y=-10.10,z=-10.10,numpoints=5000):
pl_c: =pointplot3d ([x_,y_,z_],color=red);
Находим производные в точках:
x1: =subs ({x=x_,y=y_,z=z_},diff (a,x)):
y1: =subs ({x=x_,y=y_,z=z_},diff (a,y)):
z1: =subs ({x=x_,y=y_,z=z_},diff (a,z)):
Вектор прямой задается следующим образом:
l: = [ax,ay,az];
Вектор нормали задается следующим образом:
n1: = [x1,y1,z1]; 4
Уравнение нормали и вывод:
pl_e: =spacecurve ([x1*t+x_,y1*t+y_,z1*t+z_],t=-8.4,color=green):
Аналогично двумерному случаю находим вектор отражения при помощи вектора падения луча и вектора нормали:
k: =dotprod (l,n1) /dotprod (n1,n1);
p: = [2*k*n1 [1],2*k*n1 [2],2*k*n1 [3]];
r: =l-p;
Вектор lбудет вектором отражения.
Задаемуравнениеотраженноголуча, и обозначаем его:
b1: = (x-x_) /r [1] = (y-y_) /r [2];
c1: = (y-y_) /r [2] = (z-z_) /r [3];
pl_d: =spacecurve ([r [1] *t+x_,r [2] *t+y_,r [3] *t+z_],t=-1.1,color=yellow):
Выводим луч падения (фиолетовый), нормаль (зеленая), отраженный луч (желтый) (Рис.3.8).
Рисунок 3.8 - Отражение луча от плоскости.
Заключение
В ходе данной работы был рассмотрен теоретический материал по теме каустик и были изучены их свойства. Также в ходе магистерской диссертации былаизучена среда СКМ Maple. Была создана процедура для моделирования каустик для кривых второго порядка.
Таким образом, цели, поставленные в квалификационной работе, выполнены.
Списокиспользованнойлитературы
1. Burridge,R. Asymptoticevaluationofintegrals related to time-domain fields near caustics, SIAM J. Appl. Math., 55: 2, 1995.
2. Андреев, А.Н. Каустики на плоскости/ А.Н. Андреев, А.А. Панов "Квант" - 2010. - №3.
3. Арнольд, В.И. Особенности каустики волновых фронтов, В.И. Арнольд - М.: Фазис, 1996.
4. Арнольд, В.И. Теория катастроф / Арнольд В.И. М.: Наука, 1990.
5. Баев, А.В. Математическое моделирование волн в слоистых средах вблизи каустики/ А.В. Баев // Матем. Моделирование-2013 - 25: 12-С.83-102
6. Гольдин, С.В. Сейсмическое волновое поле в близи каустик: анализ во временной области/ С.В. Гольдин, А.А. Дучков // Физика Земли. - 2002. - №7. С.56-66.
7. Дьяконов, В.П. Maple 9.5/10 в математике, физике и образовании/ В.П. Дьяконов - М.: СОЛОН-Пресс, 2006. - 720 с.
8. Кирсанов, М.Н. Задачи по теоретической механике с решениями в Maple 11. М.: Физматлит, 2010, 264с.
9. Кирсанов, М.Н. Maple и Maplet. Решения задач механики / Кирсанов М.Н. - М.: Лань, 2012. - 512с.
10. Лонгейр, М. Крупномасштабная структура Вселенной/ Ред.М. Лонгейр, Я. Эйнасто. - М.: Мир, 1981.
11. Постон, Т. Теория катастроф и ее применения/ Постон Т., Стюарт И. - М.: Мир, 1980.
12. Яновская, Т.Б. Численный метод расчета поля поверхностной волны при наличии каустик / Яновская Т.Б., Гейгер М.А. // Физика Земли. - 2007.
Приложения
Приложение А. Программные процедуры моделирования каустик
#Отражение от произвольной кривой (параллельное падение лучей)
>restart:
with (plots):
with (plottools):
>prbRefLines: =proc (L,h,d1,d2,N)
global Line_;
local dh,dir, i;
dir: = [d1,d2]:
dh: = (h/N):
for i from 1 to N do
Line_ [i]: = [[L,-h/2+ (i-1) *dh],dir, [0,0], [0,0]];
end do:
end proc:
>prbRefLines (5,10,-1,-.1,50);
eval (Line_):
>prbRefArray: =proc (p,L,N)
global Line_:
local dir_,x,y,a_,r1,tmp1,kas,per1,per2,norm,l,n1,n2,k, i,dr;
#print (Line_ [1]);
# векторнаправления
for i from 1 to N do
#print (Line_ [i] [2] [1]):
Line_ [i] [2] [2]:
# расчетпересечения:
a_: = [k*Line_ [i] [2] [1] +Line_ [i] [1] [1],k*Line_ [i] [2] [2] +Line_ [i] [1] [2]]:
if Line_ [i] [2] [1] =0 then
a_: =x=Line_ [i] [1] [1]:
else
a_: = [k*Line_ [i] [2] [1] +Line_ [i] [1] [1],k*Line_ [i] [2] [2] +Line_ [i] [1] [2]]:
end if:
#print (a_);
r1: = [t^2/ (2*p),t]:
solve ({r1 [1] =a_ [1],r1 [2] =a_ [2] },{t,k}):
tmp1: =solve ({r1 [1] =a_ [1],r1 [2] =a_ [2] },{t,k});
y [1]: =rhs (tmp1 [1] [2]):
x [1]: =subs (t=rhs (tmp1 [1] [2]),r1 [1]):
y [2]: =rhs (tmp1 [2] [2]):
x [2]: =subs (t=rhs (tmp1 [2] [2]),r1 [1]):
per1: =sqrt ( (x [1] - Line_ [i] [1] [1]) ^2+ (y [1] - Line_ [i] [1] [2]) ^2):
per2: =sqrt ( (x [2] - Line_ [i] [1] [1]) ^2+ (y [2] - Line_ [i] [1] [2]) ^2):
#print ([per1,per2]):
if evalf (sqrt ( (x [1] - Line_ [i] [1] [1]) ^2+ (y [1] - Line_ [i] [1] [2]) ^2)) <evalf (sqrt ( (x [2] - Line_ [i] [1] [1]) ^2+ (y [2] - Line_ [i] [1] [2]) ^2)) then
Line_ [i] [3] [1]: =x [1]
else Line_ [i] [3] [1]: =x [2]
end if:
if evalf (sqrt ( (x [1] - Line_ [i] [1] [1]) ^2+ (y [1] - Line_ [i] [1] [2]) ^2)) <evalf (sqrt ( (x [2] - Line_ [i] [1] [1]) ^2+ (y [2] - Line_ [i] [1] [2]) ^2)) then
Line_ [i] [3] [2]: =y [1]
else Line_ [i] [3] [2]: =y [2]
endif:
# Нормаль в новой точке
dr: =diff (r1,t):
kas: =evalf (subs (t=Line_ [i] [3] [2],dr)):
norm: = [kas [2],-kas [1]]:
if evalf (norm [1] * (Line_ [i] [1] [1] - Line_ [i] [2] [1]) +norm [2] * (Line_ [i] [1] [2] - Line_ [i] [2] [2])) <0 then norm: = [-kas [2],kas [1]]:
endif;
#norm1:
#Вектор направления отражения
n1: = (Line_ [i] [2] [1] *norm [1] +Line_ [i] [2] [2] *norm [2]) / (norm [1] *norm [1] +norm [2] *norm [2]):
n2: = [norm [1] *2*n1,norm [2] *2*n1]:
l: = [Line_ [i] [2] [1] - n2 [1],Line_ [i] [2] [2] - n2 [2]]:
#точка отраженная
Line_ [i] [4] [1]: =l [1]:
Line_ [i] [4] [2]: =l [2]:
end do:
end proc:
>prbRefArray (60,10,50):
>pprbLines: =proc (p,L,h,N)
local pltprb,pltLines,pltLines1,r1;
#
r1: = [t^2/ (2*p),t]:
print (r1);
pltprb: =plot ([op (r1),t=-10.10],scaling=constrained,
color=black,
thickness=3):
#
pltLines: =display (
seq (
line (
Line_ [i] [1],
Line_ [i] [3],
color=red),
i=1. N),
insequence=false,
scaling=constrained
);
pltLines1: =display (
seq (
line (
Line_ [i] [3],
Line_ [i] [4],
color=red),
i=1. N),
insequence=false,
scaling=constrained
);
display ([pltLines,pltprb,pltLines1],scaling=constrained,axes=none);
endproc:
>pprbLines (60, 200,10,10);
#Отражение от произвольной кривой (пучок лучей)
> restart:
with (plots):
with (plottools):
> r1: = [t^2/ (200),t]:
t1: =-20:
t2: =20:
>prbRefLines: =proc (L,h,N)
global Line_, r1;
local dh,dir, i,dL;
dL: =L/2;
dh: = (h/N):
for i from 1 to N do
Line_ [i]: = [[L,0], [L-dL-L,-h/2+ (i-1) *dh], [0,0], [0,0]];
end do:
end proc:
>prbRefLines (5,10,5);
>prbRefArray: =proc (L,N)
global Line_, r1:
local dir_,x,y,a_,tmp1,kas,per1,per2,norm,l,n1,n2,k, i,dr;
# векторнаправления
for i from 1 to N do
# расчетпересечения:
a_: = [k*Line_ [i] [2] [1] +Line_ [i] [1] [1],k*Line_ [i] [2] [2] +Line_ [i] [1] [2]]:
if Line_ [i] [2] [1] =0 then
a_: =x=Line_ [i] [1] [1]:
else
a_: = [k*Line_ [i] [2] [1] +Line_ [i] [1] [1],k*Line_ [i] [2] [2] +Line_ [i] [1] [2]]:
end if:
solve ({r1 [1] =a_ [1],r1 [2] =a_ [2] },{t,k}):
tmp1: =evalf (solve ({r1 [1] =a_ [1],r1 [2] =a_ [2] },{t,k})):
Line_ [i] [3] [1]: =subs (k=rhs (tmp1 [1]),a_ [1]):
Line_ [i] [3] [2]: =subs (k=rhs (tmp1 [1]),a_ [2]):
dr: =diff (r1,t):
kas: =evalf (subs (t=Line_ [i] [3] [2],dr)):
norm: = [kas [2],-kas [1]]:
if evalf (norm [1] * (Line_ [i] [1] [1] - Line_ [i] [2] [1]) +norm [2] * (Line_ [i] [1] [2] - Line_ [i] [2] [2])) <0 then norm: = [-kas [2],kas [1]]:
end if:
#Векторнаправленияотражения
n1: = (Line_ [i] [2] [1] *norm [1] +Line_ [i] [2] [2] *norm [2]) / (norm [1] *norm [1] +norm [2] *norm [2]):
n2: = [norm [1] *2*n1,norm [2] *2*n1]:
l: = [Line_ [i] [2] [1] - n2 [1],Line_ [i] [2] [2] - n2 [2]]:
#точка отраженная
Line_ [i] [4] [1]: =l [1]:
Line_ [i] [4] [2]: =l [2]:
end do:
end proc:
>prbRefArray (10,5):
>pprbLines: =proc (L,h,N)
global r1,t1,t2:
local pltprb,pltLines,pltLines1;
pltprb: =plot ([op (r1),t=t1. t2],scaling=constrained,
color=black,
thickness=3):
pltLines: =display (
seq (
line (
Line_ [i] [1],
Line_ [i] [3],
color=red),
i=1. N),
insequence=false,
scaling=constrained
);
pltLines1: =display (
seq (
line (
Line_ [i] [3],
2*Line_ [i] [4],
color=green),
i=1. N),
insequence=false,
scaling=constrained
);
display ([pltLines,pltprb,pltLines1],scaling=constrained,axes=none);
end proc:
>pprbLines (1, 20,1);
>pprbLines (200,.5,2):
>Mainproc: =proc (L,h,N)
global r1,t1,t2:
prbRefLines (L,h,N):
prbRefArray (L,N):
pprbLines (L,h,N):
endproc:
>Mainproc (100, 20,10);
#Отражение от параметрически заданной плоскости
restart:
with (plots):
with (plottools):
with (linalg):
x [0]: =0:
y [0]: =0:
z [0]: =0:
ax: =1:
ay: =-.3:
az: =10:
a: =x^2+y^2-z;
b: =x-x [0] /ax=y-y [0] /ay;
c: =y-y [0] /ay= (z-z [0]) /az;
diff (a,y);
pl_b: =spacecurve ([ax*t+x [0],ay*t+y [0],az*t+z [0]],t=-10.10,color=black):
pl_a: =implicitplot3d (a,x=-10.10,y=-10.10,z=-10.10,numpoints=5000):
display ([pl_a,pl_b]);
sol: =evalf (solve ({a,b,c},{x,y,z}));
x_: =evalf (subs (sol,x));
y_: =evalf (subs (sol,y));
z_: =evalf (subs (sol,z));
pl_b: =spacecurve ([ax*t+x [0],ay*t+y [0],az*t+z [0]],t=-1.1):
pl_a: =implicitplot3d (a,x=-10.10,y=-10.10,z=-10.10,numpoints=5000):
pl_c: =pointplot3d ([x_,y_,z_],color=red);
display ([pl_a,pl_b,pl_c]);
x1: =subs ({x=x_,y=y_,z=z_},diff (a,x)):
y1: =subs ({x=x_,y=y_,z=z_},diff (a,y)):
z1: =subs ({x=x_,y=y_,z=z_},diff (a,z)):
l: = [ax,ay,az];
n1: = [x1,y1,z1];
pl_e: =spacecurve ([x1*t+x_,y1*t+y_,z1*t+z_],t=-8.4,color=green):
n1 [1];
k: =dotprod (l,n1) /dotprod (n1,n1);
p: = [2*k*n1 [1],2*k*n1 [2],2*k*n1 [3]];
r: =l-p;
b1: = (x-x_) /r [1] = (y-y_) /r [2];
c1: = (y-y_) /r [2] = (z-z_) /r [3];
pl_d: =spacecurve ([r [1] *t+x_,r [2] *t+y_,r [3] *t+z_],t=-1.1,color=yellow):
display ([pl_a,pl_b,pl_d,pl_e]);
#Частные случаи изображения каустики >restart:
with (plots):
with (plottools):
> r: = [u,u^2];
r [2];
>pl_a: =plot ([op (r),u=-4.4],scaling=constrained);
> cx: =r [1] - (diff (r [2],u)) * ( (diff (r [1],u)) ^2+ (diff (r [2],u)) ^2) / ( (diff (r [1],u)) * (diff (r [2],u$2)) - (diff (r [2],u)) * (diff (r [1],u$2)));
cy: =r [2] + (diff (r [1],u)) * ( (diff (r [1],u)) ^2+ (diff (r [2],u)) ^2) / ( (diff (r [1],u)) * (diff (r [2],u$2)) - (diff (r [2],u)) * (diff (r [1],u$2)));
> cx: =r [1] - (diff (r [2],u)) * ( (diff (r [1],u)) ^2+ (diff (r [2],u)) ^2) / ( (diff (r [1],u)) * (diff (r [2],u$2)) - (diff (r [2],u)) * (diff (r [1],u$2)));
cy: =r [2] + (diff (r [1],u)) * ( (diff (r [1],u)) ^2+ (diff (r [2],u)) ^2) / ( (diff (r [1],u)) * (diff (r [2],u$2)) - (diff (r [2],u)) * (diff (r [1],u$2)));
> l: = [cx,cy];
>pl_b: =plot ([op (l),u=-0.7.0.7],scaling=constrained,color=blue);
> display ([pl_a,pl_b]);
> restart:
with (plots):
with (plottools):
> a: =2;
b: =3;
> r: = [a*cos (u),b*sin (u)];
r [2];
>pl_a: =plot ([op (r),u=1/2*Pi.3/2*Pi],scaling=constrained);
plot ([op (r),u=1/2*Pi.3/2*Pi],scaling=constrained);
> cx: =r [1] - (diff (r [2],u)) * ( (diff (r [1],u)) ^2+ (diff (r [2],u)) ^2) / ( (diff (r [1],u)) * (diff (r [2],u$2)) - (diff (r [2],u)) * (diff (r [1],u$2)));
cy: =r [2] + (diff (r [1],u)) * ( (diff (r [1],u)) ^2+ (diff (r [2],u)) ^2) / ( (diff (r [1],u)) * (diff (r [2],u$2)) - (diff (r [2],u)) * (diff (r [1],u$2)));
> l: = [cx,cy];
>pl_b: =plot ([op (l),u=-4.4],scaling=constrained,color=blue);
> display ([pl_a,pl_b]);
> restart:
with (plots):
with (plottools):
> a: =6;
b: =20;
> r: = [a*cosh (u),b*sinh (u)];
r [2];
>pl_a: =plot ([op (r),u=-2*Pi.2*Pi],scaling=constrained);
plot ([op (r),u=-2*Pi.2*Pi],scaling=constrained);
> cx: =r [1] - (diff (r [2],u)) * ( (diff (r [1],u)) ^2+ (diff (r [2],u)) ^2) / ( (diff (r [1],u)) * (diff (r [2],u$2)) - (diff (r [2],u)) * (diff (r [1],u$2)));
cy: =r [2] + (diff (r [1],u)) * ( (diff (r [1],u)) ^2+ (diff (r [2],u)) ^2) / ( (diff (r [1],u)) * (diff (r [2],u$2)) - (diff (r [2],u)) * (diff (r [1],u$2)));
> l: = [cx,cy];
>pl_b: =plot ([op (l),u=-2.2],scaling=constrained,color=blue);
> display ([pl_a,pl_b]);
Размещено на Allbest.ru
Подобные документы
Сущность хроматических, волновых и лучевых аберраций, их функции. Характеристика первичных аберраций Зайделя. Особенности сферической аберрации, астигматизма и кривизны поля, дисторсии. Искажения, погрешности изображения оптических систем, их устранение.
курсовая работа [1,9 M], добавлен 03.05.2011Химическая природа пигментов и оптических свойствах краски. Влияние дисперсности па оптические свойства пигментов. Спектрофотометрические кривые. Диспергирование в масляной среде, а также взаимосвязь оптических и структурных свойств красочного слоя.
дипломная работа [503,1 K], добавлен 14.05.2014История и эволюции изготовления оптических деталей, его современное состояние. Характеристика простейших оптических деталей в виде линз. Место российских мастеров в развитии оптики и производства стекла. Исследования по обработке оптического стекла.
реферат [18,0 K], добавлен 09.12.2010Оптико-механические приборы. Крепления оптических деталей. Особенности сборки оптических деталей с механическими. Устройство для юстировки сетки. Сборка и юстировка окуляров. Проверка диоптрийной установки. Схема проверки натяжения. Диоптрийная трубка.
реферат [2,7 M], добавлен 25.11.2008Источники инфракрасного, ультрафиолетового и оптического излучений, методы их обнаружения и измерения, определение оптических свойств и применение. Лазеры и лазерные световые пучки. Поляризационные и энергетические характеристики световых пучков.
курсовая работа [587,2 K], добавлен 20.09.2013Понятие об оптическом волокне. Прохождение светового излучения через границу раздела сред, а также в оптических волокнах, определение окон прозрачности. Стабильность мощности лазерного излучения. Принципы измерения мощности на разных длинах волн.
курсовая работа [832,5 K], добавлен 07.01.2014Технология изготовления элементов интегральной оптики методом ионного обмена в стеклянных подложках. Промышленные технологии стыковки волоконных световодов и интегрально-оптических волноводов. Процесс напыления маскирующей пленки и фотолитографии.
дипломная работа [5,6 M], добавлен 09.10.2013Устройство и параметры оптических квантовых генераторов. Устойчивые и неустойчивые резонаторы. Основные типы лазеров, способы накачки. Зеркала оптического резонатора. Определение потерь и оптимального коэффициента пропускания выходного зеркала.
дипломная работа [2,8 M], добавлен 09.10.2013Рассмотрение истории открытия и направлений применения жидких кристаллов; их классификация на смектические, нематические и холестерические. Изучение оптических, диамагнитных, диэлектрических и акустооптических свойств жидкокристаллических веществ.
курсовая работа [968,9 K], добавлен 18.06.2012Изучение масс-зарядовых спектров многозарядных ионов и морфологии разрушения оптических материалов, при многократном облучении их лучом лазера. Рассмотрение и оценка влияния эффекта “накопления” на морфологию разрушения и на ионизационный состав плазмы.
статья [12,8 K], добавлен 22.06.2015