[occt.git] / tests / bugs / modalg_5 / bug23952_1

puts "================"
puts "OCC23952"
puts "================"
puts ""
###########################################################################################
# Improving thread-safety of intersections, approximations and other modeling algorithms
###########################################################################################

pload QAcommands
restore [locate_data_file bug23952_trim-torus.draw] a

set NbUPoles 18
set info [OCC23952sweep $NbUPoles a]

if { [regexp "theTargetNbUPoles: OK" $info] != 1 } {
    puts "Error : Number of UPoles is incorrect"
} else {
    puts "OK: Number of UPoles is correct"
}
Commit	Line	Data
85c44a05	1	puts "================"
	2	puts "OCC23952"
	3	puts "================"
	4	puts ""
	5	###########################################################################################
	6	# Improving thread-safety of intersections, approximations and other modeling algorithms
	7	###########################################################################################
	8
	9	pload QAcommands
	10	restore [locate_data_file bug23952_trim-torus.draw] a
	11
	12	set NbUPoles 18
	13	set info [OCC23952sweep $NbUPoles a]
	14
	15	if { [regexp "theTargetNbUPoles: OK" $info] != 1 } {
	16	puts "Error : Number of UPoles is incorrect"
	17	} else {
	18	puts "OK: Number of UPoles is correct"
	19	}