Motor de corriente continua

Se produce una fem al girar las espiras en el campo magnético uniforme

Φ= B ·(N S )=BNScosθ V ε = dΦ dt =BNSsinθ dθ dt

iR= V m V ε L di dt

La ecuación del circuito es

iR= V 0 sgn( sinθ )BNSsinθ dθ dt L di dt

La función sgn (signo de sinθ) describe el conmutador del motor de corriente continua. La fem inducida Vε se opone, véase la página titulada Autoinducción. Circuito R-L el apartado Ecuación del circuito

Para simplificar las ecuaciones, supondremos que el coeficiente de autoinducción L de las espiras es muy pequeño, por lo que podremos despreciar el término, Ldi/dt

iR= V 0 sgn( sinθ )BNSsinθ dθ dt

La ecuación de la dinámica de rotación es

I d 2 θ d t 2 =NiSBsinθ M ext

Sustituimos la intensidad i de la ecuación del circuito

I d 2 θ d t 2 =N V 0 sgn( sinθ )BNSsinθ dθ dt R SBsinθ M ext I d 2 θ d t 2 = N V 0 SB R sgn( sinθ )sinθ B 2 N 2 S 2 R sin 2 θ dθ dt M ext I d 2 θ d t 2 = N V 0 SB R | sinθ | B 2 N 2 S 2 R sin 2 θ dθ dt M ext

Definimos un tiempo τ y dos parámetros β y γ. Para expresar la ecuación diferencial de forma más simple

τ=t N V 0 I·R SB ,β= M ext R N V 0 SB ,γ= BNS V 0 NSB V 0 IR = ( NSB ) 3 V 0 IR d 2 θ d τ 2 =| sinθ |γ sin 2 θ dθ dτ β

Resolvemos la ecuación diferencial por el procedimiento ode45 de MATLAB con las siguientes condiciones iniciales, en el instante τ=0, θ=π/2, dθ/dτ=0

Estado estacionario

Representamos la velocidad angular dθ/dτ en función del tiempo τ para γ=1.0 y β=0

gamma=1.0;
beta=0;
f=@(t,x) [x(2); abs(sin(x(1)))-gamma*x(2)*sin(x(1))^2-beta]; 
[t,x]=ode45(f,[0,100],[pi/2,0]);
plot(t,x(:,2))
grid on
xlabel('\tau')
ylabel('d\theta/d\tau');
title('Motor de corriente continua')

Partimos del hecho de que la velocidad angular media en el estado estacionario ωT es mucho mayor que la amplitud de las oscilaciones (como se vé en la figura). Esta situación no siempre se produce si γ es grande.

| dθ dt ω T | ω T

Observamos que la velocidad angular oscila alrededor de un valor constante ωT a partir del tiempo τ≈10. Calculamos el valor medio

dθ dτ = 1 τ 2 τ 1 τ 1 τ 2 dθ dτ dτ

Obtenemos el valor numérico de la integral, (área bajo la curva) tal como se explica en la página titulada Integración numérica y hallamos el valor medio que denominamos ωT y lo representamos mediante un segmento de color rojo

gamma=1.0;
 beta=0;
 f=@(t,x) [x(2); abs(sin(x(1)))-gamma*x(2)*sin(x(1))^2-beta]; 
 [t,x]=ode45(f,[0,100],[pi/2,0]);
 plot(t,x(:,2))
 idx=find(t>10); %se toman las velocidades para tiempos mayores que 10
 tt=t(idx);
 v=x(idx,2);
 suma=0; %valor medio
 for k=2:length(tt)
     suma=suma+(tt(k)-tt(k-1))*(v(k-1)+v(k))/2;
 end
 wT=suma/(t(end)-t(idx(1)));
 line([tt(1),tt(end)],[wT,wT],'color','red')
 grid on
 xlabel('\tau')
 ylabel('d\theta/d\tau');
 title('Motor de corriente continua')

Valor medio de sin(x) y de sin2(x)

| sinx | = 1 π 0 π sinx·dx = 2 π sin 2 x = 1 π 0 π sin 2 x·dx = 1 π 0 π 1cos( 2x ) 2 ·dx= 1 2

hold on
fplot(@(x) sin(x), [0,pi],'color','b')
line([0,pi],[2/pi,2/pi],'color','b')
fplot(@(x) sin(x).^2, [0,pi],'color','r')
line([0,pi],[1/2,1/2],'color','r')
grid on
xlabel('x')
ylabel('y')
legend('sin(x)','sin(x)^2', 'location', 'best')
title('Valor medio')

Escribimos la ecuación de la dinámica de rotación y tomamos valores medios, como el valor medio de la velocidad angular de rotación ωT es constante, el valor medio de la aceleración <d2θ/dt2>≈0. Relacionamos el momento externo (carga) Mext y la velocidad angular media en el estado estacionario ωT

I d 2 θ d t 2 = N V 0 SB R | sinθ | B 2 N 2 S 2 R sin 2 θ dθ dt M ext I d 2 θ d t 2 = N V 0 SB R | sinθ | B 2 N 2 S 2 R sin 2 θ dθ dt M ext N V 0 SB R 2 π B 2 N 2 S 2 R 1 2 ω T M ext =0 ω T = 4 π V 0 BNS 2R B 2 N 2 S 2 M ext

Cuando el motor no soporta carga alguna, Mext=0

ω 0T = 4 π V 0 BNS

La velocidad angular media ωT se hace nula (las espiras oscilan alrededor de una posición de equilibrio estable) para el momento externo Mext

0= 4 π V 0 BNS 2R B 2 N 2 S 2 M ext M ext = 2 π V 0 BNS R

En términos del parámetro β

β m = 2 π V 0 BNS R R V 0 NSB = 2 π

Desde el estado inicial al estado estacionario

Vamos a estudiar cómo evoluciona la velocidad angular media ω desde el estado incial hasta el estado estacionario caracterizado por una velocidad angular media ωT. En esta situación, el valor medio de la aceleración angular no es nulo <d2θ/dt2>≠0

I d 2 θ d t 2 = N V 0 SB R | sinθ | B 2 N 2 S 2 R sin 2 θ dθ dt M ext I d 2 θ d t 2 = N V 0 SB R | sinθ | B 2 N 2 S 2 R sin 2 θ dθ dt M ext dω dt = N V 0 SB IR 2 π B 2 N 2 S 2 IR 1 2 ω M ext I dω dt = B 2 N 2 S 2 2IR ( ω T ω )

Integramos, teniendo en cuenta que la velocidad angular inicial es cero

0 ω dω ω T ω = B 2 N 2 S 2 2IR 0 t dt ln( ω T ω )+ln ω T = B 2 N 2 S 2 2IR t ω T ω ω T =exp( t t r ), t r = 2IR B 2 N 2 S 2 ω= ω T ( 1exp( γτ 2 ) )

Representamos la velocidad angular dθ/dτ en función del tiempo τ y la funcion ω(τ) que hemos deducido

gamma=1.0;
 beta=0;
 f=@(t,x) [x(2); abs(sin(x(1)))-gamma*x(2)*sin(x(1))^2-beta]; 
 [t,x]=ode45(f,[0,100],[pi/2,0]);
 hold on
 plot(t,x(:,2))
 idx=find(t>10);
 tt=t(idx);
 v=x(idx,2);
 suma=0; %valor medio
 for k=2:length(tt)
     suma=suma+(tt(k)-tt(k-1))*(v(k-1)+v(k))/2;
 end
 wT=suma/(t(end)-t(idx(1)));
 fplot(@(t) wT*(1-exp(-gamma*t/2)),[0,100])
 hold off
 grid on
 xlabel('\tau')
 ylabel('d\theta/d\tau');
 title('Motor de corriente continua')

Energía por unidad de tiempo. Potencia

Conservación de la energía, comprobamos que

P b = P d + P e + d E k dt V 0 2 R ( 1γ| sinθ | dθ dτ )= V 0 2 R ( 1γ| sinθ | dθ dτ ) 2 + V 0 2 R γβ dθ dτ + V 0 2 R ( γ| sinθ | dθ dτ γ 2 sin 2 θ ( dθ dτ ) 2 γβ dθ dτ )

Valores medios

Comprobación

P b = P d + P e V 0 2 R ( 1 8 π 2 )+ 4 V 0 πBNS M ext = V 0 2 R ( 1 8 π 2 )+ 2R B 2 N 2 S 2 M ext 2 + 4 π V 0 BNS M ext 2R B 2 N 2 S 2 M ext 2

Representamos la potencia suministrada por la batería Pb y la proporcionada a los dispositivos externos Pe, para γ=0.8 y β=0.3. Las líneas horizontales representan los valores medios

gamma=0.8;
beta=0.3;
%V^2/R=1
f=@(t,x) [x(2); abs(sin(x(1)))-gamma*x(2)*sin(x(1))^2-beta]; 
[t,x]=ode45(f,[0,40],[pi/2,0]);
hold on
Pe=beta*gamma*x(:,2); %externa
plot(t,Pe)
Pe_media=4*beta/pi-2*beta^2;
line([0,40],[Pe_media,Pe_media],'color','b')
Pb=1-gamma*abs(sin(x(:,1))).*x(:,2);
plot(t,Pb)
Pb_media=1-8/pi^2+4*beta/pi;
line([0,40],[Pb_media,Pb_media],'color','r')
disp(Pe_media/Pb_media)
hold off
grid on
xlabel('\tau')
legend('Pe','Pb','location','best')
ylabel('Potencia');
title('Motor de corriente continua')

El rendimiento del motor de corriente continua es el cociente entre la potencia media suministrada a los dispositivos externos <Pe> y la suministrada por la batería <Pb>

 0.3535

η= P e P b = 4 π β2 β 2 1 8 π 2 + 4 π β

Representamos el rendimiento η en función de β en el intervalo 0≤ββm, es decir, 0≤β≤2/π

f=@(x) (4*x/pi-2*x.^2)./(1-8/pi^2+4*x/pi);
hold on
fplot(f,[0,2/pi])
x1=2/pi-(pi-sqrt(pi^2-8))/4;
max=(pi-sqrt(pi^2-8))^2/8;
line([x1,x1],[0,max],'lineStyle','--')
hold off
disp([x1,f(x1)])
grid on
ylim([0,0.4])
xlabel('\beta')
ylabel('\eta')
title('Rendimiento')

   0.1931    0.3935

Presenta un máximo para β=0.19 y su valor es η=0.39

dη dβ =0 ( 4 π 4β )( 1 8 π 2 + 4 π β )( 4 π β2 β 2 ) 4 π =0 8 π 2 β 2 +( 4 32 π 2 )β+ 32 π 3 4 π =0 β 1 = 2 π 1 4 ( π π 2 8 ) η máx = 4 π 2 β 1 1 8 π 2 + 4 π β 1 β 1 = 4 π 2( 2 π 1 4 ( π π 2 8 ) ) 1 8 π 2 + 4 π ( 2 π 1 4 ( π π 2 8 ) ) ( 2 π 1 4 ( π π 2 8 ) )= π 2 ( π π 2 8 ) π 2 8 ( π 2 8 4 π 2 8 4π )= 1 8 ( π π 2 8 ) 2

Referencias

Enrique F Moreno. Numerical investigation of the DC electric motor. Eur. J. Phys. 39 (2018) 055203