FEM-Course-Matlab/6.桁架结构matlab有限元编程/Truss2D/main_tuss26_2D.m

20 lines
878 B
Mathematica
Raw Normal View History

2024-01-28 16:46:36 +00:00
clc,clear,close all
tic
d1=30;d2=2*d1;d3=3*d1;d4=4*d1;d5=5*d1;d6=6*d1;d7=7*d1;d8=8*d1;
h1=80;h2=2*h1;h3=3*h1;h4=4*h1;
x=[d4 d3 d5 d2 d4 d6 d1 d3 d5 d7 d4 0 d8]; % <EFBFBD>ڵ<EFBFBD>x<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
y=[h4 h3 h3 h2 h2 h2 h1 h1 h1 h1 0 0 0]; % <EFBFBD>ڵ<EFBFBD>y<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
A=3;E=2.1E005; % <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>͵<EFBFBD><EFBFBD><EFBFBD>ģ<EFBFBD><EFBFBD>
%<EFBFBD><EFBFBD>Ԫ<EFBFBD><EFBFBD>Ϣ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ţ<EFBFBD><EFBFBD>ڵ<EFBFBD>1<EFBFBD><EFBFBD><EFBFBD>ţ<EFBFBD><EFBFBD>ڵ<EFBFBD>2<EFBFBD><EFBFBD><EFBFBD>ţ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ģ<EFBFBD><EFBFBD>
ele=[1 1 2 A E;2 1 3 A E;3 2 3 A E;4 2 4 A E;5 2 5 A E;6 3 5 A E;7 3 6 A E;...
8 4 5 A E;9 5 6 A E;10 4 7 A E;11 4 8 A E;12 5 8 A E;13 5 9 A E;14 6 9 A E;...
15 6 10 A E;16 7 8 A E;17 8 9 A E;18 9 10 A E;19 7 12 A E;20 8 12 A E;...
21 7 11 A E;22 8 11 A E;23 9 11 A E;24 10 11 A E;25 9 13 A E;26 10 13 A E];
%<EFBFBD>غ<EFBFBD><EFBFBD><EFBFBD>Ϣ<EFBFBD><EFBFBD><EFBFBD>ڵ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ţ<EFBFBD>x<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>y<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>z<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
Load=[1 200 100]
%Լ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ڵ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ţ<EFBFBD>x<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Լ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>y<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Լ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>z<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Լ<EFBFBD><EFBFBD>
Constr=[11 0 0;12 0 0;13 0 0];
[U, Strain, Stress, AxialForce]=Truss2DFEA(x,y,ele,Load,Constr,100 )
toc