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

puts "========"
puts "OCC28189"
puts "========"
puts ""
#################################################
# Result of Boolean operation is non-manifold wire
#################################################

vertex v1 0 0 0
vertex v2 1 0 0
vertex v3 1 1 0
vertex v4 0 1 0
edge e1 v1 v2
edge e2 v3 v2
edge e3 v3 v4
edge e4 v1 v4

compound e1 e2 e3 e4 edges
edgestowire result edges

if {![regexp "WIRE" [whatis result]]} {
  puts "Error: Wire is not created"
}

explode result

if {![regexp "FORWARD" [whatis result_1]]} {
  puts "Error: Incorrect orientation of edges in wire"
}

if {![regexp "REVERSED" [whatis result_2]]} {
  puts "Error: Incorrect orientation of edges in wire"
}

if {![regexp "FORWARD" [whatis result_3]]} {
  puts "Error: Incorrect orientation of edges in wire"
}

if {![regexp "REVERSED" [whatis result_4]]} {
  puts "Error: Incorrect orientation of edges in wire"
}
Commit	Line	Data
77a11d3d	1	puts "========"
	2	puts "OCC28189"
	3	puts "========"
	4	puts ""
	5	#################################################
	6	# Result of Boolean operation is non-manifold wire
	7	#################################################
	8
	9	vertex v1 0 0 0
	10	vertex v2 1 0 0
	11	vertex v3 1 1 0
	12	vertex v4 0 1 0
	13	edge e1 v1 v2
	14	edge e2 v3 v2
	15	edge e3 v3 v4
	16	edge e4 v1 v4
	17
	18	compound e1 e2 e3 e4 edges
	19	edgestowire result edges
	20
	21	if {![regexp "WIRE" [whatis result]]} {
	22	puts "Error: Wire is not created"
	23	}
	24
	25	explode result
	26
	27	if {![regexp "FORWARD" [whatis result_1]]} {
	28	puts "Error: Incorrect orientation of edges in wire"
	29	}
	30
	31	if {![regexp "REVERSED" [whatis result_2]]} {
	32	puts "Error: Incorrect orientation of edges in wire"
	33	}
	34
	35	if {![regexp "FORWARD" [whatis result_3]]} {
	36	puts "Error: Incorrect orientation of edges in wire"
	37	}
	38
	39	if {![regexp "REVERSED" [whatis result_4]]} {
	40	puts "Error: Incorrect orientation of edges in wire"
	41	}