myMin = Standard_True;
//
Standard_Boolean bFound, bIsHole, bFlag;
- Standard_Integer i, j, aNbVTS, aNbVTS1;
+ Standard_Integer i, j, aNbVTS, aNbVTS1, iCntSh, iCntShInt;
TopoDS_Solid aZ;
TopoDS_Iterator aIt, aItF;
TopoDS_Builder aBB;
// 2.
// - Too many growths,
// - There is smt of the solid that is out of solid
+ iCntSh=0;
+ iCntShInt=0;
aIt.Initialize(myShape);
for (; aIt.More(); aIt.Next()) {
const TopoDS_Shape& aSx=aIt.Value();
}
}
if (bFound) {
+ ++iCntShInt;
continue;
}
//
+ ++iCntSh;
+ //
// Skip not closed shells
if (!BRep_Tool::IsClosed(aSh)) {
continue;
aVTS.Append(aTS);
}//for (; aIt.More(); aIt.Next()) {
//
+ if (!iCntSh && iCntShInt) {
+ // all shells in the solid are internal
+ BRepCheck::Add(myMap(myShape),
+ BRepCheck_BadOrientationOfSubshape);
+ }
+ //
aNbVTS=aVTS.Size();
if (aNbVTS<2) {
return;
puts "TODO #22911 ALL: Error : The area of the resulting shape is"
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
restore [locate_data_file CTO908_topo101-o1.brep] obj1
restore [locate_data_file CTO908_topo101-t1.brep] tool1
puts "TODO #22911 ALL: Error : The area of the resulting shape is"
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
restore [locate_data_file CTO908_topo101-o2.brep] obj2
restore [locate_data_file CTO908_topo101-t2.brep] tool2
puts "TODO #22911 ALL: Error : The area of the resulting shape is"
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
restore [locate_data_file CTO908_topo102-o.brep] obj
restore [locate_data_file CTO908_topo102-t.brep] tool
puts "TODO #22911 ALL: Error : The area of the resulting shape is"
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
restore [locate_data_file CTO908_topo103-o.brep] obj
restore [locate_data_file CTO908_topo103-t.brep] tool
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
+
restore [locate_data_file CTO908_topo104-o1.brep] wheel
restore [locate_data_file CTO908_topo104-o2.brep] jante
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
+
restore [locate_data_file CTO908_topo106-p.brep] poche
restore [locate_data_file CTO908_topo106-n.brep] nervure
puts "TODO #22911 ALL: Error : The area of the resulting shape is"
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
restore [locate_data_file a102] a
restore [locate_data_file b136] b
puts "TODO ?OCC24925 ALL: Error : The area of the resulting shape is"
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
restore [locate_data_file a102] a
restore [locate_data_file b136] b
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
+
puts "========="
puts " OCC497 "
puts "(case 3)"
puts "TODO ?OCC12345 ALL: Error : The square of result shape is"
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
+
puts "================"
puts "OCC62"
puts "BUC61001"
puts "TODO OCC12345 ALL: Error : The square of result shape is"
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
+
puts "============"
puts "OCC697"
puts "============"
puts "TODO OCC12345 ALL: Error : The square of result shape is"
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
+
puts "============"
puts "OCC697"
puts "============"
puts "TODO OCC12345 ALL: Error : The square of result shape is"
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
+
puts "============"
puts "OCC697"
puts "============"
puts "TODO OCC12345 ALL: Error : The square of result shape is"
+puts "TODO OCC25735 ALL: Faulty shapes in variables faulty_1 to"
+
puts "============"
puts "OCC697"
puts "============"
--- /dev/null
+puts "=========="
+puts "OCC25735"
+puts "=========="
+puts ""
+######################################################
+# Wrong solid is considered as valid by checkshape
+######################################################
+
+restore [locate_data_file bug25735_r5] result
+
+decho off
+set info [checkshape result]
+decho on
+
+if { [regexp "Faulty shapes in variables faulty_1" ${info}] != 1 } {
+ puts "Error : There are no mistakes by checkshape-command"
+} else {
+ puts "OK : There are mistakes by checkshape-command"
+}
+
+set 2dviewer 1