tests/bugs/modalg_5/bug25292_36

   1 puts "================"
   2 puts "OCC25292"
   3 puts "================"
   4 puts ""
   5 #######################################################################
   6 # Face/Face intersection algorithm gives different results for different order of the arguments
   7 #######################################################################
   8
   9 # intersect command for trimmed surfaces
  10
  11 restore [locate_data_file bug25292_f1.brep] f1
  12 restore [locate_data_file bug25292_f2.brep] f2
  13
  14 mksurface s1 f1
  15 mksurface s2 f2
  16
  17 # trim s1 in accordance with the UV-bounds of f1:
  18 trimv s1t s1 19.1600000005 19.6600000005
  19
  20 # trim s2 in accordance with the UV-bounds of f2:
  21 trim s2t s2 0. 1.570796326795 -275 275
  22
  23 ###################
  24 intersect k s2t s1t
  25 ###################
  26
  27 if { [info exist k_2] } {
  28   puts "OK: Curve Number is good!"
  29 } else {
  30   puts "Error: Curve Number is bad!"
  31 }