Regression of 0020206: EDF SMESH 987: Netgen1D2D3D +submesh

Regression of 0020206: EDF SMESH 987: Netgen1D2D3D +submesh
   in Compute(), fix sorting submeshes according to dim of shape the algo assigned to

           aShapeDim = GetShapeDim( algoShape );
+          if ( algoShape.ShapeType() == TopAbs_COMPOUND )
+          {
+            TopoDS_Iterator it( algoShape );
+            aShapeDim += GetShapeDim( it.Value() );
+          }