資源描述:
《懸臂梁MATLAB有限元算例注釋.doc》由會員上傳分享,免費在線閱讀,更多相關(guān)內(nèi)容在教育資源-天天文庫。
1、用有限元法對懸臂梁分析的算例算例:如下圖所示的懸臂梁,受均布載荷q=1N/mm2作用。E=2.1×105N/mm2,μ=0.3厚度h=10mm?,F(xiàn)用有限元法分析其位移及應(yīng)力。梁可視為平面應(yīng)力狀態(tài),先按圖示尺寸劃分為均勻的三角形網(wǎng)格,共有8×10=80個單元,5×ll=55個節(jié)點,坐標軸以及單元與節(jié)點的編號如圖。將均布載荷分配到各相應(yīng)節(jié)點上,把有約束的節(jié)點5l、52、53、54、55視作固定鉸鏈,建立如圖所示的離散化計算模型。程序計算框圖:將各單元剛陣按整體編號集成到整體剛陣K<=0計算具有代表性的單元剛陣輸入材料參數(shù)開始(續(xù)左)處理根部約束,修改【K】【Q】求解[K][δ]=[
2、Q]整理[δ]并畫圖計算單元應(yīng)力,并輸出結(jié)束(接右)程序中的函數(shù)功能介紹及源代碼1.LinearTriangleElementStiffness(E,NU,t,xi,yi,xj,yj,xm,ym)――該函數(shù)用于計算平面應(yīng)力情況下彈性模量為E、泊松比為NU、厚度為t、第一個節(jié)點坐標為(xi,yi)、第二個節(jié)點坐標為(xj,yj)、第三個節(jié)點坐標為(xm,ym)時的線性三角形元的單元剛度矩陣.該函數(shù)返回6×6的單位剛度矩陣k.2.LinearTriangleAssemble(K,k,i,j,m)――該函數(shù)將連接節(jié)點i,j,m的線性三角形元的單元剛度矩陣k集成到整體剛度矩陣K。每集成
3、一個單元,該函數(shù)都將返回2N×2N的整體剛度矩陣K.3.LinearTriangleElementStresses(E,NU,t,xi,yi,xj,yj,xm,ym,u)--該函數(shù)計算在平面應(yīng)力情況下彈性模量為E、泊松比為NU、厚度為t、第一個節(jié)點坐標為(xi,yi)第二個節(jié)點坐標為(xj,yj)、第三個節(jié)點坐標為(xm,ym)以及單元位移矢量為u時的單元應(yīng)力。該函數(shù)返回單元應(yīng)力矢量。函數(shù)源代碼:functiony=LinearTriangleElementStiffness(E,NU,t,xi,yi,xj,yj,xm,ym)A=(xi*(yj-ym)+xj*(ym-yi)+x
4、m*(yi-yj))/2;%三角形單元面積,單元節(jié)點應(yīng)該按逆時針排序,保證每個三角形單元的面積都為正值(也可作為一個小函數(shù):LinearTriangleElementArea)betai=yj-ym;betaj=ym-yi;betam=yi-yj;gammai=xm-xj;gammaj=xi-xm;gammam=xj-xi;B=[betai0betaj0betam0;0gammai0gammaj0gammam;gammaibetaigammajbetajgammambetam]/(2*A);%B為應(yīng)變矩陣,其中betai=yi-ym,betaj=ym-yi,betam=yi-y
5、j.gammai=xm-xj,gammaj=xi-xm,gammam=xj-xi.D=(E/(1-NU*NU))*[1NU0;NU10;00(1-NU)/2];%D為彈性矩陣,分為平面應(yīng)力問題和平面應(yīng)變問題對于平面應(yīng)力問題D=(E/(1-NU*NU))*[1NU0;NU10;00(1-NU)/2];對于平面應(yīng)變問題E1=E/(1-NU*NU),NU1=NU/(1-NU)y=t*A*B'*D*B;%單元剛度矩陣functiony=LinearTriangleAssemble(K,k,i,j,m)K(2*i-1,2*i-1)=K(2*i-1,2*i-1)+k(1,1);K(2*i-
6、1,2*i)=K(2*i-1,2*i)+k(1,2);K(2*i-1,2*j-1)=K(2*i-1,2*j-1)+k(1,3);K(2*i-1,2*j)=K(2*i-1,2*j)+k(1,4);K(2*i-1,2*m-1)=K(2*i-1,2*m-1)+k(1,5);K(2*i-1,2*m)=K(2*i-1,2*m)+k(1,6);K(2*i,2*i-1)=K(2*i,2*i-1)+k(2,1);K(2*i,2*i)=K(2*i,2*i)+k(2,2);K(2*i,2*j-1)=K(2*i,2*j-1)+k(2,3);K(2*i,2*j)=K(2*i,2*j)+k(2,4);K
7、(2*i,2*m-1)=K(2*i,2*m-1)+k(2,5);K(2*i,2*m)=K(2*i,2*m)+k(2,6);K(2*j-1,2*i-1)=K(2*j-1,2*i-1)+k(3,1);K(2*j-1,2*i)=K(2*j-1,2*i)+k(3,2);K(2*j-1,2*j-1)=K(2*j-1,2*j-1)+k(3,3);K(2*j-1,2*j)=K(2*j-1,2*j)+k(3,4);K(2*j-1,2*m-1)=K(2*j-1,2*m-1)+k(3,5);K(2*j-1,2*