diff --git a/util/opt/patterns b/util/opt/patterns
index 23d47c9e4..81d4c5b68 100644
--- a/util/opt/patterns
+++ b/util/opt/patterns
@@ -746,3 +746,6 @@ adp LLP sti LLP loi adp $1+$6==0 && $2==$4 && $3==p && $5==p :
 	dup p adp $1 LLP $2 sti p
 adp LEP sti LEP loi adp $1+$6==0 && $2==$4 && $3==p && $5==p :
 	dup p adp $1 LEP $2 sti p
+/* The next to patterns added on request of Kees Visser */
+lol asp $2>=w:	asp $2-w
+ldl asp $2>=2*w:	asp $2-2*w