60974 PC051211

elear, cle Ll=4; V Im]

12*1}* [m]

E-200*10^A6;‘[kN/m";

EI1=E*I1;

EI2»E*I2;

EI3«E*I3; p=4.5; ♦ [kN/m]

Pl-30;%[kNl

P2=25;*[kN]

'♦macierz sztywności elem. kel_l=ke_beam_m3(Eli,LI,'11');

♦macierz sztywności elem. 2 kel_2^,=ke_beam_m3 (EI2, L2, ’ 11') ;

♦macierz sztywności elem. 3 kel_3=ke_beam_m3(El3,L3,'11') ;

% agregacja macierzy sztywności układu

K- [kel_l (4,4) +kel_2 (2,2) kel_2 (2,4); kel_2 (4,2) kel_2 (4,4) +kel_3 (2

♦wektor sil przywezlowych od obciążeń przeslowych Slo-[ -Pl/2 -Pl*Ll/8 -Pl/2 Pl*Ll/8 ]*;

S2o=[ (-P1/2) + (p*L2/2)    (-Pl*L2/8) + (p*L2''2/12)    (-P1/2) + (p*L2/2)    (

p*L2^A2/12)+(Pl*L2/8)    ]';

S3o-[ -P2/2 -P2*L3/8 -P2/2 P2*L3/8 ]';