PC051215

% agregacja macierzy sztywności układu K=[kel_l (4,4}+kei_2 (2,2) kel_2 (2,4); kel_2 (4,2) k

% wektor sil przywezlowych od obciążeń przeslowyc Slo-I -Pl/2 ~Pl*Ll/8 -Pl/2 Pl*Ll/8 ] »';

S2o=[ (-P1/2)+(p*L2i p*L2^A2/12)+<Pl*L2/

S3o=[ -P2/2 -P2*L3/8 -P2/2 P2*L3/8 ]•;

% wektor obciążeń węzłowych R~ [0 0] »;

% agregacja wektora obciążeń mi Ro“[Slo (4) +S2i

% rozwiązanie układu rownan met

PNR-Ro;

qpinv(K) *P

%wektor przemieszczeń koncow elementu Dl-[0    0    0 q{l) ] »;

°2=[0 q(ł) 0 q{2) ] • ;

D3=[0 q 2) 0 0] * ;

%wektor sil przywezlowych SWcel_l*Dl+Slo S2®kel_2*D2+S2o S3=kel 3*D3+S3o