diff --git a/IV/test.sql b/IV/test.sql
index 1c3dbcd..0e7cb20 100644
--- a/IV/test.sql
+++ b/IV/test.sql
@@ -163,7 +163,7 @@ begin
   perform assert_equals(fig8gen3, st_astext(eliminations[3]));
 end $$ language plpgsql;
 
--- testing wm_exaggerate_bend in isolation
+-- testing wm_exaggerate_bend2 in isolation
 do $$
 declare
   fig3b2 geometry;
@@ -172,7 +172,7 @@ declare
 begin
   select way from wm_debug where name='fig3' and stage='bbends' and gen=1 and nbend=2 into fig3b2;
   size = wm_adjsize(fig3b2);
-  bend = wm_exaggerate_bend(fig3b2, size, 50.);
+  bend = wm_exaggerate_bend2(fig3b2, size, 50.);
   perform assert_equals('ST_LineString', st_geometrytype(bend));
   insert into wm_debug(stage, name, gen, nbend, way) values('manual', 'fig3', 1, 1, bend);
 end $$ language plpgsql;
diff --git a/IV/visuals.sql b/IV/visuals.sql
index 7e81d68..9818d0b 100644
--- a/IV/visuals.sql
+++ b/IV/visuals.sql
@@ -123,7 +123,8 @@ begin
       ('salvis-visvalingam-' || i, geom2),
       ('salvis-visvalingam-' || i || '-chaikin', st_chaikinsmoothing(geom2, 5));
   end loop;
-  foreach i in array array[75, 375] loop
+  --foreach i in array array[75, 375] loop
+  foreach i in array array[75] loop
     geom3 = st_simplifywm((select way from wm_visuals where name='salvis'), i, 50, 'salvis-' || i);
     insert into wm_visuals(name, way) values
       ('salvis-wm-'          || i, geom3);