1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-08 18:40:55 +03:00
ski a8676008f7 Adding of testing cases from subgroups 937 940 and 941 of CHL group
Splitting of subgroups bugs/modalg and bugs/moddata to optimise time of testing
Correction of end file in group v3d
Small correction of test case
2013-02-08 15:16:15 +04:00

26 lines
541 B
Plaintext
Executable File

puts "==========="
puts "BUC60707"
puts "==========="
puts ""
#################################################
## Fillets created in CasCade version 3 do not display as shaded surfaces.
#################################################
restore [locate_data_file buc60707a.brep] result
checkshape result
tclean result
incmesh result .1
triangles result
set info [trinfo result]
regexp { +([-0-9.+eE]+) +triangles} $info full Maxtriangl
if { $Maxtriangl < 1 } {
puts "Error : inside mesh for shading wasn't build"
}
set 3dviewer 0