[occt.git] / tests / bugs / modalg_6 / bug25937_2

puts "============"
puts "OCC25937"
puts "============"
puts ""
###############################
## Failed Cut Edge or Face by HalfSpace.
###############################

# Cut a face by halfspace
plane h 0 0 0 1 0 0
mkface h h
halfspace h h 10 0 0
plane a 0 0 0 0 0 1
mkface a a -10 10 -10 10

bop a h
bopcut result

set length 60.
set square 200.

set nbshapes_expected "
Number of shapes in shape
 VERTEX    : 4
 EDGE      : 4
 WIRE      : 1
 FACE      : 1
 SHELL     : 1
 SOLID     : 0
 COMPSOLID : 0
 COMPOUND  : 1
 SHAPE     : 12
"
checknbshapes result -ref ${nbshapes_expected} -t -m "Result obtained by Cut a wire by halfspace"

set 3dviewer 1
Commit	Line	Data
f47b8d2b	1	puts "============"
	2	puts "OCC25937"
	3	puts "============"
	4	puts ""
	5	###############################
	6	## Failed Cut Edge or Face by HalfSpace.
	7	###############################
	8
	9	# Cut a face by halfspace
	10	plane h 0 0 0 1 0 0
	11	mkface h h
	12	halfspace h h 10 0 0
	13	plane a 0 0 0 0 0 1
	14	mkface a a -10 10 -10 10
	15
	16	bop a h
	17	bopcut result
	18
	19	set length 60.
	20	set square 200.
	21
	22	set nbshapes_expected "
	23	Number of shapes in shape
	24	VERTEX : 4
	25	EDGE : 4
	26	WIRE : 1
	27	FACE : 1
	28	SHELL : 1
	29	SOLID : 0
	30	COMPSOLID : 0
	31	COMPOUND : 1
	32	SHAPE : 12
	33	"
	34	checknbshapes result -ref ${nbshapes_expected} -t -m "Result obtained by Cut a wire by halfspace"
	35
	36	set 3dviewer 1