puts "TODO OCC12345 ALL: Faulty OCC966 : Tolerance of shape is more than 0.000176" puts "=========" puts " OCC966 " puts "=========" puts "" ############################################### ##file cylinders.brep. It is increasing tolerance from 0.000176 to 51.1 ############################################### restore [locate_data_file OCC966.brep] a DT_ShapeConvertRev result a 0 1 set tolerance [maxtolerance result] regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance if { $MaxFaceTolerance > 0.000176 || $MaxEdgeTolerance > 0.000176 || $MaxVertexTolerance > 0.000176 } { puts "Faulty OCC966 : Tolerance of shape is more than 0.000176" } set 2dviewer 0