Adding test cases from chl grid
[occt.git] / tests / bugs / moddata / bug23139
1 puts "================"
2 puts "OCC23139"
3 puts "================"
4 puts ""
5 ########################################################################################################
6 # BRepFilletAPI_MakeFillet algorithm builds edges with wrong first and last parameters: out of pcurve
7 ########################################################################################################
8
9 set BugNumber OCC23139
10
11 ### rename to bug23139_aShape_for_fillet.brep
12 restore [locate_data_file bug23139_aShape_for_fillet.brep] b 
13 explode b e
14 donly b b_6
15 blend result b 20 b_6
16 explode result f
17 #av2d
18 set exception_status [ catch { pcurve result_1 } ]
19
20 if { ${exception_status} == 0 } {
21    puts "OK ${BugNumber}"
22 } else {
23    puts "Faulty ${BugNumber}"
24 }
25
26 set 2dviewer 0
27 set length 5558.88