mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
In GCPnts_TangetialDeflection curve divided in C_N intervals on which sample points (still 3) is computed. Test cases for issue CR24959
30 lines
972 B
Plaintext
30 lines
972 B
Plaintext
puts "========"
|
|
puts "OCC24959"
|
|
puts "========"
|
|
puts ""
|
|
####################################################
|
|
## GCPnts_TangentialDeflection does not implement functionality by its meaning in case of BSpline with local splash
|
|
####################################################
|
|
|
|
bsplinesurf s 2 12 0.0 3 0.1 1 0.2 1 0.3 1 0.4 1 0.5 1 0.525 1 0.55 1 0.575 1 0.8 1 0.9 1 1.0 3 1 2 0.0 2 1.0 2 16 0 0 1 14 0 0 1 12 0 0 1 10 0 0 1 8 0 0 1 6 0 0 1 4 0 0 1 2 0 0 1 0 0 0 1 -2 0 0 1 -4 0 0 1 -6 0 0 1 -8 0 0 1 16 5 0 1 14 5 0 1 12 5 0 1 10 5 0 1 8 5 0 1 6 5 0 1 4 5 0 1 1.5 9 0 1 0 5 0 1 -2 5 0 1 -4 5 0 1 -6 5 0 1 -8 5 0 1
|
|
|
|
mkface result s
|
|
incmesh result 1
|
|
set tri_info [trinfo result]
|
|
|
|
set tri 0
|
|
set nod 0
|
|
regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri
|
|
regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod
|
|
if { ${tri} < 76 || ${nod} < 50 } {
|
|
puts "Error: Bad meshing"
|
|
} else {
|
|
puts "OK: Good meshing"
|
|
}
|
|
|
|
vdisplay result
|
|
vsetdispmode 1
|
|
vtop
|
|
vfit
|
|
set only_screen 1
|