puts "================"
puts "OCC23282"
puts "================"
puts ""
#######################################################################################
# Wrong triangulation on cone
######################################################################################

set BugNumber OCC23282

pcone result 10 0 10 90

checkshape result

set square 289.612

set nb_v_good 4
set nb_e_good 7
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
vsetdispmode 1
vfit
vzfit

# relative tolerance (%)
set rel_tol 1
set area_eps 0

set only_screen 1
