Parameteric modeling of complex geometry

Beijing Institute of Technology | Ming-Jian Li

The following APDL code is a companion code for the course on Artificial Intelligence and Simulation Science. Its function is to perform geometric modeling, meshing, and deformation solution for a diamond ring. The following code needs to be executed in ANSYS, APDL is the parameteric language of ANSYS.

1
fini
2
/clear
3
/FILNAME,diamond,1 
4
/PREP7  
5
ET,1,solid285
6
!mp
7
mp,ex,1,1e12
8
mp,prxy,1,0.2
9
mp,ex,2,1.6e11 
10
mp,prxy,2,0.3
11
!size
12
r=0.01
13
h1=0.005
14
h2=0.01
15
n=16
16
rring=0.015
17
wdring=r
18
!points
19
csys,1
20
*do,i,1,n,1
21
  k,i,r,i*360/n,0
22
*enddo
23
csys,0
24
k,n+1,0,0,h1
25
k,n+2,0,0,-h2
26
!areas
27
*do,i,1,n-1,1
28
  a,i,i+1,n+1
29
  a,i,i+1,n+2
30
*enddo
31
a,1,n,n+1
32
a,1,n,n+2
33
!volu
34
asel,all
35
va,all
36
!=cutTop
37
block,-r,r,-r,r,h1,h1*0.5
38
vsbv,1,2
39
numcmp,all
40
!cutCylinder
41
wpoffs,0,0,-rring-h2*0.5
42
wprota,0,0,90
43
cylind,rring,0,-wdring/2,wdring/2,0,360
44
vsbv,1,2,,,keep
45
numcmp,all
46
cylind,rring*0.85,0,-wdring/2,wdring/2,0,360
47
vsbv,all,3
48
numcmp,all
49
wprota,0,0,-90
50
wpoffs,0,0,rring+h2*0.5
51
!glue
52
vglue,all
53
numcmp,all
54
!mesh
55
TYPE,1  
56
MAT,1
57
MSHKEY,0
58
vmesh,1
59
alls
60
TYPE,1 
61
MAT,2
62
MSHKEY,0
63
vmesh,2
64
alls
65
!solve
66
/sol
67
!BC
68
!fixed
69
nsel,s,loc,z,h1*0.5
70
d,all,ux,0
71
d,all,uy,0
72
d,all,uz,0
73
alls
74
!force
75
local,11,1,0,0,-rring-h2*0.5,0,0,90
76
csys,11
77
nsel,s,loc,x,rring*0.85
78
nsel,r,loc,y,-20,20
79
csys,0
80
sf,all,pres,998
81
alls
82
/sol
83
solve

The mesh is as follows.