mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
4753a6fc1f
Correct the algorithm to get right Start point for extension of the walking line. Test case for issue CR26197 Correction of test case bugs/modalg_6/bug26197
44 lines
853 B
Plaintext
44 lines
853 B
Plaintext
puts "=========="
|
|
puts "OCC26197"
|
|
puts "=========="
|
|
puts ""
|
|
############################################################
|
|
# Incomplete intersection curve
|
|
############################################################
|
|
|
|
restore [locate_data_file bug26197_profile_1093.brep] b1
|
|
restore [locate_data_file bug26197_endcut1_1093.brep] b2
|
|
|
|
explode b1 f
|
|
copy b1_107 f1
|
|
|
|
explode b2 f
|
|
copy b2_2 f2
|
|
|
|
bsection result f1 f2
|
|
|
|
explode result e
|
|
mk2dcurve c2d2 result_1 f2
|
|
|
|
bounds c2d2 u1 u2
|
|
puts [dval u1]
|
|
puts [dval u2]
|
|
|
|
2dcvalue c2d2 u1 x y1
|
|
2dcvalue c2d2 u2 x y2
|
|
|
|
set y1_ [dval y1]
|
|
set y2_ [dval y2]
|
|
|
|
set tol_abs 1.e-7
|
|
set tol_rel 1.e-7
|
|
|
|
#V-last of the surface of f2 face
|
|
set expected_y 1.1883793591414735
|
|
|
|
checkreal "extension the section line to the surface boundary?" ${y2_} ${expected_y} ${tol_abs} ${tol_rel}
|
|
|
|
smallview
|
|
donly result f1 f2
|
|
fit
|
|
set only_screen_axo 1 |