Методы решения задач математической физики. Рындин Е.А. - 97 стр.

UptoLike

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

97
m=20;
end
if exist('r')==0
r='2e3';
end
if exist('c')==0
c='100';
end
if exist('k')==0
k='20';
end
if exist('f')==0
f='0';
end
if exist('vt')==0
vt=1;
end
if exist('gt1')==0
gt1='10*(sign(1e2*x-2)-sign(1e2*x-3)+ ...
sign(1e2*y-3)-sign(1e2*y-5))+300';
end
if exist('v1')==0
v1=1;
end
if exist('g1')==0
g1='300';
end
if exist('v2')==0
v2=1;
end
if exist('g2')==0
g2='300';
end
if exist('v3')==0
v3=1;
end
if exist('g3')==0
g3='300';
end
if exist('v4')==0
v4=1;
end
if exist('g4')==0
g4='300';
end