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

puts "TODO OCC25458 ALL: Error : 1-fold tori is bad"

puts "============"
puts "OCC25458"
puts "============"
puts ""
###########################################################################
## can a sweep be used to create 1-fold tori (using a closed wire as path)
###########################################################################

restore [locate_data_file bug25458_sweep-torus1-draw-Wire.brep] Wire

explode Wire E
wire Sweep-0-spine Wire_1

mksweep Sweep-0-spine
setsweep -FR

circle Circle-curve 0 0 0 10
mkedge Circle-edge Circle-curve 0 0
wire Circle Circle-edge
trotate Circle 0 0 0 1 0 0 90
ttranslate Circle 40.1121575545 0 36.5930306315

addsweep Circle
buildsweep Sweep -C -S

set info [bopcheck Sweep]

if { [regexp "This shape seems to be OK" ${info}] != 1 } {
    puts "Error : 1-fold tori is bad"
}

checkview -display Sweep -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
dfdfa61f	1	puts "TODO OCC25458 ALL: Error : 1-fold tori is bad"
	2
	3	puts "============"
	4	puts "OCC25458"
	5	puts "============"
	6	puts ""
	7	###########################################################################
	8	## can a sweep be used to create 1-fold tori (using a closed wire as path)
	9	###########################################################################
	10
	11	restore [locate_data_file bug25458_sweep-torus1-draw-Wire.brep] Wire
	12
	13	explode Wire E
	14	wire Sweep-0-spine Wire_1
	15
	16	mksweep Sweep-0-spine
	17	setsweep -FR
	18
	19	circle Circle-curve 0 0 0 10
	20	mkedge Circle-edge Circle-curve 0 0
	21	wire Circle Circle-edge
	22	trotate Circle 0 0 0 1 0 0 90
	23	ttranslate Circle 40.1121575545 0 36.5930306315
	24
	25	addsweep Circle
	26	buildsweep Sweep -C -S
	27
	28	set info [bopcheck Sweep]
	29
	30	if { [regexp "This shape seems to be OK" ${info}] != 1 } {
	31	puts "Error : 1-fold tori is bad"
	32	}
	33
	34	checkview -display Sweep -3d -path ${imagedir}/${test_image}.png