tests/bugs/xde/bug9531

   1 puts "TODO OCC12345 ALL: Error :  is WRONG because number of "
   2
   3 puts "============"
   4 puts "OCC9531"
   5 puts "============"
   6 puts ""
   7 #######################################################################
   8 # Regression after writing-reading operation
   9 #######################################################################
  10
  11 set BugNumber OCC9531
  12
  13 set IsOk 1
  14 set filepath [locate_data_file 919-001-T02-04-CP-VL.igs]
  15 if {[catch {igesread $filepath OCC9531a *}]} {
  16    puts "Faulty ${BugNumber} : here is reading problem"
  17    set IsOk 0
  18 }
  19
  20 file delete ${imagedir}/OCC9531tmp.igs
  21
  22 if {[catch {brepiges OCC9531a ${imagedir}/OCC9531tmp.igs}]} {
  23    puts "Faulty ${BugNumber} : here is conversation to brep problem"
  24    set IsOk 0
  25 }
  26 catch {exec chmod 777 ${imagedir}/OCC9531tmp.igs}
  27
  28 if {[catch {igesread ${imagedir}/OCC9531tmp.igs OCC9531b *}]} {
  29    puts "Faulty ${BugNumber} : here is 2nd reading problem"
  30    set IsOk 0
  31 }
  32
  33 if { ${IsOk} == 1} {
  34    set aTokList {= }
  35    set Tol1 [lindex [split [tolerance OCC9531a] ${aTokList}] 2]
  36    set Tol2 [lindex [split [tolerance OCC9531b] ${aTokList}] 2]
  37    set percent_max 0.1
  38    set Tolerance_percent [GetPercent ${Tol1} ${Tol2}]
  39    puts "Tolerance_percent = ${Tolerance_percent} %"
  40    if { ${Tolerance_percent}  > ${percent_max} } {
  41       set IsOk 0
  42    }
  43
  44    checknbshapes OCC9531a -vertex 5748 -edge 5680 -wire 915 -face 899 -shell 0 -solid 0 -compsolid 0 -compound 1 -shape 13243
  45    checkprops OCC9531a -s 5236.89
  46    checkprops OCC9531b -s 5236.89
  47    checknbshapes OCC9531b -vertex 5748 -edge 5680 -wire 915 -face 899 -shell 0 -solid 0 -compsolid 0 -compound 1 -shape 13243
  48
  49    if { ${IsOk}  == 0 } {
  50       puts "${BugNumber}: Faulty"
  51    } else {
  52       puts "${BugNumber}: OK"
  53    }
  54 }
  55
  56 renamevar OCC9531b result
  57 checkview -display result -2d -path ${imagedir}/${test_image}.png