1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
# test script on make volume operation
# cylinder plane
# planar face
plane pln_f1 0 -1010 -1.1102230246251565e-014 0 1 1.1102230246251565e-016
erase pln_f1
mkface f1 pln_f1 -1000000 1000000 -1000000 1000000
# planar face
plane pln_f2 265.67943276 -825 1616.2687468249999 -2.2204460492503131e-016 -1.1102230246251565e-016 1
erase pln_f2
mkface f2 pln_f2 -1000000 1000000 -1000000 1000000
# planar face
plane pln_f3 -793.75341161103267 -824.99999999999977 1557.8287844128686 -0.45399049973954719 1.1102230246251564e-016 0.89100652418836768
erase pln_f3
mkface f3 pln_f3 -1000000 1000000 -1000000 1000000
# planar face
plane pln_f4 793.75341161103267 -824.99999999999977 1557.8287844128686 0.45399049973954719 1.1102230246251564e-016 0.89100652418836768
erase pln_f4
mkface f4 pln_f4 -1000000 1000000 -1000000 1000000
# cylindrical face
cylinder cyl_f5 0 0 7.2275518903097691e-014 0 1 1.1102230246251565e-016 1750
erase cyl_f5
mkface f5 cyl_f5 0 6.2831853071795862 -1000000 1000000
# planar face
plane pln_f6 704.20625497119897 -825 1547.2842888890546 -0.89100652418836812 -2.2204460492503136e-016 0.45399049973954653
erase pln_f6
mkface f6 pln_f6 -1000000 1000000 -1000000 1000000
# planar face
plane pln_f7 -704.20625497119897 -825 1547.2842888890546 0.89100652418836812 -2.2204460492503136e-016 0.45399049973954653
erase pln_f7
mkface f7 pln_f7 -1000000 1000000 -1000000 1000000
# planar face
plane pln_f8 0 -1030 -2.2759572004815709e-014 0 1 1.1102230246251565e-016
erase pln_f8
mkface f8 pln_f8 -1000000 1000000 -1000000 1000000
# planar face
plane pln_f9 771.03174431000002 -825 1434.59193091 -2.2204460492503131e-016 -1.1102230246251565e-016 1
erase pln_f9
mkface f9 pln_f9 -1000000 1000000 -1000000 1000000
# cylindrical face
cylinder cyl_f10 0 0 -1.0788592241794959e-013 0 -1 1.1102230246251565e-016 1720
erase cyl_f10
mkface f10 cyl_f10 0 6.2831853071795862 -1000000 1000000
# make volume operation
mkvolume result f1 f2 f3 f4 f5 f6 f7 f8 f9 f10
set square 2.26035e+007
|
