tests/lowalgos/intss/bug23981

   1 puts "========="
   2 puts "CR23981"
   3 puts "========="
   4 puts ""
   5 ###############################
   6 ## Wrong section curves
   7 ###############################
   8
   9 restore [locate_data_file bug23981_s1.draw] s1
  10 restore [locate_data_file bug23981_s2.draw] s2
  11
  12 intersect i s1 s2
  13
  14 puts "First test"
  15 xdistcs i_1 s1 0 1 100 1e-7
  16
  17 puts "Second test"
  18 xdistcs i_2 s1 0 1 100 1e-7
  19
  20 smallview
  21 fit
  22 checkview -screenshot -2d -path ${imagedir}/${test_image}.png