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

19 lines
919 B
Mathematica
Raw Normal View History

2024-01-28 16:46:36 +00:00
clc,clear
tic
d1=37.5;d2=37.5;d3=100;h1=200;h2=100;
x=[-d1 d1 -d2 d2 d2 -d2 -d3 d3 d3 -d3]; % <EFBFBD>ڵ<EFBFBD>x<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
y=[0 0 d2 d2 -d2 -d2 h2 d3 -d3 -d3]; % <EFBFBD>ڵ<EFBFBD>y<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
z=[h1 h1 h2 h2 h2 h2 0 0 0 0]; % <EFBFBD>ڵ<EFBFBD>z<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, 4, 1 A E;3 2 3 A E;4, 2, 6 A E;5, 1, 5 A E;6, 2, 4 A E;7, 2, 5 A E;...
8, 1, 3 A E;9, 1, 6 A E;10, 3, 6 A E;11, 5, 4 A E;12, 3, 4 A E;13, 5, 6 A E;...
14, 3, 10 A E;15, 7, 6 A E;16, 9, 4 A E;17, 8, 5 A E;18, 7, 4 A E;19, 3, 8 A E;...
20, 10, 5 A E;21, 9, 6 A E;22, 10, 6 A E;23, 3, 7 A E;24, 8, 4 A E;25, 9, 5 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 0 200 0;2 0 200 0];
%Լ<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><EFBFBD><EFBFBD>δԼ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>NaN<EFBFBD><EFBFBD>
Constr=[7 0 0 0;8 0 0 0;9 0 0 0;10 0 0 0];
[U, Strain, Stress, AxialForce]=Truss3DStaticsFEA(x,y,z,ele,Load,Constr,40)
toc