變截面梁定義

《變截面梁定義》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。

1、1．變截面梁定義不同截面之間可按線性變化，為了保證正確性，兩個截面之間應該一一對應，必要的時候可通過將復雜的截面形狀分塊的方式。主要過程包括：et,1,plane82!建立截面有限元模型定義截面1secwrite,mysec1!定義對應的截面名稱!定義截面2!同上!截面調(diào)用命令sectype,1,beam,mesh!讀入自定義截面1secread,mysec1,sect,,meshsectype,2,beam,mesh!讀入自定義截面2secread,mysec2,sect,,mesh!定義變截面3，對應的s

2、ectype,3,tapersecdata,1,50!截面1開始位置為x=50secdata,2,150!截面2的開始位置為x=1502.截面柵點結(jié)果提取!Beam189柵點結(jié)果提取命令流jsdgs=？!柵點個數(shù)賦值，以六個（A,B,C,D,E,F）為例jdjm=？!？=1,2,3，I節(jié)點截面=1,J節(jié)點截面=2,K節(jié)點截面=3*dim,jsdxh,,6!對于6個柵點，定義數(shù)組JSDXH*dim,lsxh,,6!用于保存不考慮comp時I，J對應的LS提取編號*dim,sxyz,,6,3jsdxh(1)=1,

3、7,15,18,10,12!A,B,C,D,E,F點角柵點對應序號*do,i,1,6lsxh(i)=3*(jdjm-1)*jsdgs+3*(jsdxh(i)-1)!編號計算公式，可參考幫助文件*enddo!-------------------------------------------!定義單元的各角柵點的x方向應力(sx)etab*do,i,1,6etable,sigs%i%,ls,lsxh(i)+1*enddo!獲取單元1各角柵點的正應力sx*do,i,1,6*get,sxyz(i,1),elem,

4、1,etab,sigs%i%*enddo!--------------------------------------------!定義單元的各角柵點的xz方向應力(sxz)etab*do,i,1,6etable,sigs%i%,ls,lsxh(i)+2*enddo!獲取單元1各角柵點的剪應力sxz*do,i,1,6*get,sxyz(i,2),elem,1,etab,sigs%i%*enddo!--------------------------------------------!定義單元的各角柵點的xy

5、方向應力(sxy)etab*do,i,1,6etable,sigs%i%,ls,lsxh(i)+3*enddo!獲取單元1各角柵點的剪應力sxy*do,i,1,6*get,sxyz(i,3),elem,1,etab,sigs%i%*enddo!---------------------------------------------