puts "============" puts "OCC22864" puts "============" puts "" ############################################################################################## # The algorithm BiTgte_Blend obtains instable results ############################################################################################## set BugNumber OCC22864 restore [locate_data_file bug22864_face1.brep] f1 restore [locate_data_file bug22864_face2.brep] f2 shape aShape C add f1 aShape add f2 aShape set status 0 set Numbers 11 for {set i 0} {$i < ${Numbers}} {incr i} { puts "i=$i" rollingball result aShape 15 @ f1 f2 checknbshapes result -vertex 2 -edge 3 -wire 1 -face 1 -shell 0 -solid 0 -compsolid 0 -compound 1 -shape 8 set aFile $imagedir/${test_image}.brep puts "aFile=${aFile}" file delete ${aFile} if { [file exists ${aFile}] } { puts "There is old ${aFile} file; Error" set status 1 } save result ${aFile} catch {exec chmod 777 ${aFile}} if { ![file exists ${aFile}] } { puts "There is not ${aFile} file; save command: Error" set status 1 } set fp [open ${aFile} "r"] set Log [read -nonewline ${fp}] close ${fp} # if {$i == 0} { set Standard_Log ${Log} } else { set info_result [string compare ${Log} ${Standard_Log}] if {${info_result} == 0} { # Log == Standard_Log puts "Log == Standard_Log" } else { # Log != Standard_Log set status 1 puts "Log != Standard_Log" } } } # Resume puts "" if {${status} == 0} { puts "OK ${BugNumber}" } else { puts "Faulty ${BugNumber}" } checkprops result -s 8464.91 checkshape result checkview -display result -2d -path ${imagedir}/${test_image}.png