!簡支梁實體與預應力鋼筋分析
/COM, Structural
/PREP7
egjx=2e5 !Ey
agjx=140 !單根鋼絞線面積
ehnt=4e4 !Eh
xzxs=1.0e-5 !線脹系數(shù)
yjl=200000 !定義預加力
et,1,link8 !定義link8單元
et,2,solid95 !定義solid95單元
r,1,agjx !定義link8單元的面積
r,2 !定義第2種實常數(shù)
mp,ex,1,egjx !定義link8單元的彈性模量
mp,prxy,1,0.3 !定義link8單元的泊松系數(shù)
mp,alpx,1,1.0e-5 !定義線膨脹系數(shù)
mp,ex,2,ehnt !定義solid95單元的彈性模量
mp,prxy,2,0.3 !定義solid95單元的泊松系數(shù)
blc4, , ,100,200,3000 !定義梁體
/view,1,1,1,1 !定義ISO查看
/ang,1
vplot !繪制梁體
kwpave,6 !工作平面移動到關(guān)鍵點6
wpoff,-30 !工作平面移動-30mm(X)
wprot,0,0,90 !工作平面旋轉(zhuǎn)
vsbw,1 !分割梁體
wpoff,0,0,-40 !工作平面移動-40mm(Z)
vsbw,2 !分割梁體
wpoff,0,40 !工作平面移動40mm(Y)
wprot,0,90 !工作平面旋轉(zhuǎn)
vsbw,all !分割梁體
wpstyl !關(guān)閉工作平面顯示
nummrg,all,,,,low !整理
numcmp,all !壓縮編號
esize,30 !定義網(wǎng)分時邊長控制
lsel,s,,,28,38,10 !定義line28和38為新的選擇集
latt,1,1,1 !定義選擇集的屬性
lmesh,all !對線劃分單元
allsel,all !新的選擇集為所有的實體
gplot !繪制所有的實體
vsel,s,,,all !定義所有體為選擇集
vatt,2,2,2 !定義選擇集的屬性
mshape,0,3d !將體劃分單元的形狀定位HEX
mshkey,1 !采用MAPPED劃分器
vmesh,all !對體進行劃分單元
finish
/solu
dl,3,,all !對線line7施加約束(UX,UY,UZ)
dl,16,,all !對線line31施加約束(UX,UY,UZ)
dl,23,,all !對線line23施加約束(UX,UY,UZ)
dl,2,,uy !對線line4施加約束(UY)
dl,15,,uy !對線line30施加約束(UY)
dl,22,,uy !對線line23施加約束(UY)
dk,2,,,,,ux,uy !對關(guān)鍵點2約束(UX,UY)
bfl,28,temp,-yjl/(xzxs*egjx*agjx) !對鋼絞線施加溫度
bfl,38,temp,-yjl/(xzxs*egjx*agjx) !對鋼絞線施加溫度
solve !求解
finish
/post1
plnsol,s,z,0,1 !繪制Z方向的應力
etable,sigi,ls,1 !定義鋼筋單元數(shù)據(jù)表
plls,sigi,sigi,1 !繪制上述應力
!finish
!/exit,nosav