0030760: Modeling Algorithms - Intersection fails in Occt 7.3.0
[occt.git] / tests / bugs / modalg_7 / bug28830
CommitLineData
e57aedeb 1puts "========"
2puts "OCC28830"
3puts "========"
4puts ""
5########################################
6# HalfSpace command chooses the wrong side of the given shell
7########################################
8
9# Restore the initial shape
10restore [locate_data_file bug28830_halfspace.brep] sh
11
12point p 9.30222203002736 0.87421058209264 1.54257060749683
13halfspace h sh 9.30222203002736 0.87421058209264 1.54257060749683
14
15if {![regexp "IN" [bclassify h p]]} {
16 puts "Error: halfspace is wrong"
17} else {
18 puts "OK: halfspace is good"
19}