0023247: [CEA 1771] Problem in computing dimensions of objects in GEOM module

This commit is contained in:
skv 2016-03-22 17:02:05 +03:00
parent fb146b65ce
commit cfa4be5d95

View File

@ -984,19 +984,20 @@ void GEOMImpl_IMeasureOperations::GetBasicProperties (Handle(GEOM_Object) theSha
//Compute the parameters
GProp_GProps LProps, SProps;
Standard_Real anEps = 1.e-6;
try {
OCC_CATCH_SIGNALS;
BRepGProp::LinearProperties(aShape, LProps);
theLength = LProps.Mass();
BRepGProp::SurfaceProperties(aShape, SProps);
BRepGProp::SurfaceProperties(aShape, SProps, anEps);
theSurfArea = SProps.Mass();
theVolume = 0.0;
if (aShape.ShapeType() < TopAbs_SHELL) {
for (TopExp_Explorer Exp (aShape, TopAbs_SOLID); Exp.More(); Exp.Next()) {
GProp_GProps VProps;
BRepGProp::VolumeProperties(Exp.Current(), VProps);
BRepGProp::VolumeProperties(Exp.Current(), VProps, anEps);
theVolume += VProps.Mass();
}
}