% OCW Universidad de Cantabria
% Cálculo Simbólico y Numérico en Ecuaciones Diferenciales
% © Cursos 2001-2014,  M. Eugenia Pérez, UC
%
syms t x
u_n=(sin(2*pi*x)*cos(3*2*pi*t)+sin(4*pi*x)*cos(3*4*pi*t))/2
ezsurf(u_n,[0,2],[0,1])
pause 
subplot(2, 2, 1); ezplot(subs(u_n,t,0),[0,1]) 
axis([0,1,-2,2])
gtext('t=0')
%  
subplot(2, 2, 2);ezplot(subs(u_n,t,0.2),[0,1])
axis([0,1,-2,2])
gtext('t=0.2')
%  
subplot(2, 2, 3);ezplot(subs(u_n,t,0.4),[0,1])
axis([0,1,-2,2])
gtext('t=0.4')
%  
subplot(2, 2, 4);ezplot(subs(u_n,t,0.6),[0,1])
axis([0,1,-2,2])
gtext('t=0.6')
