0027341: Incorrect exact HLR results
[occt.git] / tests / bugs / modalg_6 / bug27263
1 puts "================"
2 puts "OCC27263"
3 puts "================"
4 puts ""
5 #######################################################################
6 # Regression vs 6.9.1: Exception is raised during intersection of two faces
7 #######################################################################
8
9 set MaxTol 1.e-7
10 set GoodNbCurv 1
11
12 restore [locate_data_file  bug27262_cmpd.brep] b
13 explode b
14
15 smallview
16 explode b_1 f
17 don b_1_27 b_2
18 fit
19
20 set log [bopcurves b_1_27 b_2 -2d]
21
22 regexp {Tolerance Reached=+([-0-9.+ee]+)\n+([-0-9.+ee]+)} ${log} full Toler NbCurv
23
24 if {${Toler} > ${MaxTol}} {
25   puts "Error: Tolerance is too big!"
26 }
27
28 if {${NbCurv} != ${GoodNbCurv}} {
29   puts "Error: Curve Number is bad!"
30 }
31
32 checklength c_1 -l 2.9620641619623407
33
34 checkview -screenshot -2d -path ${imagedir}/${test_image}.png