diff --git a/visuals.sql b/visuals.sql
index 89c6206..75cee3d 100644
--- a/visuals.sql
+++ b/visuals.sql
@@ -139,7 +139,7 @@ begin
   -- Šalčia-Visinčia crossing, and it "exaggerates" to the
   -- other river.
   foreach i in array array[75, 220] loop
-    geom3 = st_simplifywm((select way from wm_visuals where name='salvis-grpk10'), i, 50, 'salvis-wm' || i);
+    geom3 = st_simplifywm((select way from wm_visuals where name='salvis-grpk10'), i, null, 'salvis-wm' || i);
     insert into wm_visuals(name, way) values
       ('salvis-wm'          || i, geom3);
   end loop;
diff --git a/wm.sql b/wm.sql
index 34c2527..064f0e9 100644
--- a/wm.sql
+++ b/wm.sql
@@ -765,7 +765,7 @@ drop function if exists ST_SimplifyWM;
 create function ST_SimplifyWM(
   geom geometry,
   dhalfcircle float,
-  intersect_patience integer default 10,
+  intersect_patience integer default 50,
   dbgname text default null
 ) returns geometry as $$
 declare
@@ -780,7 +780,7 @@ declare
   l_type text;
 begin
   if intersect_patience is null then
-    intersect_patience = 10;
+    intersect_patience = 50;
   end if;
   l_type = st_geometrytype(geom);
   if l_type = 'ST_LineString' then