PDE Matlab Dipolo
PDE Matlab Dipolo
PDE Matlab Dipolo
Introducción.......................................................................................................................................2
Ejemplos...........................................................................................................................................3
Ejemplo 1......................................................................................................................................3
Código PDEModel Matlab 1.......................................................................................................6
Ejemplo 2......................................................................................................................................9
Código PDEModel Matlab 1.....................................................................................................12
Introducción
El electromagnetismo puede ser visto como el estudio de las interacciones entre
cargas en reposo y en movimiento. Así supone el análisis, la síntesis,
interpretación física y aplicación de campos eléctricos y magnéticos.
El electromagnetismo es la rama de la física o ingeniería eléctrica que estudia los
fenómenos eléctricos y magnéticos.
La electrostática es la rama de la física que analiza los efectos mutuos que se
producen entre los cuerpos como consecuencia de sus cargas eléctricas, es decir,
el estudio de las cargas eléctricas en equilibrio. La carga eléctrica es la propiedad
de la materia responsable de los fenómenos electrostáticos, cuyos efectos
aparecen en forma de atracciones y repulsiones entre los cuerpos que la poseen.
En el presente documento se exponen dos ejemplos de Matlab aplicados a la
electrostática y sus gráficos en 2D proporcionados por el mismo programa.
Ejemplos
A continuación de presentan los ejemplos de los programas con sus capturas de
pantalla.
Ejemplo 1
Se colocan dos conductores metálicos circulares sobre un papel secante
empapado en salmuera que sirve como un conductor plano y delgado. El modelo
físico para este problema consiste en la ecuación de Laplace
–∇ · (σ∇V) = 0
para el potencial eléctrico V y estas condiciones de contorno:
V = 1 en el conductor circular izquierdo
V = –1 en el conductor circular derecho
la condición de límite natural de Neumann en los límites exteriores
∂V/∂n = 0
La conductividad es σ = 1.
% This script is written and read by pdetool and should NOT be edited.
% There are two recommended alternatives:
% 1) Export the required variables from pdetool and create a MATLAB
script
% to perform operations on these.
% 2) Define the problem completely using a MATLAB script. See
% http://www.mathworks.com/help/pde/examples/index.html for examples
% of this approach.
function pdemodel
[pde_fig,ax]=pdeinit;
pdetool('appl_cb',8);
set(ax,'DataAspectRatio',[1.5 1 1]);
set(ax,'PlotBoxAspectRatio',[1 1 1]);
set(ax,'XLim',[-1.5 1.5]);
set(ax,'YLim',[-1 1]);
set(ax,'XTickMode','auto');
set(ax,'YTickMode','auto');
% Geometry description:
pderect([-1.2 1.2 -0.59999999999999998 0.59999999999999998],'R1');
pdecirc(-0.59999999999999998,0,0.29999999999999999,'C1');
pdecirc(0.59999999999999998,0,0.29999999999999999,'C2');
set(findobj(get(pde_fig,'Children'),'Tag','PDEEval'),'String','R1-
(C1+C2)')
% Boundary conditions:
pdetool('changemode',0)
% esfera derecha con carga negativa -1 y peso o valor w de 1 con
condición de Dirichlet
pdesetbd(12,...
'dir',...
1,...
'1',...
'-1')
pdesetbd(11,...
'dir',...
1,...
'1',...
'-1')
pdesetbd(10,...
'dir',...
1,...
'1',...
'-1')
pdesetbd(9,...
'dir',...
1,...
'1',...
'-1')
% esfera izquierda con carga positiva 1 y peso o valor w de 1 con
condición de Dirichlet
pdesetbd(8,...
'dir',...
1,...
'1',...
'1')
pdesetbd(7,...
'dir',...
1,...
'1',...
'1')
pdesetbd(6,...
'dir',...
1,...
'1',...
'1')
pdesetbd(5,...
'dir',...
1,...
'1',...
'1')
% Condición de Neuman en el plano exterior rectangular con valores de 0
pdesetbd(4,...
'neu',...
1,...
'0',...
'0')
pdesetbd(3,...
'neu',...
1,...
'0',...
'0')
pdesetbd(2,...
'neu',...
1,...
'0',...
'0')
pdesetbd(1,...
'neu',...
1,...
'0',...
'0')
% Mesh generation:
setappdata(pde_fig,'Hgrad',1.3);
setappdata(pde_fig,'refinemethod','regular');
setappdata(pde_fig,'jiggle',char('on','mean',''));
setappdata(pde_fig,'MesherVersion','preR2013a');
pdetool('initmesh')
pdetool('refine')
pdetool('jiggle')
% PDE coefficients:
pdeseteq(1,...
'1.0',...
'0.0',...
'0',...
'1.0',...
'0:10',...
'0.0',...
'0.0',...
'[0 100]')
setappdata(pde_fig,'currparam',...
['1.0';...
'0 '])
% Solve parameters:
setappdata(pde_fig,'solveparam',...
char('0','1000','10','pdeadworst',...
'0.5','longest','0','1E-4','','fixed','Inf'))
% Solve PDE:
pdetool('solve')
Ejemplo 2
Se tienen 2 placas cargadas positiva y negativamente, y entre estas 2 placas se
coloca una esfera descargada para ver su comportamiento al estar entre las líneas
de campo de una placa cargada positivamente y una negativa.
% Geometry description:
pderect([-1.2 1.2 -1 1],'R1');
pderect([-0.80000000000000004 -0.29999999999999999 -0.59999999999999998
0.59999999999999998],'R2');
pderect([0.80000000000000004 0.29999999999999999 -0.59999999999999998
0.59999999999999998],'R3');
pdecirc(0,0,0.20000000000000001,'C1');
set(findobj(get(pde_fig,'Children'),'Tag','PDEEval'),'String','R1-
(R2+R3+C1)')
% Boundary conditions:
pdetool('changemode',0)
pdesetbd(16,...
'dir',...
1,...
'1',...
'0')
pdesetbd(15,...
'dir',...
1,...
'1',...
'0')
pdesetbd(14,...
'dir',...
1,...
'1',...
'0')
pdesetbd(13,...
'dir',...
1,...
'1',...
'0')
pdesetbd(12,...
'dir',...
1,...
'1',...
'-3')
pdesetbd(11,...
'dir',...
1,...
'1',...
'4')
pdesetbd(10,...
'dir',...
1,...
'1',...
'-3')
pdesetbd(9,...
'dir',...
1,...
'1',...
'-3')
pdesetbd(8,...
'dir',...
1,...
'1',...
'4')
pdesetbd(7,...
'dir',...
1,...
'1',...
'4')
pdesetbd(6,...
'dir',...
1,...
'1',...
'4')
pdesetbd(5,...
'neu',...
1,...
'2',...
'1')
pdesetbd(4,...
'neu',...
1,...
'2',...
'1')
pdesetbd(3,...
'dir',...
1,...
'1',...
'-3')
pdesetbd(2,...
'neu',...
1,...
'2',...
'1')
pdesetbd(1,...
'neu',...
1,...
'2',...
'1')
% Mesh generation:
setappdata(pde_fig,'Hgrad',1.3);
setappdata(pde_fig,'refinemethod','regular');
setappdata(pde_fig,'jiggle',char('on','mean',''));
setappdata(pde_fig,'MesherVersion','preR2013a');
pdetool('initmesh')
pdetool('refine')
pdetool('jiggle')
% PDE coefficients:
pdeseteq(1,...
'1',...
'0.0',...
'1.0',...
'1.0',...
'0:10',...
'0.0',...
'0.0',...
'[0 100]')
setappdata(pde_fig,'currparam',...
['1 ';...
'1.0'])
% Solve parameters:
setappdata(pde_fig,'solveparam',...
char('0','1392','10','pdeadworst',...
'0.5','longest','0','1E-4','','fixed','Inf'))
% Solve PDE:
pdetool('solve')