1 puts "================"
3 puts "================"
4 puts "Bad solid created from face with command 'revol'"
7 restore [locate_data_file OCC1243-1.brep] f1
10 revol result f1 -5000.0 0.0 0.0 10000.0 0.0 0.0 360.0
12 set tolerance [maxtolerance result]
13 regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance
14 regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance
15 regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance
17 set max_tolerance 1.00000e-06
19 if { ${MaxFaceTolerance} > ${max_tolerance} || ${MaxEdgeTolerance} > ${max_tolerance} || ${MaxVertexTolerance} > ${max_tolerance} } {
20 puts "OCC1243 - Error"
25 checkprops result -s 350733
27 checkview -display result -2d -path ${imagedir}/${test_image}.png