ANSYS/DYNA,ANSYS/DYNA,在线英语词典,英文翻译,专业英语

1) ANSYS/DYNA

ANSYS/DYNA

The paper describes the characters of deformability of material and the rules of variability of force by making a simulation and analysis among the different diameter of rolls for producing the big diameter square tube with ANSYS/DYNA.

针对滚模冷拔大口径方形管成形工艺,采用有限元仿真软件ANSYS/DYNA对不同滚模直径进行仿真和比较分析,揭示滚模直径对拔制大口径方管力参数和变形的影响,为优选滚模直径参数提供了参考。

补充资料：ANSYS工字梁焊缝初应力例子

建立好模型
…..
/SOLU
!*
ANTYPE,0
/INPUT,'input','txt',
/INPUT,'output1','txt',
!*
ISFILE,READ,1,txt, ,0
SOLVE
=====================
!定义残余应力矩阵
I=1
fy=310e6
!定义单元中心坐标数组，初应力数组
*DIM,EleCenter,ARRAY,NumNode,3,1, , ,
*DIM,EleIS,ARRAY,NumNode,1,1, , ,
*DO,I, 1, NumNode,1
!得到单元中心坐标
*GET,EleCenter(I,1,1),ELEM,I,CENT,X
*GET,EleCenter(I,2,1),ELEM,I,CENT,Y
*GET,EleCenter(I,3,1),ELEM,I,CENT,Z
!焊缝位置在X=1.0 到1.05 之间
*IF,EleCenter(I,1,1),GT,1,THEN
*IF,EleCenter(I,1,1),LT,1.05,THEN
*IF,EleCenter(I,2,1),GT,0.5,THEN
!上翼缘初始应力
EleIS(I,1,1)=-20*fy*EleCenter(I,3,1)**2+0.3*fy
*endif
*IF,EleCenter(I,2,1),LT,0.0,THEN
!下翼缘初始应力
EleIS(I,1,1)=-20*fy*EleCenter(I,3,1)**2+0.3*fy
*endif
!腹板初始应力
*if,EleCenter(I,2,1),GE,0.0,THEN
*IF,ELECENTER(I,2,1),LE,0.5,THEN
EleIS(I,1,1)=4.076*fy*(EleCenter(I,2,1)-0.5)**2
EleIS(I,1,1)=EleIS(I,1,1)-0.719*fy
*IF,EleIS(I,1,1),LT,-0.3*fy,THEN
ELeIS(I,1,1)=-0.3*fy
*ENDIF

*ENDIF
*ENDIF
*ENDIF
*ENDIF
*ENDDO
===============
!输出应力数值
*CFOPEN,'1','txt',' '
*DO,I,1,3840
!*IF,EleIS(I,1,1),ne,0.,then
*VWRITE,'!'
(A)
*VWRITE,'! Stress for element',
(A,F)
*VWRITE,'!'
(A)
*VWRITE,'eis,',I
(A,F)
P=EleIS(I,1,1)
*VWRITE,P,0.,0.,0.,0.,0.
(E,E,E,E,E,E)
!*ENDIF
*ENDDO
*CFCLOS

说明：补充资料仅用于学习参考，请勿用于其它任何用途。

首页 \| 翻译 \| 影视 \| 论坛 \| 索引

1) ANSYS/DYNA ANSYS/DYNA 1. The paper describes the characters of deformability of material and the rules of variability of force by making a simulation and analysis among the different diameter of rolls for producing the big diameter square tube with ANSYS/DYNA. 针对滚模冷拔大口径方形管成形工艺,采用有限元仿真软件ANSYS/DYNA对不同滚模直径进行仿真和比较分析,揭示滚模直径对拔制大口径方管力参数和变形的影响,为优选滚模直径参数提供了参考。补充资料：ANSYS工字梁焊缝初应力例子建立好模型 ….. /SOLU !* ANTYPE,0 /INPUT,'input','txt', /INPUT,'output1','txt', !* ISFILE,READ,1,txt, ,0 SOLVE ===================== !定义残余应力矩阵 I=1 fy=310e6 !定义单元中心坐标数组，初应力数组 DIM,EleCenter,ARRAY,NumNode,3,1, , , DIM,EleIS,ARRAY,NumNode,1,1, , , DO,I, 1, NumNode,1 !得到单元中心坐标 GET,EleCenter(I,1,1),ELEM,I,CENT,X GET,EleCenter(I,2,1),ELEM,I,CENT,Y GET,EleCenter(I,3,1),ELEM,I,CENT,Z !焊缝位置在X=1.0 到1.05 之间 IF,EleCenter(I,1,1),GT,1,THEN IF,EleCenter(I,1,1),LT,1.05,THEN IF,EleCenter(I,2,1),GT,0.5,THEN !上翼缘初始应力 EleIS(I,1,1)=-20fyEleCenter(I,3,1)2+0.3fy endif IF,EleCenter(I,2,1),LT,0.0,THEN !下翼缘初始应力 EleIS(I,1,1)=-20fyEleCenter(I,3,1)*2+0.3fy endif !腹板初始应力 if,EleCenter(I,2,1),GE,0.0,THEN IF,ELECENTER(I,2,1),LE,0.5,THEN EleIS(I,1,1)=4.076fy(EleCenter(I,2,1)-0.5)2 EleIS(I,1,1)=EleIS(I,1,1)-0.719fy IF,EleIS(I,1,1),LT,-0.3fy,THEN ELeIS(I,1,1)=-0.3fy ENDIF ENDIF ENDIF ENDIF ENDIF ENDDO =============== !输出应力数值 CFOPEN,'1','txt',' ' DO,I,1,3840 !IF,EleIS(I,1,1),ne,0.,then VWRITE,'!' (A) VWRITE,'! Stress for element', (A,F) VWRITE,'!' (A) VWRITE,'eis,',I (A,F) P=EleIS(I,1,1) VWRITE,P,0.,0.,0.,0.,0. (E,E,E,E,E,E) !ENDIF ENDDO CFCLOS 说明：补充资料仅用于学习参考，请勿用于其它任何用途。
©2008 dictall.com