ansys计算混凝土板裂缝命令流

...! 书 关于书的成语关于读书的排比句社区图书漂流公约怎么写关于读书的小报汉书pdf 中例 题 快递公司问题件快递公司问题件货款处理关于圆的周长面积重点题型关于解方程组的题及答案关于南海问题 FINISH$/CLEAR$/CONFIG,NRES,5000$/PREP7et,2,link8et,1,solid65keyopt,1,1,1keyopt,1,3,2keyopt,1,7,1mp,ex,1,19095mp,prxy,1,0.2fck=20.1ftk=2.01tb,concr,1tbdata,,0.5,0.95,ftk,-1tb,miso,1,,11tbpt,,0.0002,fck*0.19tbpt,,0.0004,fck*0.36tbpt,,0.0006,fck*0.51tbpt,,0.0008,fck*0.64tbpt,,0.0010,fck*0.75tbpt,,0.0012,fck*0.84tbpt,,0.0014,fck*0.91tbpt,,0.0016,fck*0.96tbpt,,0.0018,fck*0.99tbpt,,0.0020,fck*1.00tbpt,,0.0033,fck*0.85!定义钢筋材料参数mp,ex,2,2e5mp,prxy,2,0.3tb,biso,2tbdata,,335,0mp,ex,3,2e5mp,prxy,3,0.3tb,biso,3tbdata,,235,0pi=acos(-1)!πr,1,0.25*pi*22*22!22直径圆r,2,0.25*pi*22*22/2r,3,0.25*pi*10*10r,4,0.25*pi*10*10/2r,5!建立几何模型并切分blc4,,,150/2,300,2000/2*do,i,1,2$wpoff,,,100$vsbw,all$*enddo!沿z向移动两个100并切分*do,i,1,4$wpoff,,,50$vsbw,all$*enddo*do,i,1,5$wpoff,,,100$vsbw,all$*enddowpcsys,-1$wprota,,-90$wpoff,,,30!坐标轴回并旋转、移动、切分vsbw,allwpoff,,,240vsbw,allwpcsys,-1wpoff,30wprota,,,90vsbw,allwpcsys,-1elemsiz=50!附钢筋单元属性并划分网格lsel,s,loc,x,30$lsel,r,loc,y,30$cm,zj,line$latt,2,1,2$lesize,all,elemsiz!选中钢筋位置线并定义名称，附钢筋材质lsel,s,loc,x,75$lsel,r,loc,y,30$cm,zjb,line$latt,2,2,2$lesize,all,elemsizlsel,s,loc,x,30$lsel,r,loc,y,270$cm,jlj,line$latt,3,3,2$lesize,all,elemsizlsel,s,tan1,z$lsel,r,loc,y,30,270$lsel,r,loc,x,30,70$lsel,u,loc,z,250lsel,u,loc,z,350$cm,gj,line$latt,3,3,2$lesize,all,elemsizlsel,s,loc,z,0$lsel,r,loc,y,30,270$lsel,r,loc,x,30,70cm,gjb,line$latt,3,4,2$lesize,all,elemsizlsel,allcmsel,s,zj$cmsel,a,zjb$cmsel,a,jlj$cmsel,a,gjcmsel,a,gjb$cm,gj,linelmesh,alllsel,all!划分混凝土单元网格vatt,1,5,1mshkey,1esize,elemsizvmesh,allallsel,all!施加约束lsel,s,loc,y,0$lsel,r,loc,z,900dl,all,,uyasel,s,loc,z,0da,all,symmasel,s,loc,x,75da,all,symmp0=180e3q0=p0/150/100asel,s,loc,z,250,350asel,r,loc,y,300sfa,all,1,pres,q0allsel!求解控制设置/soluantype,0outres,all,allautots,onneqit,40nsubst,400,,200cnvtol,u,,0.05cnvtol,f,,0.05solve!后处理/post26node1=node(75,0,0)nsol,2,node1,u,yprod,3,1,,,,,,p0/1000pprod,4,2,,,,,,-1xvar,4plvar,3某钢筋混凝土分离式模型计算命令流FINISH$/CLEAR$/CONFIG,NRES,5000$/PREP7et,2,link8et,1,solid65keyopt,1,1,1keyopt,1,3,2keyopt,1,7,1mp,ex,1,11305mp,prxy,1,0.2fck=11.9ftk=1.27tb,concr,1tbdata,,0.5,0.95,ftk,-1tb,miso,1,,11tbpt,,0.0002,fck*0.19tbpt,,0.0004,fck*0.36tbpt,,0.0006,fck*0.51tbpt,,0.0008,fck*0.64tbpt,,0.0010,fck*0.75tbpt,,0.0012,fck*0.84tbpt,,0.0014,fck*0.91tbpt,,0.0016,fck*0.96tbpt,,0.0018,fck*0.99tbpt,,0.0020,fck*1.00tbpt,,0.0033,fck*0.85!定义钢筋材料参数mp,ex,2,2e5mp,prxy,2,0.3tb,biso,2tbdata,,335,0pi=acos(-1)!πr,1,0.25*pi*8*8!8直径圆r,2,0.25*pi*8*8/2r,3!建立几何模型并切分blc4,,,7800,160,7200*do,i,1,17$wpoff,,,400$vsbw,all$*enddo!沿z向移动200并切分wprota,,-90wpoff,,,40$vsbw,allwpoff,,,80$vsbw,allwpcsys,-1$wprota,,-90wprota,,,-90*do,i,1,19$wpoff,,,-7800/20$vsbw,all$*enddoelemsiz=100wpcsys,-1!附钢筋单元属性并划分网格lsel,s,loc,y,40$cm,bj,line$latt,2,1,2$lesize,all,elemsiz!选中钢筋位置线并定义名称，附钢筋材质lsel,s,loc,y,120$cm,dj,line$latt,2,1,2$lesize,all,elemsizcmsel,s,bjcmsel,a,dj$cm,gj,linelmesh,all!划分混凝土单元网格lsel,allvatt,1,3,1mshkey,1esize,elemsizvmesh,allallsel,all!施加约束lsel,s,loc,x,0dl,all,,alllsel,s,loc,x,7800dl,all,,alllsel,s,loc,z,0dl,all,,alllsel,s,loc,z,7200dl,all,,allallsel,all!加载q0=2e-3asel,s,loc,y,160sfa,all,1,pres,q0allsel!求解控制设置/soluantype,0outres,all,allautots,onneqit,40nsubst,400,,200cnvtol,u,,0.05cnvtol,f,,0.05solve!后处理!将背景设为白色jpgprf,500,100,1/rep/post26node1=node(75,0,0)nsol,2,node1,u,yprod,3,1,,,,,,p0/1000pprod,4,2,,,,,,-1xvar,4plvar,3如有侵权请联系告知删除，感谢你们的配合！精品精品精品