Решение задач математической физики в системе MatLab. Рындин Е.А - 50 стр.

UptoLike

ВУЗ: 

ТТИ ЮФУ | Таганрог

Составители: 

Рубрика: 

% Преобразование вектора-строки значений искомой функции
% в узлах координатной сетки в матрицу размерности n x m,
% удобную для представления результатов в графическом виде
for l=1:s
for i=1:n
for j=1:m
T(i,j,l)=u(n*m*(l-1)+m*(i-1)+j);
end
end
end
% Построение графика искомой функции U(x,y)
Hbox_Grid=findobj('Tag','box_Grid');
for l=1:s
surf(y,x,T(:,:,l))
xlabel('y, м','FontSize',13)
ylabel('x, м','FontSize',13)
zlabel('T, K','FontSize',13)
axis([min(y) max(y) min(x) max(x) min(min(T(:,:,1))) ...
max(max(T(:,:,1)))])
if get(Hbox_Grid,'Value')
grid on
else
grid off
end
pause(0.1)
M(l)=getframe;
end
movie(M,7,4)
set(HRadio_Style,'Enable','on');
set(HCheckbox_Style,'Enable','on');
set(Hbutton_Rep,'Enable','on');
set(Hbutton_Figures,'Enable','on');
end
case 'press_Rep'
HRadio_Style=findobj('Style','radiobutton');
set(HRadio_Style,'Enable','off');
HCheckbox_Style=findobj('Style','checkbox');
set(HCheckbox_Style,'Enable','off');
Hbutton_Run=findobj('Tag','button_Run');
set(Hbutton_Run,'Enable','off');
Hbutton_Figures=findobj('Tag','button_Figures');
set(Hbutton_Figures,'Enable','off');
Hbox_Grid=findobj('Tag','box_Grid');
for l=1:s
surf(y,x,T(:,:,l))
xlabel('y, м','FontSize',13)
ylabel('x, м','FontSize',13)
zlabel('T, K','FontSize',13)
axis([min(y) max(y) min(x) max(x) min(min(T(:,:,1))) ...
max(max(T(:,:,1)))])
50

Страницы