Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                

Portico Irregular Matlab

Descargar como docx, pdf o txt
Descargar como docx, pdf o txt
Está en la página 1de 4

1) calcular la matriz de rigidez lateral del siguiente prtico

1.1) sistema de coordenada Q-q


1.2) represente la matriz de paso (T)
1.3) presente la matriz de rigidez lateral (KL)

EJERCICIO ROPUESTO
VISTA EN PLATA

NUMERACIN DE NUDOS SISTEMA P-p


Y ELEMENTOS
1.1) Sistema de coordenadas Q-q

SISTEMA Q-q

1.2) Matriz de paso (T)

T=

1.3) Matriz de rigidez lateral (KL)

KL=
La programacin respectiva en MatLab, para obtener los valores de la
matriz de paso (T) y la matriz de rigidez lateral (KL)

%Programa de una prtico irregular


nod=8;nr=3;
GEN=[1 1 4 2 1 1 1; %elem,ni,nf,elem gene,inc en elem,inc en ni,inc en nf
4 4 7 1 1 1 1;6 4 5 1 1 1 1;
8 7 8 0 0 0 0];
[NI,NJ]=gn_portico(GEN); %Vector de Nudo Inicial y nudo final
NUDOS=[1 0 0 2 3 0 3.5;% i, xi, yi, nudos a gener, incr num nudo, dx,dy
2 5 0 2 3 0 3.5;3 9 0 1 3 0 3.5];
[X,Y]=glinea_portico(NUDOS);
[CG,ngl]=cg_sismo2(nod,nr,Y);% Coordenadas Generales
dibujo(X,Y,NI,NJ) % Dibuja el portico
[VC]=vc(NI,NJ,CG); % Matriz con los vectores de colocacion
[L,seno,coseno]=longitud (X,Y,NI,NJ);
% Secciones de los elementos
SECCION=[1 0.40 0.30 4 1; % Eleme,base,altura,elem gener,increm elem
6 0.30 0.30 2 1]
[ELEM]=gelem_portico(SECCION)
[L,seno,coseno]=longitud (X,Y,NI,NJ);
E=2400000;
% Matriz de rigidez de la estructura
[K]=krigidez(ngl,ELEM,L,seno,coseno,VC,E)
na=2;
Kaa=K(1:na,1:na);Kab=K(1:na,na+1:ngl)
Kbb=K(na+1:ngl,na+1:ngl);Kba=Kab'
% Matriz de paso
T=Kbb\Kba
% matriz de la rigidez lateral
KL=Kaa-Kab*inv(Kbb)*Kba
% ---end---%

También podría gustarte