0025715: Intersection between cylinders produces excess vertices
[occt.git] / tests / bugs / modalg_5 / bug22831
1 puts "============"
2 puts "OCC22831"
3 puts "============"
4 puts ""
5 ######################################################
6 # Regression in boolean Cut - wrong result ( 6.5.2).
7 ######################################################
8
9 pload XDE
10
11 restore [locate_data_file bug22831_shape.brep] sh
12 restore [locate_data_file bug22831_face.brep] f
13
14 checkshape sh
15 checkshape f
16
17 prism pr f -0.0023732630088625609, 0.49562550631034025, 0.86853308809584784
18 decho off
19 checkshape pr
20 ## KO; Faulty shapes in variables faulty_1 to faulty_24
21 decho on
22
23 fixshape prf pr 1.e-4
24 checkshape prf
25
26 bopcheck prf
27 bcut result sh prf
28
29 set square 0.233021
30 set 2dviewer 0