[occt.git] / tests / bugs / modalg / bug60714


puts "========================"
puts "BUC60714"
puts "========================"

profile f x 30 y 20 x -30
explode f w 
vertex v1 0 0 0 
vertex v2 0 -10 -10
edge e v1 v2

wire w e
mksweep f_1
setsweep -FR
addsweep w

########
#does'nt work
buildsweep result -C -S

set square 1979.9
set 2dviewer 0
Commit	Line	Data
0e94a94e	1
	2	puts "========================"
	3	puts "BUC60714"
	4	puts "========================"
	5
	6	profile f x 30 y 20 x -30
	7	explode f w
	8	vertex v1 0 0 0
	9	vertex v2 0 -10 -10
	10	edge e v1 v2
	11
	12	wire w e
	13	mksweep f_1
	14	setsweep -FR
	15	addsweep w
	16
	17	########
	18	#does'nt work
	19	buildsweep result -C -S
	20
	21	set square 1979.9
	22	set 2dviewer 0
	23