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

puts "========="
puts "OCC24618"
puts "========="
puts ""
###########################################################
# Embedding vertex in BOP depends on the order of arguments
###########################################################

# Create a cylindrical face
cylinder c1 20
trimv c1 c1 0 50
mkface c1 c1

# Create a vertex
vertex v1 0 20 25

# Build partition
bclearobjects
bcleartools
#---------------#
baddobjects c1 v1
#---------------#
bfillds
bbuild r

# Explode the result compound
explode r

# Check number of shapes
renamevar r_1 result

checknbshapes result -vertex 1 -edge 0 -wire 0 -face 0 -shell 0 -solid 0 -compsolid 0 -compound 0 -shape 1
checkview -display result -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
362dec17	1	puts "========="
	2	puts "OCC24618"
	3	puts "========="
	4	puts ""
	5	###########################################################
	6	# Embedding vertex in BOP depends on the order of arguments
	7	###########################################################
	8
	9	# Create a cylindrical face
	10	cylinder c1 20
	11	trimv c1 c1 0 50
	12	mkface c1 c1
	13
	14	# Create a vertex
	15	vertex v1 0 20 25
	16
	17	# Build partition
	18	bclearobjects
	19	bcleartools
	20	#---------------#
	21	baddobjects c1 v1
	22	#---------------#
	23	bfillds
	24	bbuild r
	25
	26	# Explode the result compound
	27	explode r
	28
	29	# Check number of shapes
	30	renamevar r_1 result
	31
a4eba920	32	checknbshapes result -vertex 1 -edge 0 -wire 0 -face 0 -shell 0 -solid 0 -compsolid 0 -compound 0 -shape 1
5747059b	33	checkview -display result -2d -path ${imagedir}/${test_image}.png