原创力文档- 1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
- 2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!求解多跨连续梁的弯矩图!!!!!!!算例ex01 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!finish/clear,nostart/filname,ex01,1 !!定义文件名!!!!!参数输入/prep7L=8 !!跨度NN=20 !!每跨分段数量Ns=1 !!跨度数量Ex=2.06e11 !!弹性模量Nuxy=0.3 !!泊松比qq=1.0*1000 !!均布荷载aa=0.2 !!方管截面宽度bb=0.25 !!方管截面高度tt=0.01 !!方管管壁厚度Area=aa*bb-(aa-2*tt)*(bb-2*tt)Izz=aa*bb**3/12-(aa-2*tt)*(bb-2*tt)**3/12Ashear=2*tt*bb !!剪切面积!!!!!前处理/prep7et,1,beam3 !!定义单元类型mp,ex,1,Ex !!定义材料特性mp,nuxy,1,Nuxy r,1,Area,Izz,bb,Area/Ashear,, !!定义实常数（考虑剪切变形）!r,1,Area,Izz,bb,,, !!定义实常数（不考虑剪切变形）!!!!!定义节点Nnode=NN*Ns+1 !!节点总数dx=L/NN !!每段单元长度*do,i,1,Nnode n,i,(i-1)*dx,0,0*enddo!!!!!定义单元Nele=Nnode-1 !!!单元总数type,1real,1mat,1*do,i,1,Nele e,i,i+1 !!!定义单元（单元自动编号）! en,i+Nele,i,i+1 !!!定义单元（单元按规定编号）*enddo!!!!施加约束*do,i,1,Ns+1 n1=(i-1)*NN+1 d,n1,uy,0*enddod,1,ux,0!!!施加荷载sfbeam,all,1,pres,qq!!!!求解 /soluallsel,allsolve!!!!画弯矩图/post1ETABLE,SMIS6,SMISC, 6 ETABLE,SMIS12,SMISC, 12 PLLS,SMIS6,SMIS12,-1,0 !!画弯矩图plnsol,u,y,0,1.0, !!画变形图!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!求解单层球面网壳的临界荷载!!!!!!!算例ex02 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!finish/clear,nostart/filname,ex02,1 !!定义文件名!!!!!参数输入/prep7PI=3.1415926535R=15 !!球面半径f=5 !!网壳矢高NR=8 !!径向划分数量NC=24 !!环向划分数量alf=acos((R-f)/R) !!圆心角(弧度）alf=alf*180/PI !!圆心角(度）dalf=alf/NR !!每个网格对应的圆心角alf0=90-alf !!起始圆心角dbeta=360/NCEx=2.06e11 !!弹性模量Nuxy=0.3 !!泊松比qq=3.0*1000 !!均布荷载aa=0.12 !!方管截面宽度bb=0.12 !!方管截面高度tt=0.006 !!方管管壁厚度Area=aa*bb-(aa-2*tt)*(bb-2*tt)Izz=aa*bb**3/12-(aa-2*tt)*(bb-2*tt)**3/12Iyy=bb*aa**3/12-(bb-2*tt)*(aa-2*tt)**3/12!!!!!前处理/prep7et,1,beam188 !!定义单元类型!keyopt,1,3,2 !!定义形函数精度mp,ex,1,Ex !!定义材料特性mp,nuxy,1,Nuxy sectype,1,beam,HREC,,2 !!定义截面类型secoffset,CENT !!截面按形心对中SECDATA,aa,bb,tt,tt,tt,tt,0,0,0,0 !!定义截面参数!r,1,Area,Izz,Iyy,aa,bb,, !!定义实常数!!!!!定义节点Nnode=2*NC*NR+1 !!节点总数N,Nnode+1,0,0,0 !!球心N,Nnode,0,0,R !!顶点csys,2 !!球面坐标系*do,i,1,NR *do,j,1,NC inode=NC*(i-1)+j n,inode,R,j*
文档评论（0）