1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-07-30 13:05:50 +03:00
occt/tests/bugs/mesh/bug25519
oan 13cd069dbc 0025519: BRepMesh can break mesh regularity for BSpline surfaces
Compute parameters to produce regular grid and add new internal points according to calculated values.
Use intervals as an additional parameters to determine regular grid for BSpline surfaces.

Test case for issue CR25519

Correction of test case for issue CR25519

Correction of test cases for issue CR25519
2014-12-11 16:20:31 +03:00

46 lines
1.2 KiB
Plaintext
Executable File

puts "================"
puts "CR25519"
puts "================"
puts ""
###############################################
## BRepMesh can break mesh regularity for BSpline surfaces
###############################################
restore [locate_data_file bug25519_testtriangulation.brep] a
tclean a
incmesh a 0.01
front
fit
isos a 0
triangles a
set trinfo_s [trinfo a]
regexp {([0-9]+) triangles} ${trinfo_s} str nbtri_s
regexp {([0-9]+) nodes} ${trinfo_s} str nbnod_s
regexp {deflection ([0-9.+e-]+)} ${trinfo_s} str defl_s
set good_nbtri 2721
set good_nbnod 1405
set good_defl 0.082010129769776202
set good_percent 5
set nbtri_percent [expr abs (${good_nbtri} - ${nbtri_s}) / double (${nbtri_s}) * 100 ]
set nbnod_percent [expr abs (${good_nbnod} - ${nbnod_s}) / double (${nbnod_s}) * 100 ]
set defl_percent [expr abs (${good_defl} - ${defl_s}) / ${defl_s} * 100 ]
if { ${nbtri_percent} > ${good_percent} } {
puts "Error: triangle number is bad, it has changed to ${nbtri_percent} %"
}
if { ${nbnod_percent} > ${good_percent} } {
puts "Error: node number is bad, it has changed to ${nbnod_percent} %"
}
if { ${defl_percent} > ${good_percent} } {
puts "Error: deflection is bad, it has changed to ${defl_percent} %"
}
set only_screen_axo 1