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

puts "TODO OCC23902 ALL: Error: Cannot build fillet"

puts "========"
puts "OCC23902"
puts "========"
puts ""
#####################
# Cannot build fillet
#####################

bsplinecurve r 4 3 1 5 2 2 3 5 0 8 0 1 2 8 2 1 4 8 3 1 4 8 3 1 4 8 3 1 6 8 4 1 10 8 10 1

mkedge e1 r
vertex v1 10 8 10
vertex v2 5 8 8
edge e2 v1 v2
vertex v3 0 8 0
edge e3 v2 v3
wire w e1 e2 e3
mkplane f w
prism p f 0 5 0
explode p e

if {![catch {fillet result p 0.5 p_3}]} {
  if {[regexp "This shape seems to be valid" [checkshape result] ] != 1} {
      puts "Error: Cannot build fillet (1)"
  }
  if {[regexp "This shape seems to be OK" [bopcheck result] ] != 1} {
      puts "Error: Cannot build fillet (2)"
  }
} else {
  puts "Error: Cannot build fillet (3)"
}
Commit	Line	Data
c2e47bdd	1	puts "TODO OCC23902 ALL: Error: Cannot build fillet"
	2
	3	puts "========"
	4	puts "OCC23902"
	5	puts "========"
	6	puts ""
	7	#####################
	8	# Cannot build fillet
	9	#####################
	10
	11	bsplinecurve r 4 3 1 5 2 2 3 5 0 8 0 1 2 8 2 1 4 8 3 1 4 8 3 1 4 8 3 1 6 8 4 1 10 8 10 1
	12
	13	mkedge e1 r
	14	vertex v1 10 8 10
	15	vertex v2 5 8 8
	16	edge e2 v1 v2
	17	vertex v3 0 8 0
	18	edge e3 v2 v3
	19	wire w e1 e2 e3
	20	mkplane f w
	21	prism p f 0 5 0
	22	explode p e
	23
	24	if {![catch {fillet result p 0.5 p_3}]} {
	25	if {[regexp "This shape seems to be valid" [checkshape result] ] != 1} {
	26	puts "Error: Cannot build fillet (1)"
	27	}
	28	if {[regexp "This shape seems to be OK" [bopcheck result] ] != 1} {
	29	puts "Error: Cannot build fillet (2)"
	30	}
	31	} else {
	32	puts "Error: Cannot build fillet (3)"
	33	}