diff --git a/src/Roassal-Shapes/RSBoundingShape.class.st b/src/Roassal-Shapes/RSBoundingShape.class.st
index 5baf779a..f9fb03fc 100644
--- a/src/Roassal-Shapes/RSBoundingShape.class.st
+++ b/src/Roassal-Shapes/RSBoundingShape.class.st
@@ -149,6 +149,20 @@ RSBoundingShape >> defaultExtent [
 	^ 10@10
 ]
 
+{ #category : 'accessing' }
+RSBoundingShape >> encompassingRectangle [
+	"This is to replace the #explicitRequirement and be faster."
+
+	^ super encompassingRectangle
+]
+
+{ #category : 'accessing' }
+RSBoundingShape >> extent [
+	"This is to replace the #explicitRequirement and be faster."
+
+	^ super extent
+]
+
 { #category : 'accessing' }
 RSBoundingShape >> extent: aPoint [
 	| oldExtent extent delta |
@@ -220,6 +234,13 @@ RSBoundingShape >> hasLines [
 	^ connectedLines isNotNil
 ]
 
+{ #category : 'accessing' }
+RSBoundingShape >> height [
+	"This is to replace the #explicitRequirement and be faster."
+
+	^ super height
+]
+
 { #category : 'accessing' }
 RSBoundingShape >> height: aNumber [
 	self extent: self extent x @ aNumber
@@ -661,6 +682,13 @@ RSBoundingShape >> updateLinesON [
 	shouldUpdateLines := true
 ]
 
+{ #category : 'accessing' }
+RSBoundingShape >> width [
+	"This is to replace the #explicitRequirement and be faster."
+
+	^ super width
+]
+
 { #category : 'accessing' }
 RSBoundingShape >> width: aNumber [
 	self extent: aNumber @ self extent y