mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-07-30 13:05:50 +03:00
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
46 lines
1.2 KiB
Plaintext
Executable File
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
|