mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
39 lines
977 B
Plaintext
39 lines
977 B
Plaintext
puts "========"
|
|
puts "OCC25124"
|
|
puts "========"
|
|
puts ""
|
|
######################################################
|
|
# Removal of continuity checks for offset geometries
|
|
######################################################
|
|
|
|
smallview
|
|
|
|
point pp 0 0 1
|
|
circle cc 20 40 30 20
|
|
convert bc cc
|
|
trim bc bc 1 6
|
|
offsetcurve oc bc 10 pp
|
|
trim bc oc 2 5
|
|
extsurf se bc 0 0 1
|
|
offset os se 15
|
|
|
|
set bug_info [getsurfcontinuity se]
|
|
getsurfcontinuity os
|
|
|
|
if {[string compare $bug_info "se has G1 continuity.\n"] != 0} {
|
|
puts "ERROR: OCC25124 is reproduced (se does not have G1 continuity)."
|
|
}
|
|
|
|
set bug_info_1 [dump se]
|
|
set bug_info_1 [string range $bug_info_1 39 [expr {[string length $bug_info_1] -1}]]
|
|
set bug_info_2 [dump os]
|
|
set bug_info_2 [string range $bug_info_2 39 [expr {[string length $bug_info_2] -1}]]
|
|
if {[string compare $bug_info_1 $bug_info_2] == 0} {
|
|
puts "ERROR: OCC25124 is reproduced (se = os)."
|
|
}
|
|
|
|
donly os se
|
|
fit
|
|
|
|
checkview -screenshot -2d -path ${imagedir}/${test_image}.png
|