/prep7 !Call the Preprocessor
et,matid,181 !Specify the element type, shell 181
keyopt,matid,3,2 !Use full integration
mpdel,all,matid !Delete all previously assigned material properties
tbdel,all,matid !Delete all previouly assigned tabular data
MP,EX,1,33E9 !Define Young's Modulus: X Direction
MP,EY,1,33E9 !Define Young's Moduls: Y Direction
MP,EZ,1,33E9 !Define Young's Modulus: Z Direction
MP,PRXY,1,0.3 !Define Major Poisson's ratio XY
MP,PRYZ,1,0.3 !Define Major Poisson's ratio YZ
MP,PRXZ,1,0.3 !Define Majoy Poisson's ration XZ
*DIM,vth,TABLE,6,5,1, !Dimension The Table for the Thickness Function
! Begin of equation: .030-{X}*.00048485
!30mm at root and 10mm at tip
vth(0,0,1)= 0.0, -999
vth(2,0,1)= 0.0
vth(3,0,1)= 0.0
vth(4,0,1)= 0.0
vth(5,0,1)= 0.0
vth(6,0,1)= 0.0
vth(0,1,1)= 1.0, -1, 0, .00048485, 0, 0, 2
vth(0,2,1)= 0.0, -2, 0, 1, 2, 3, -1
vth(0,3,1)= 0, -1, 0, .030, 0, 0, -2
vth(0,4,1)= 0.0, -3, 0, 1, -1, 2, -2
vth(0,5,1)= 0.0, 99, 0, 1, -3, 0, 0
! End of equation: .030-\{X}*.00048485
!-->
sect,1,shell !Specify the section type
secfunction,%vth% !Apply the Varying Thickness Function
|