有限元分析课程设计.docx
《有限元分析课程设计.docx》由会员分享,可在线阅读,更多相关《有限元分析课程设计.docx(55页珍藏版)》请在咨信网上搜索。
1、有限元分析 课程设计 学 院:土木建筑工程学院 专 业: 工程力学 班 级: 力学131 学 号: 3121631023 姓 名: 崔晨露 一、 单元划分与节点编号 二、 C语言程序 #include#include#define NE 32 /单元数#define NJ 45 /节点数#define NZ 10 /支承数#define NPJ 7 /节点荷载数#define NJ2 90 /节点位移数#define DD 14 /半带宽int LXM=0; /类型判别码double EO=170e9; /杨氏模量double MU=0.3; /泊松比double LOU=0; /容重doub
2、le TE=0.1; /厚度doubleAJZNJ+13= 0,0,0,0,0,0,0,0,0.75,0,0,1.5,0,0,2.25,0,0,3,0,1.875,0,0,1.875,0.75,0,1.875,1.5,0,1.875,2.25,0,1.875,3,0,3.75,0,0,3.75,0.75,0,3.75,1.5,0,3.75,2.25,0,3.75,3,0,5.625,0,0,5.625,0.75,0,5.625,1.5,0,5.625,2.25,0,5.625,3,0,7.5,0,0,7.5,0.75,0,7.5,1.5,0,7.5,2.25,0,7.5,3,0,9.375,0
3、,0,9.375,0.75,0,9.375,1.5,0,9.375,2.25,0,9.375,3,0,11.25,0,0,11.25,0.75,0,11.25,1.5,0,11.25,2.25,0,11.25,3,0,13.125,0,0,13.125,0.75,0,13.125,1.5,0,13.125,2.25,0,13.125,3,0,15,0,0,15,0.75,0,15,1.5,0,15,2.25,0,15,3;/共36个节点intJMNE+15= 0,0,0,0,0,1,6,7,2,0,2,7,8,3,0,3,8,9,4,0,4,9,10,5,0,6,11,12,7,0,7,12,
4、13,8,0,8,13,14,9,0,9,14,15,10,0,11,16,17,12,0,12,17,18,13,0,13,18,19,14,0,14,19,20,15,0,16,21,22,17,0,17,22,23,18,0,18,23,24,19,0,19,24,25,20,0,21,26,27,22,0,22,27,28,23,0,23,28,29,24,0,24,29,30,25,0,26,31,32,27,0,27,32,33,28,0,28,33,34,29,0,29,34,35,30,0,31,36,37,32,0,32,37,38,33,0,33,38,39,34,0,34
5、,39,40,35,0,36,41,42,37,0,37,42,43,38,0,38,43,44,39,0,39,44,45,40;/共32个单元intNZCNZ+1=0,1,2,3,4,5,6,7,8,9,10;/1-5号节点的x,y被约束doublePJNPJ+12+1=0,0,0,0,-3.75e4,50,0,-7.5e4,60,0,-7.5e4,70,0,-7.5e4,80,0,8e4,83,0,8e4,87,0,-3.75e4,90;doubleAE,JSNJ*44,jsNJ+14,KZNJ2+1DD+1,PNJ2+1,S3+18+1,KE8+18+1,SZ3+132+1;intIE
6、,JE,ME,LE;void DUGD(int,int);/生成S矩阵,KE矩阵void main()intNJ1,k,IN,IM,jn,m,i,j,z,JO,ii,jj,h,dh,E,l,zl,dl,n;doublePE,c,SIG1,SIG2,SIG3,PYL,RYL,MAYL,MIYL,CETA;doubleWY8+1,YL3+1;if(LXM!=0)/平面应力问题与平面应变问题的判别EO=EO/(1.0-MU*MU);MU=MU/(1.0-MU);for(i=0;i=NJ2;i+)for(j=0;j=DD;j+)KZij=0.0;for(E=1;E=NE;E+)DUGD(E,3);fo
7、r(i=1;i=4;i+)for(ii=1;ii=2;ii+)h=2*(i-1)+ii;dh=2*(JMEi-1)+ii;for(j=1;j=4;j+)for(jj=1;jj0)KZdhdl=KZdhdl+KEhl;/*形成P矩阵*for(i=1;i0)for(i=1;i0)for(E=1;E=NE;E+)DUGD(E,1);PE=-LOU*(AE)*TE*9.8/4;P2*IE=P2*IE+PE;P2*JE=P2*JE+PE;P2*ME=P2*ME+PE;P2*LE=P2*LE+PE;/*边界条件*for(i=1;i=NZ;i+)z=NZCi;KZz1=1.0;for(j=2;jDD)JO=
8、DD;elseJO=z;for(j=2;j=JO;j+)KZz-j+1j=0.0;Pz=0.0;/*求解方程*NJ1=NJ2-1;for(k=1;kk+DD-1)IM=k+DD-1;elseIM=NJ2;IN=k+1;for(i=IN;i=IM;i+)l=i-k+1;c=KZkl/KZk1;jn=DD-l+1;for(j=1;j=1;i-)if(DDNJ2-i+1)JO=NJ2-i+1;elseJO=DD;for(j=2;j=JO;j+)h=j+i-1;Pi=Pi-KZij*Ph;Pi=Pi/KZi1;printf(n);printf(JDUVn);for(i=1;i=NJ;i+)printf
9、(%d%-9.9f%-9.9fn,i,P2*i-1,P2*i);/*求单元应力和主应力*for(i=0;i=NJ*4;i+)for(j=0;j=3;j+)JSij=0.0;k=0;for(E=1;E=NE;E+)DUGD(E,2);for(i=1;i=4;i+)for(j=1;j=2;j+)h=2*(i-1)+j;dh=2*(JMEi-1)+j;WYh=Pdh;for(n=1;n=4;n+) for(i=1;i=3;i+) YLi=0;for(j=1;j=8;j+)YLi=YLi+SZi8*(n-1)+j*WYj;SIG1=YL1;SIG2=YL2;SIG3=YL3;PYL=(SIG1+SIG
10、2)/2;RYL=sqrt(pow(SIG1-SIG2)/2.0,2)+pow(SIG3,2);MAYL=PYL+RYL;MIYL=PYL-RYL;if(SIG2=MIYL)CETA=0;elseCETA=90-57.29578*atan2(SIG3,(SIG2-MIYL);/将节点应力值记入节点应力矩阵k+;JSk0=JMEn;JSk1=SIG1;JSk2=SIG2;JSk3=SIG3;printf(n);printf(E=%d JD=%dn,E,JMEn);printf(sx=%-9.2fsy=%-9.2ftou=%-9.2fn,SIG1,SIG2,SIG3);printf(s1=%-9.
11、2fs3=%-9.2ftheta=%-9.2fn,MAYL,MIYL,CETA);for(i=0;i=NJ;i+)for(j=0;j=3;j+)jsij=0.0;printf(n);printf(n);printf(平均节点应力:n);for(ii=1;ii=NJ;ii+)k=0;for(jj=1;jj1)for(w=1;w=4;w+)for(i=0;i=3;i+) for(j=0;j=8;j+) Bij=0.0;x=xyw1*a;y=xyw2*b; B11=(y-b)/AE; B13=(b-y)/AE; B15=(b+y)/AE; B17=-(b+y)/AE; B22=(x-a)/AE; B
12、24=-(a+x)/AE; B26=(a+x)/AE; B28=(a-x)/AE; B31=(x-a)/AE; B32=(y-b)/AE; B33=-(a+x)/AE; B34=(b-y)/AE; B35=(a+x)/AE; B36=(b+y)/AE; B37=(a-x)/AE; B38=-(b+y)/AE; for(i=1;i=3;i+) for(j=1;j=8;j+) Sij=0;for(k=1;k2)C=EO*TE/(1-MU*MU);KE11=C*(b/(3*a)+(1-MU)*a/(6*b);KE12=C*(1+MU)/8;KE13=C*(-b)/(3*a)+(1-MU)*a/(12
13、*b);KE14=C*(3*MU-1)/8);KE15=C*(-b)/(6*a)-(1-MU)*a/(12*b);KE16=(-C)*(1+MU)/8;KE17=C*(b/(6*a)-(1-MU)*a/(6*b);KE18=C*(1-3*MU)/8);KE21=KE12;KE22=C*(a/(3*b)+(1-MU)*b/(6*a);KE23=KE18;KE24=C*(a/(6*b)-(1-MU)*b/(6*a);KE25=KE16; KE26=C*(-a)/(6*b)-(1-MU)*b/(12*a); KE27=KE14; KE28=C*(-a)/(3*b)+(1-MU)*b/(12*a);K
14、E31=KE13;KE32=KE23;KE33=KE11;KE34=KE16;KE35=KE17;KE36=KE14; KE37=KE15; KE38=KE12;KE41=KE14;KE42=KE24;KE43=KE34;KE44=KE22;KE45=KE23;KE46=KE28;KE47=KE12; KE48=KE26; KE51=KE15;KE52=KE25;KE53=KE35;KE54=KE45;KE55=KE11;KE56=KE12;KE57=KE13;KE58=KE14; KE61=KE16;KE62=KE26;KE63=KE36;KE64=KE46;KE65=KE56;KE66=K
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 有限元分析 课程设计
1、咨信平台为文档C2C交易模式,即用户上传的文档直接被用户下载,收益归上传人(含作者)所有;本站仅是提供信息存储空间和展示预览,仅对用户上传内容的表现方式做保护处理,对上载内容不做任何修改或编辑。所展示的作品文档包括内容和图片全部来源于网络用户和作者上传投稿,我们不确定上传用户享有完全著作权,根据《信息网络传播权保护条例》,如果侵犯了您的版权、权益或隐私,请联系我们,核实后会尽快下架及时删除,并可随时和客服了解处理情况,尊重保护知识产权我们共同努力。
2、文档的总页数、文档格式和文档大小以系统显示为准(内容中显示的页数不一定正确),网站客服只以系统显示的页数、文件格式、文档大小作为仲裁依据,个别因单元格分列造成显示页码不一将协商解决,平台无法对文档的真实性、完整性、权威性、准确性、专业性及其观点立场做任何保证或承诺,下载前须认真查看,确认无误后再购买,务必慎重购买;若有违法违纪将进行移交司法处理,若涉侵权平台将进行基本处罚并下架。
3、本站所有内容均由用户上传,付费前请自行鉴别,如您付费,意味着您已接受本站规则且自行承担风险,本站不进行额外附加服务,虚拟产品一经售出概不退款(未进行购买下载可退充值款),文档一经付费(服务费)、不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
4、如你看到网页展示的文档有www.zixin.com.cn水印,是因预览和防盗链等技术需要对页面进行转换压缩成图而已,我们并不对上传的文档进行任何编辑或修改,文档下载后都不会有水印标识(原文档上传前个别存留的除外),下载后原文更清晰;试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓;PPT和DOC文档可被视为“模板”,允许上传人保留章节、目录结构的情况下删减部份的内容;PDF文档不管是原文档转换或图片扫描而得,本站不作要求视为允许,下载前自行私信或留言给上传者【可****】。
5、本文档所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用;网站提供的党政主题相关内容(国旗、国徽、党徽--等)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
6、文档遇到问题,请及时私信或留言给本站上传会员【可****】,需本站解决可联系【 微信客服】、【 QQ客服】,若有其他问题请点击或扫码反馈【 服务填表】;文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“【 版权申诉】”(推荐),意见反馈和侵权处理邮箱:1219186828@qq.com;也可以拔打客服电话:4008-655-100;投诉/维权电话:4009-655-100。