10.05.2013 Views

texto: metodos numericos para ecuaciones diferenciales ordinarias

texto: metodos numericos para ecuaciones diferenciales ordinarias

texto: metodos numericos para ecuaciones diferenciales ordinarias

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Program vibracion.m<br />

1<br />

2k m<br />

Base<br />

c<br />

1<br />

2k Figura 3.10: Modelo de un instrumento sísmico<br />

%Halla el movimiento y velocidad del instrumento sísmico<br />

clear;<br />

clc;<br />

format long<br />

k=40*10;<br />

w=5.81778;<br />

m=120;A=0.1;wn=sqrt(k/m);c=wn*m<br />

M=[0 1;-k/m -c/m];<br />

Y(:,1)=[0;0];<br />

h=0.1;n=1;t(1)=0;F=[0;A*(w^2)*sin(w*t(1))];<br />

while t(n)

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!