板厚度的控制
大家好:一个平面的变厚度可以实现,如何实现一个曲面的边厚度?下面是一个平面厚度的控制方法:
FINISH
/CLEAR
/FILNAM,SHELL-THICK
/PREP7
ET,1,SHELL63
RECT,,10,,10
ESHAPE,2
ESIZE,,20
AMESH,1
EPLOT
MXNODE=NDINQR(0,14)
*DIM,THICK,,MXNODE
*DO,NODE,1,MXNODE
*IF,NDINQR(NODE,1),EQ,1,THEN
THICK(NODE)=0.5+0.2*NX(NODE)
*ELSE
THICK(NODE)=0
*ENDIF
*ENDDO
NODE=
MXNODE=
RTHICK,THICK(1),1,2,3,4
/ESHAPE,1
/USER,1
/DIST,1,7
/VIEW,1,-0.75,-0.28,0.6
/ANG,1,-1
/FOC,1,5.3,5.3,0.27
EPLOT
请问:如何在平面的基础上,把一个圆柱面进行变厚度控制?请指教!
[ 本帖最后由 xuruikl 于 2008-9-15 19:45 编辑 ]
页:
[1]