v0.16.0
Loading...
Searching...
No Matches
insert_constraint_prisms_spanner_hex_screw.jou
Go to the documentation of this file.
1reset
2
3set duplicate block elements on
4
5# Stylised open-end spanner body
6create brick x 20 y 14 z 5
7create brick x 15 y 5 z 6
8move volume 2 x 8
9subtract volume 2 from volume 1
10compress ids
11
12# Small hex screw in the jaw gap
13create brick x 9.5 y 4.5 z 5
14move volume 2 x 5.5
15compress ids
16
17# Material blocks
18block 1 volume 1
19block 1 name "MAT_ELASTIC_SPANNER"
20
21block 2 volume 2
22block 2 name "MAT_ELASTIC_SCREW"
23
24block 12 add surface 2
25block 12 name "FIX_ALL"
26
27block 13 add surface 11 12
28block 13 name "Screw_faces"
29
30block 10 surface 4 5 6
31block 10 name "TIE_SLAVE_jaw_gap"
32
33block 11 surface 13 14 15 16 17 18
34block 11 name "TIE_MASTER_jaw_gap"
35
36# Local refinement on the contact faces
37surface in block 10 11 size 2.0
38volume all size 4.0
39volume all scheme tetmesh
40mesh volume all
41
42block 1 attribute count 2
43block 1 attribute index 2 0
44block 2 attribute count 2
45block 2 attribute index 2 0
46
47
48# block 13 name "ROTATE_ALL"
49# block 13 attribute count 6
50# block 13 attribute index 1 0
51# block 13 attribute index 2 0
52# block 13 attribute index 3 0.1
53# block 13 attribute index 4 0.6
54# block 13 attribute index 5 0
55# block 13 attribute index 6 0
56
57block 14 add surface 16
58block 14 name "PRESSURE"
59block 14 attribute count 1
60block 14 attribute index 1 -0.1
61
62
63save as "/Users/karollewandowski/mofem_install/mofem-cephas/mofem/tools/meshes/insert_constraint_prisms_spanner_hex_screw_press.cub" overwrite
64
65
66
67# save as "/Users/karollewandowski/mofem_install/mofem-cephas/mofem/tools/meshes/insert_constraint_prisms_spanner_hex_screw.cub" overwrite
68
69#block 10 remove surface all
70#block 11 remove surface all
71#block 11 surface 4 5 6
72#block 10 surface 13 14 15 16 17 18
73#
74#save as "/Users/karollewandowski/mofem_install/mofem-cephas/mofem/tools/meshes/insert_constraint_prisms_spanner_hex_screw_swap.cub" overwrite
75