tests/bugs/modalg_7/bug27471

   1 puts "TODO OCC27471 ALL: ERROR: OCC27471 is reproduced."
   2
   3 puts "========"
   4 puts "OCC27471"
   5 puts "========"
   6 puts ""
   7 ########################
   8 # Wrong result of pipe
   9 ########################
  10
  11 restore [locate_data_file bug27471_s.brep] s
  12 restore [locate_data_file bug27471_p.brep] p
  13
  14 pipe result s p
  15
  16 set bug_info [string trim [bopcheck result]]
  17 if {$bug_info != "This shape seems to be OK."} {
  18   puts "ERROR: OCC27471 is reproduced. Result of pipe creation is WRONG."
  19 }
  20
  21 vinit
  22 vdisplay result
  23 vfit
  24
  25 checkview -screenshot -3d -path ${imagedir}/${test_image}.png