1puts "==========" 2puts "OCC26197" 3puts "==========" 4puts "" 5############################################################ 6# Incomplete intersection curve 7############################################################ 8 9restore [locate_data_file bug26197_profile_1093.brep] b1 10restore [locate_data_file bug26197_endcut1_1093.brep] b2 11 12explode b1 f 13copy b1_107 f1 14 15explode b2 f 16copy b2_2 f2 17 18bsection result f1 f2 19 20explode result e 21mk2dcurve c2d2 result_1 f2 22 23bounds c2d2 u1 u2 24puts [dval u1] 25puts [dval u2] 26 272dcvalue c2d2 u1 x y1 282dcvalue c2d2 u2 x y2 29 30set y1_ [dval y1] 31set y2_ [dval y2] 32 33set tol_abs 1.e-7 34set tol_rel 1.e-7 35 36#V-last of the surface of f2 face 37set expected_y 1.1883793591414735 38 39checkreal "extension the section line to the surface boundary?" ${y2_} ${expected_y} ${tol_abs} ${tol_rel} 40 41smallview 42donly result f1 f2 43fit 44checkview -screenshot -2d -path ${imagedir}/${test_image}.png 45