+ if ( inode == 0 ) {
+ nodeRefX = fabs(node->X());
+ nodeRefY = fabs(node->Y());
+ nodeRefZ = fabs(node->Z());
+ }
+ SCRUTE( inode );
+ SCRUTE( nodeRefX );
+ SCRUTE( nodeRefY );
+ SCRUTE( nodeRefZ );
+
+ if ( inode !=0 ) {
+ if ( (fabs(fabs(node->X()) - nodeRefX) > epsilon ) && dimX )
+ dimX = false;
+ if ( (fabs(fabs(node->Y()) - nodeRefY) > epsilon ) && dimY )
+ dimY = false;
+ if ( (fabs(fabs(node->Z()) - nodeRefZ) > epsilon ) && dimZ )
+ dimZ = false;
+ }
+ if ( !dimX && !dimY && !dimZ ) {
+ mdim = 3;