1 puts "TODO DEBUG_OCC24121 Debian60-64 Windows: OCC22733: Faulty"
7 ###########################################################
8 # Empty result for the extrema between a circle and a line
9 ###########################################################
11 set BugNumber OCC22733
13 restore [locate_data_file bug22733_ez4.brep] ez4
14 restore [locate_data_file bug22733_ez17.brep] ez17
19 set extrema_res [extrema c4 c17]
20 set extrema_length [llength ${extrema_res} ]
22 if {${extrema_length} != 1 } {
23 puts "${BugNumber}: Faulty"
25 puts "${BugNumber}: OK"