欢迎来到淘文阁 - 分享文档赚钱的网站! | 帮助中心 好文档才是您的得力助手!
淘文阁 - 分享文档赚钱的网站
全部分类
  • 研究报告>
  • 管理文献>
  • 标准材料>
  • 技术资料>
  • 教育专区>
  • 应用文书>
  • 生活休闲>
  • 考试试题>
  • pptx模板>
  • 工商注册>
  • 期刊短文>
  • 图片设计>
  • ImageVerifierCode 换一换

    ANSYS模型导入ABAQUS.doc

    • 资源ID:23960308       资源大小:167.50KB        全文页数:61页
    • 资源格式: DOC        下载积分:15金币
    快捷下载 游客一键下载
    会员登录下载
    微信登录下载
    三方登录下载: 微信开放平台登录   QQ登录  
    二维码
    微信扫一扫登录
    下载资源需要15金币
    邮箱/手机:
    温馨提示:
    快捷下载时,用户名和密码都是您填写的邮箱或者手机号,方便查询和重复下载(系统自动生成)。
    如填写123,账号就是123,密码也是123。
    支付方式: 支付宝    微信支付   
    验证码:   换一换

     
    账号:
    密码:
    验证码:   换一换
      忘记密码?
        
    友情提示
    2、PDF文件下载后,可能会被浏览器默认打开,此种情况可以点击浏览器菜单,保存网页到桌面,就可以正常下载了。
    3、本站不支持迅雷下载,请使用电脑自带的IE浏览器,或者360浏览器、谷歌浏览器下载即可。
    4、本站资源下载后的文档和图纸-无水印,预览文档经过压缩,下载后原文更清晰。
    5、试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓。

    ANSYS模型导入ABAQUS.doc

    Four short words sum up what has lifted most successful individuals above the crowd: a little bit more.-author-dateANSYS模型导入ABAQUSANSYS模型导入ABAQUSANSYS模型导入ABAQUSSYS软件的参数化建模(APDL)极其方便,而ABAQUS卓越的非线性计算功能使其成为有限元软件中的贵族,如果能整合两者的优势,有限元模拟计算就会相当高效。下面就将ANSYS模型如何导入ABAQUS简单交流一下。(其中部分内容参考了SIMWE上的精华贴)       首先在ANSYS编写APDL语言输出模型的节点和单元数据文件。如果直接用ANSYS中的WRITE NODE FILE和WRITE ELEM FILE得到的节点和单元数据文件,数据之间只有空格,没有逗号,不符合ABAQUS的INPUT文件格式要求。输出节点信息的APDL如下:Allsel,all  !选中所有! 输出节点*GET,NNode,NODE,COUNT, , , ,   ! 得到当前模型中的总节点数*CFOPEN,ansystoabaqus,inp*DO,I,0,NNode*VWRITE,Chrval(i),',',NX(I),',',NY(I),',',NZ(I)(A8,A1,F10.5,A1,F10.5,A1,F10.5)*ENDDOAllsel,all        输出单元信息时要弄清楚单元类型,编写APDL对每种类型的每个单元输出单元编号,各节点的编号。常见的SOLID65和SOLID45、SOLID95单元的APDL输出命令如下:*GET,NumberofNode,NODE,COUNT, , , ,ESEL,S,ENAME,65 *GET,NElem,ELEM,COUNT, , , ,   ! 得到当前模型中的总单元数!对单元集进行循环*GET,nd,ELEM,NUM,MIN, , , ,*DO,I,1,NElem!得到当前单元的类型*GET,ENAME,ELEM,nd,ATTR,ENAM !如果是65号(65号单元)*IF,ENAME,EQ,65,THEN!得到该单元的节点编号*GET,EN1,ELEM,nd,NODE,1 *GET,EN2,ELEM,nd,NODE,2 *GET,EN3,ELEM,nd,NODE,3 *GET,EN4,ELEM,nd,NODE,4 *GET,EN5,ELEM,nd,NODE,5 *GET,EN6,ELEM,nd,NODE,6 *GET,EN7,ELEM,nd,NODE,7 *GET,EN8,ELEM,nd,NODE,8 *VWRITE,Chrval(nd),',',Chrval(EN1),',',Chrval(EN2),',',Chrval(EN3),',',Chrval(EN4),',',Chrval(EN5),',',Chrval(EN6),',',Chrval(EN7),',',Chrval(EN8)(A8,8(A1,A8)nd = ELnext(nd) *END IF*ENDDOAllsel,all*GET,NumberofNode,NODE,COUNT, , , ,ESEL,S,ENAME,45                   !solid45单元 8节点六面体*GET,NElem,ELEM,COUNT, , , ,   ! 得到当前模型中的总单元数!对单元集进行循环*GET,nd,ELEM,NUM,MIN, , , ,*DO,I,1,NElem*GET,ENAME,ELEM,nd,ATTR,ENAM        !得到当前单元的类型*IF,ENAME,EQ,45,THEN                !如果是45号(45号单元)!得到该单元的节点编号*GET,EN1,ELEM,nd,NODE,1 *GET,EN2,ELEM,nd,NODE,2 *GET,EN3,ELEM,nd,NODE,3 *GET,EN4,ELEM,nd,NODE,4 *GET,EN5,ELEM,nd,NODE,5 *GET,EN6,ELEM,nd,NODE,6 *GET,EN7,ELEM,nd,NODE,7*GET,EN8,ELEM,nd,NODE,8*VWRITE,Chrval(nd),',',Chrval(EN1),',',Chrval(EN2),',',Chrval(EN3),',',Chrval(EN4),',',Chrval(EN5),',',Chrval(EN6),',',Chrval(EN7),',',Chrval(EN8)(A8,8(A1,A8)nd = ELnext(nd) *END IF*ENDDO*VWRITE('*ELEMENT,TYPE=C3D15 ,ELSET=Esolid2')Allsel,all*GET,NumberofNode,NODE,COUNT, , , ,ESEL,S,ENAME,95                    !solid95单元 20节点六面体*GET,NElem,ELEM,COUNT, , , ,     !得到当前模型中的总单元数!对单元集进行循环*GET,nd,ELEM,NUM,MIN, , , ,       ! 得到当前模型中的最小单元号*DO,I,1,NElem                       *GET,ENAME,ELEM,nd,ATTR,ENAM         !得到当前单元的类型*IF,ENAME,EQ,95,THEN               !如果是95号(95号单元)!得到该单元的节点编号*GET,EN1,ELEM,nd,NODE,1 *GET,EN2,ELEM,nd,NODE,2 *GET,EN3,ELEM,nd,NODE,3 *GET,EN4,ELEM,nd,NODE,4 *GET,EN5,ELEM,nd,NODE,5 *GET,EN6,ELEM,nd,NODE,6 *GET,EN7,ELEM,nd,NODE,7 *GET,EN8,ELEM,nd,NODE,8 *GET,EN9,ELEM,nd,NODE,9 *GET,EN10,ELEM,nd,NODE,10*GET,EN11,ELEM,nd,NODE,11 *GET,EN12,ELEM,nd,NODE,12 *GET,EN13,ELEM,nd,NODE,13 *GET,EN14,ELEM,nd,NODE,14*GET,EN15,ELEM,nd,NODE,15 *GET,EN16,ELEM,nd,NODE,16*GET,EN17,ELEM,nd,NODE,17 *GET,EN18,ELEM,nd,NODE,18 *GET,EN19,ELEM,nd,NODE,19 *GET,EN20,ELEM,nd,NODE,20 ENN1=EN1ENN2=EN2ENN3=EN3ENN4=EN5ENN5=EN6ENN6=EN7x1=Nx(EN1) y1=Ny(EN1) Z1=Nz(EN1)x2=Nx(EN2) y2=Ny(EN2) Z2=Nz(EN2)ENN7=NumberofNode+(I-1)*5+1ENN8=EN10ENN9=EN12x5=Nx(EN5) y5=Ny(EN5) Z5=Nz(EN5)x6=Nx(EN6) y6=Ny(EN6) Z6=Nz(EN6)ENN10=NumberofNode+(I-1)*5+2ENN11=EN14ENN12=EN16ENN13=NumberofNode+(I-1)*5+3ENN14=NumberofNode+(I-1)*5+4ENN15=NumberofNode+(I-1)*5+5x3=Nx(EN3) y3=Ny(EN3) Z3=Nz(EN3)x7=Nx(EN7) y7=Ny(EN7) Z7=Nz(EN7)*VWRITE,Chrval(ENN7),',',(X1+X2)/2,',',(y1+y2)/2,',',(z1+z2)/2(A8,3(A1,F10.5)*VWRITE,Chrval(ENN10),',',(X5+X6)/2,',',(y5+y6)/2,',',(z5+z6)/2(A8,3(A1,F10.5)*VWRITE,Chrval(ENN13),',',(X5+X1)/2,',',(y5+y1)/2,',',(z5+z1)/2(A8,3(A1,F10.5)*VWRITE,Chrval(ENN14),',',(X6+X2)/2,',',(y6+y2)/2,',',(z6+z2)/2(A8,3(A1,F10.5)*VWRITE,Chrval(ENN15),',',(X3+X7)/2,',',(y3+y7)/2,',',(z3+z7)/2(A8,3(A1,F10.5)nd =ELnext(nd) *END IF*ENDDO!输出实体单元*VWRITE('*ELEMENT,TYPE=C3D8,ELSET=Esolid1')Allsel,all        运行以上命令后会在ANSYS的工作目录下得到名为ansystoabaqus.inp的文件,里面包含了模型的节点和单元信息。接下来就是编写ABAQUS的inp文件了。格式如下*Heading* Job name: imput  Model name: * Generated by: Abaqus/CAE 6.9-1*Preprint, echo=NO, model=NO, history=NO, contact=NO* PARTS*Part, name=*End Part*  * ASSEMBLY*Assembly, name=Assembly*  *Instance, name=, part=*Node!ansystoabaqus.inp中的节点文件!*Element,type=!ansystoabaqus.inp中的单元文件!         最后在ABAQUS中点主菜单FILEIMPORTMODEL,选择要导入的INP文件,在窗口顶部环境栏的MODEL下拉列表中,就会出现与此INP文件同名的模型。ANSYS模型转到ABAQUS模型APDL!ANSYS命令流!将ANSYS模型文件转到ABAQUS模型文件!选中所有单元Allsel,all! 输出节点*GET,NNode,NODE,COUNT, , , ,   ! 得到当前模型中的总节点数*CFOPEN,Toabaqus,inp*VWRITE('*HEADING')*VWRITE('Fracture Mechanical Analysis of metal crack with FRP')*VWRITE('*NODE,SYSTEM=R')*DO,I,1,NNode*VWRITE,Chrval(i),',',NX(I),',',NY(I),',',NZ(I)(A8,A1,F10.5,A1,F10.5,A1,F10.5)*ENDDOAllsel,all*GET,NumberofNode,NODE,COUNT, , , ,ESEL,S,ENAME,95 *GET,NElem,ELEM,COUNT, , , ,   ! 得到当前模型中的总单元数!对单元集进行循环*GET,nd,ELEM,NUM,MIN, , , ,   ! 得到当前模型中的最小单元号*DO,I,1,NElem!得到当前单元的类型*GET,ENAME,ELEM,nd,ATTR,ENAM !如果是95号(95号单元)*IF,ENAME,EQ,95,THEN!得到该单元的节点编号*GET,EN1,ELEM,nd,NODE,1 *GET,EN2,ELEM,nd,NODE,2 *GET,EN3,ELEM,nd,NODE,3 *GET,EN4,ELEM,nd,NODE,4 *GET,EN5,ELEM,nd,NODE,5 *GET,EN6,ELEM,nd,NODE,6 *GET,EN7,ELEM,nd,NODE,7 *GET,EN8,ELEM,nd,NODE,8 *GET,EN9,ELEM,nd,NODE,9 *GET,EN10,ELEM,nd,NODE,10*GET,EN11,ELEM,nd,NODE,11 *GET,EN12,ELEM,nd,NODE,12 *GET,EN13,ELEM,nd,NODE,13 *GET,EN14,ELEM,nd,NODE,14*GET,EN15,ELEM,nd,NODE,15 *GET,EN16,ELEM,nd,NODE,16*GET,EN17,ELEM,nd,NODE,17 *GET,EN18,ELEM,nd,NODE,18 *GET,EN19,ELEM,nd,NODE,19 *GET,EN20,ELEM,nd,NODE,20 ENN1=EN1ENN2=EN2ENN3=EN3ENN4=EN5ENN5=EN6ENN6=EN7x1=Nx(EN1) y1=Ny(EN1) Z1=Nz(EN1)x2=Nx(EN2) y2=Ny(EN2) Z2=Nz(EN2)ENN7=NumberofNode+(I-1)*5+1ENN8=EN10ENN9=EN12x5=Nx(EN5) y5=Ny(EN5) Z5=Nz(EN5)x6=Nx(EN6) y6=Ny(EN6) Z6=Nz(EN6)ENN10=NumberofNode+(I-1)*5+2ENN11=EN14ENN12=EN16ENN13=NumberofNode+(I-1)*5+3ENN14=NumberofNode+(I-1)*5+4ENN15=NumberofNode+(I-1)*5+5x3=Nx(EN3) y3=Ny(EN3) Z3=Nz(EN3)x7=Nx(EN7) y7=Ny(EN7) Z7=Nz(EN7)*VWRITE,Chrval(ENN7),',',(X1+X2)/2,',',(y1+y2)/2,',',(z1+z2)/2(A8,3(A1,F10.5)*VWRITE,Chrval(ENN10),',',(X5+X6)/2,',',(y5+y6)/2,',',(z5+z6)/2(A8,3(A1,F10.5)*VWRITE,Chrval(ENN13),',',(X5+X1)/2,',',(y5+y1)/2,',',(z5+z1)/2(A8,3(A1,F10.5)*VWRITE,Chrval(ENN14),',',(X6+X2)/2,',',(y6+y2)/2,',',(z6+z2)/2(A8,3(A1,F10.5)*VWRITE,Chrval(ENN15),',',(X3+X7)/2,',',(y3+y7)/2,',',(z3+z7)/2(A8,3(A1,F10.5)nd =ELnext(nd) *END IF*ENDDO!输出实体单元*VWRITE('*ELEMENT,TYPE=C3D8,ELSET=Esolid1')Allsel,allESEL,S,ENAME,45 *GET,NElem,ELEM,COUNT, , , ,   ! 得到当前模型中的总单元数!对单元集进行循环*GET,nd,ELEM,NUM,MIN, , , ,*DO,I,1,NElem!得到当前单元的类型*GET,ENAME,ELEM,nd,ATTR,ENAM !如果是45号(45号单元)*IF,ENAME,EQ,45,THEN!得到该单元的节点编号*GET,EN1,ELEM,nd,NODE,1 *GET,EN2,ELEM,nd,NODE,2 *GET,EN3,ELEM,nd,NODE,3 *GET,EN4,ELEM,nd,NODE,4 *GET,EN5,ELEM,nd,NODE,5 *GET,EN6,ELEM,nd,NODE,6 *GET,EN7,ELEM,nd,NODE,7 *GET,EN8,ELEM,nd,NODE,8 *VWRITE,Chrval(nd),',',Chrval(EN1),',',Chrval(EN2),',',Chrval(EN3),',',Chrval(EN4),',',Chrval(EN5),',',Chrval(EN6),',',Chrval(EN7),',',Chrval(EN8)(A8,8(A1,A8)nd = ELnext(nd) *END IF*ENDDO*VWRITE('*ELEMENT,TYPE=C3D15 ,ELSET=Esolid2')Allsel,all*GET,NumberofNode,NODE,COUNT, , , ,ESEL,S,ENAME,95 *GET,NElem,ELEM,COUNT, , , ,   ! 得到当前模型中的总单元数!对单元集进行循环*GET,nd,ELEM,NUM,MIN, , , ,*DO,I,1,NElem!得到当前单元的类型*GET,ENAME,ELEM,nd,ATTR,ENAM !如果是95号(95号单元)*IF,ENAME,EQ,95,THEN!得到该单元的节点编号*GET,EN1,ELEM,nd,NODE,1 *GET,EN2,ELEM,nd,NODE,2 *GET,EN3,ELEM,nd,NODE,3 *GET,EN4,ELEM,nd,NODE,4 *GET,EN5,ELEM,nd,NODE,5 *GET,EN6,ELEM,nd,NODE,6 *GET,EN7,ELEM,nd,NODE,7 *GET,EN8,ELEM,nd,NODE,8 *GET,EN9,ELEM,nd,NODE,9 *GET,EN10,ELEM,nd,NODE,10*GET,EN11,ELEM,nd,NODE,11 *GET,EN12,ELEM,nd,NODE,12 *GET,EN13,ELEM,nd,NODE,13 *GET,EN14,ELEM,nd,NODE,14*GET,EN15,ELEM,nd,NODE,15 *GET,EN16,ELEM,nd,NODE,16*GET,EN17,ELEM,nd,NODE,17 *GET,EN18,ELEM,nd,NODE,18 *GET,EN19,ELEM,nd,NODE,19 *GET,EN20,ELEM,nd,NODE,20 ENN1=EN1ENN2=EN2ENN3=EN3ENN4=EN5ENN5=EN6ENN6=EN7x1=Nx(EN1) y1=Ny(EN1) Z1=Nz(EN1)x2=Nx(EN2) y2=Ny(EN2) Z2=Nz(EN2)ENN7=NumberofNode+(I-1)*5+1ENN8=EN10ENN9=EN12x5=Nx(EN5) y5=Ny(EN5) Z5=Nz(EN5)x6=Nx(EN6) y6=Ny(EN6) Z6=Nz(EN6)ENN10=NumberofNode+(I-1)*5+2ENN11=EN14ENN12=EN16ENN13=NumberofNode+(I-1)*5+3ENN14=NumberofNode+(I-1)*5+4ENN15=NumberofNode+(I-1)*5+5x3=Nx(EN3) y3=Ny(EN3) Z3=Nz(EN3)x7=Nx(EN7) y7=Ny(EN7) Z7=Nz(EN7)*VWRITE,Chrval(nd),',',Chrval(ENN1),',',Chrval(ENN2),',',Chrval(ENN3),',',Chrval(ENN4),',',Chrval(ENN5),',',Chrval(ENN6),',',Chrval(ENN7),','(A8,A1,7(A8,A1)*VWRITE,Chrval(ENN8),',',Chrval(ENN9),',',Chrval(ENN10),',',Chrval(ENN11),',',Chrval(ENN12),',',Chrval(ENN13),',',Chrval(ENN14),',',Chrval(ENN15)(7(A8,A1),A8)nd = ELnext(nd) *END IF*ENDDOAllsel,all*VWRITE('*SOLID SECTION,MATERIAL=Steel,ELSET=Esolid1')*VWRITE('1.,') *VWRITE('*SOLID SECTION,MATERIAL=Steel,ELSET=Esolid2')*VWRITE('1.,') *VWRITE('*MATERIAL,NAME=Steel')*VWRITE('*ELASTIC')*VWRITE,Esteel,',',Vsteel(E9.1,A1,F5.1)!输出单元壳单元*VWRITE('*ELEMENT,TYPE=S4,ELSET=EShell')Allsel,allESEL,S,ENAME,63*GET,NElem,ELEM,COUNT, , , ,   ! 得到当前模型中的总单元数!对单元集进行循环*GET,nd,ELEM,NUM,MIN, , , ,*DO,I,1,NElem!得到当前单元的类型*GET,ENAME,ELEM,nd,ATTR,ENAM !如果是63号(63号单元)*IF,ENAME,EQ,63,THEN!得到该单元的节点编号*GET,EN1,ELEM,nd,NODE,1 *GET,EN2,ELEM,nd,NODE,2 *GET,EN3,ELEM,nd,NODE,3 *GET,EN4,ELEM,nd,NODE,4 *VWRITE,Chrval(nd),',',Chrval(EN1),',',Chrval(EN2),',',Chrval(EN3),',',Chrval(EN4)(A8,4(A1,A8)nd = ELnext(nd) *END IF*ENDDOAllsel,all*VWRITE('*Shell SECTION,MATERIAL=FRP,ELSET=EShell')*VWRITE,Chrval(tpatch),',','5'(A8,A1,A1)*VWRITE('*Material, name=FRP')*VWRITE('*Elastic')*VWRITE,Epatch,',',Vpatch(E9.1,A1,F5.1)!输出弹簧单元ESEL,S,TYPE,5*GET,NElem,ELEM,COUNT, , , ,   ! 得到当前模型中的总单元数!对单元集进行循环*GET,nd,ELEM,NUM,MIN, , , ,*DO,I,1,NElem!得到当前单元的类型*GET,ENAME,ELEM,nd,ATTR,ENAM !如果是14号(14号单元)*IF,ENAME,EQ,14,THEN!得到该单元的节点编号*GET,EN1,ELEM,nd,NODE,1 *GET,EN2,ELEM,nd,NODE,2   *VWRITE,'*ELEMENT',',','TYPE=','Spring2',',','ELSET=ES',CHRVAL(i)(A8,A1,A5,A7,A1,A8,A4)*VWRITE,Chrval(ND),',',Chrval(EN1),',',Chrval(EN2)(A8,A1,A8,A1,A8)*VWRITE,'*Spring',',','Elset=ES',CHRVAL(i)(A7,A1,A8,A4)*VWRITE,CHRVAL(1),',',CHRVAL(1)(A1,A1,A1)*GET,NumofReal,ELEM,Nd,ATTR,REAL  *GET,Kxx,RCON,NumofReal,CONST,1,  *VWRITE,Kxx(F15.8)nd =ELnext(nd) *END IF*ENDDONN=NelemAllsel,allESEL,S,TYPE,6*GET,NElem,ELEM,COUNT, , , ,   ! 得到当前模型中的总单元数!对单元集进行循环*GET,nd,ELEM,NUM,MIN, , , ,*DO,I,1,NElem!得到当前单元的类型*GET,ENAME,ELEM,nd,ATTR,ENAM !如果是14号(14号单元)*IF,ENAME,EQ,14,THEN!得到该单元的节点编号*GET,EN1,ELEM,nd,NODE,1 *GET,EN2,ELEM,nd,NODE,2   *VWRITE,'*ELEMENT',',','TYPE=','Spring2',',','ELSET=ES',CHRVAL(NN+i)(A8,A1,A5,A7,A1,A8,A4)*VWRITE,Chrval(ND),',',Chrval(EN1),',',Chrval(EN2)(A8,A1,A8,A1,A8)*VWRITE,'*Spring',',','Elset=ES',CHRVAL(NN+i)(A7,A1,A8,A4)*VWRITE,CHRVAL(2),',',CHRVAL(2)(A1,A1,A1)*GET,NumofReal,ELEM,Nd,ATTR,REAL  *GET,Kyy,RCON,NumofReal,CONST,1,  *VWRITE,Kyy(F15.8)nd =ELnext(nd) *END IF*ENDDONN=Nelem+NNAllsel,allESEL,S,TYPE,7*GET,NElem,ELEM,COUNT, , , ,   ! 得到当前模型中的总单元数!对单元集进行循环*GET,nd,ELEM,NUM,MIN, , , ,*DO,I,1,NElem!得到当前单元的类型*GET,ENAME,ELEM,nd,ATTR,ENAM !如果是14号(14号单元)*IF,ENAME,EQ,14,THEN!得到该单元的节点编号*GET,EN1,ELEM,nd,NODE,1 *GET,EN2,ELEM,nd,NODE,2   *VWRITE,'*ELEMENT',',','TYPE=','Spring2',',','ELSET=ES',CHRVAL(NN+i)(A8,A1,A5,A7,A1,A8,A4)*VWRITE,Chrval(ND),',',Chrval(EN1),',',Chrval(EN2)(A8,A1,A8,A1,A8)*VWRITE,'*Spring',',','Elset=ES',CHRVAL(NN+i)(A7,A1,A8,A4)*VWRITE,CHRVAL(3),',',CHRVAL(3)(A1,A1,A1)*GET,NumofReal,ELEM,Nd,ATTR,REAL  *GET,Kzz,RCON,NumofReal,CONST,1,  *VWRITE,Kzz(F15.8)nd =ELnext(nd) *END IF*ENDDOAllsel,all!约束方程!Nsel,s,Loc,z,tglue+tpatch/2*Get,nnod3,NODE,0,COUNT *Dim,nodes3,array,nnod3*Dim,xy3,array,nnod3,2 *Get,nd,NODE,0,NUM,MIN *Do,I,1,nnod3,1 nodes3(I)= nd xy3(I,1) = Nx(nd) xy3(I,2) = Ny(nd) nd = Ndnext(nd) *Enddo allsel,allNSEL,S,LOC,Z,tglue*Get,nnod4,NODE,0,COUNT *Dim,nodes4,array,nnod4*Dim,xy4,array,nnod4,2 *Get,nd,NODE,0,NUM,MIN *Do,I,1,nnod4,1 nodes4(I)= nd xy4(I,1) = Nx(nd) xy4(I,2) = Ny(nd) nd = Ndnext(nd) *Enddo allsel,all*Do,I,1,nnod3,1*Do,J,1,nnod4,1*If,xy3(I,1),NE,xy4(J,1),Cycle*If,xy3(I,2),NE,xy4(J,2),Cycle*VWRITE('*EQUATION')*VWRITE('3')*VWRITE,CHRVAL(Nodes4(J),',',CHRVAL(1),',',1.0,',',CHRVAL(Nodes3(I),',',CHRVAL(4),',',tpatch/2,',',CHRVAL(Nodes3(I),',',CHRVAL(1),',',-1.0(A8,A1,A1,A1,F3.1,A1,A8,A1,A1,A1,F8.5,A1,A8,A1,A1,A1,F8.5)*VWRITE('*EQUATION')*VWRITE('3')*VWRITE,CHRVAL(Nodes4(J),',',CHRVAL(2),',',1.0,',',CHRVAL(Nodes3(I),',',CHRVAL(5),',',tpatch/2,',',CHRVAL(Nodes3(I),',',CHRVAL(2),',',-1.0(A8,A1,A1,A1,F3.1,A1,A8,A1,A1,A1,F8.5,A1,A8,A1,A1,A1,F8.5)*VWRITE('*EQUATION')*VWRITE('2')*VWRITE,CHRVAL(Nodes4(J),',',CHRVAL(3),',',1.0,',',CHRVAL(Nodes3(I),',',CHRVAL(3),',',-1.0(A8,A1,A1,A1,F3.1,A1,A8,A1,A1,A1,F8.5)!CE,3*(I-1)+1,0,Nodes4(J),UX,1,Nodes3(I),ROTX,tpatch/2,Nodes3(I),Ux,-1,!CE,3*(I-1)+2,0,Nodes4(J),UY,1,Nodes3(I),ROTY,tpatch/2,Nodes3(I),UY,-1,!CE,3*(I-1)+3,0,Nodes4(J),UZ,1,Nodes3(I),Uz,-1,*Enddo*Enddo!约束方程! 边界条件!-

    注意事项

    本文(ANSYS模型导入ABAQUS.doc)为本站会员(豆****)主动上传,淘文阁 - 分享文档赚钱的网站仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知淘文阁 - 分享文档赚钱的网站(点击联系客服),我们立即给予删除!

    温馨提示:如果因为网速或其他原因下载失败请重新下载,重复下载不扣分。




    关于淘文阁 - 版权申诉 - 用户使用规则 - 积分规则 - 联系我们

    本站为文档C TO C交易模式,本站只提供存储空间、用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。本站仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知淘文阁网,我们立即给予删除!客服QQ:136780468 微信:18945177775 电话:18904686070

    工信部备案号:黑ICP备15003705号 © 2020-2023 www.taowenge.com 淘文阁 

    收起
    展开