# HG changeset patch
# User unc0rr
# Date 1395174854 -14400
# Node ID adeab6c21fe5e8f67ade5496b960f952e9714441
# Parent  f7c8cb11a70ec3405e7c7e148e7012bb8163f8ab
Greedy approach: divide while it divides

diff -r f7c8cb11a70e -r adeab6c21fe5 hedgewars/uLandGenTemplateBased.pas
--- a/hedgewars/uLandGenTemplateBased.pas	Wed Mar 19 00:28:52 2014 +0400
+++ b/hedgewars/uLandGenTemplateBased.pas	Wed Mar 19 00:34:14 2014 +0400
@@ -276,8 +276,12 @@
 procedure Distort2(var Template: TEdgeTemplate; var pa: TPixAr);
 var i: Longword;
 begin
-    for i:= 1 to Template.BezierizeCount do
-        DivideEdges(pa);
+    //for i:= 1 to Template.BezierizeCount do
+    //    DivideEdges(pa);
+    repeat
+        i:= pa.Count;
+        DivideEdges(pa)
+    until i = pa.Count;
 
     {for i:= 1 to Template.BezierizeCount do
         begin