[occt.git] / tests / bugs / modalg_7 / bug28830

puts "========"
puts "OCC28830"
puts "========"
puts ""
########################################
# HalfSpace command chooses the wrong side of the given shell
########################################

# Restore the initial shape
restore [locate_data_file bug28830_halfspace.brep] sh

point p 9.30222203002736 0.87421058209264 1.54257060749683
halfspace h sh 9.30222203002736 0.87421058209264 1.54257060749683

if {![regexp "IN" [bclassify h p]]} {
  puts "Error: halfspace is wrong"
} else {
  puts "OK: halfspace is good"
}
Commit	Line	Data
e57aedeb	1	puts "========"
	2	puts "OCC28830"
	3	puts "========"
	4	puts ""
	5	########################################
	6	# HalfSpace command chooses the wrong side of the given shell
	7	########################################
	8
	9	# Restore the initial shape
	10	restore [locate_data_file bug28830_halfspace.brep] sh
	11
	12	point p 9.30222203002736 0.87421058209264 1.54257060749683
	13	halfspace h sh 9.30222203002736 0.87421058209264 1.54257060749683
	14
	15	if {![regexp "IN" [bclassify h p]]} {
	16	puts "Error: halfspace is wrong"
	17	} else {
	18	puts "OK: halfspace is good"
	19	}