[occt.git] / tests / bugs / modalg_2 / bug22588

puts "============"
puts "OCC22588"
puts "============"
puts ""
#######################################################################
# Revolution with negative volume in some cases
#######################################################################

set BugNumber OCC22588

vertex v1 0 0 0
vertex v12 0 0 160
vertex v13 25 0 25
edge e7 v1 v12
edge e8 v12 v13
edge e9 v13 v1
wire w2 e7 e8 e9
plane pln1 25 0 25 0 1 0 -25 0 -25
mkface face2 pln1 w2
revol result face2 0 0 0 0 0 1 45

set square 5694.99

set nb_v_good 3
set nb_e_good 8
set nb_w_good 4
set nb_f_good 4
set nb_sh_good 1
set nb_sol_good 1
set nb_compsol_good 0
set nb_compound_good 0
set nb_shape_good 21

vinit
vdisplay result
vfit

set only_screen 0
Commit	Line	Data
3bea4c16	1	puts "============"
	2	puts "OCC22588"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# Revolution with negative volume in some cases
	7	#######################################################################
	8
	9	set BugNumber OCC22588
	10
	11	vertex v1 0 0 0
	12	vertex v12 0 0 160
	13	vertex v13 25 0 25
	14	edge e7 v1 v12
	15	edge e8 v12 v13
	16	edge e9 v13 v1
	17	wire w2 e7 e8 e9
	18	plane pln1 25 0 25 0 1 0 -25 0 -25
	19	mkface face2 pln1 w2
	20	revol result face2 0 0 0 0 0 1 45
	21
	22	set square 5694.99
	23
	24	set nb_v_good 3
	25	set nb_e_good 8
	26	set nb_w_good 4
	27	set nb_f_good 4
	28	set nb_sh_good 1
	29	set nb_sol_good 1
	30	set nb_compsol_good 0
	31	set nb_compound_good 0
	32	set nb_shape_good 21
	33
	34	vinit
	35	vdisplay result
	36	vfit
	37
	38	set only_screen 0
	39