X-Git-Url: https://git.ucc.asn.au/?p=ipdf%2Fsam.git;a=blobdiff_plain;f=figures%2Fkoch.ps;h=3a0b733d7ab0a74883b59f67b744a054e89a65c4;hp=45f88b2847aa72fa29a9ac430403d8b482141f84;hb=2426e6848baa0724d89c3b0512c85beb86ce5d1e;hpb=9d87cac8393f739ef02e94aa59e697a978a802ff

diff --git a/figures/koch.ps b/figures/koch.ps
index 45f88b2..3a0b733 100644
--- a/figures/koch.ps
+++ b/figures/koch.ps
@@ -36,7 +36,7 @@
 		%xB debug
 	}
 	{
-		x1 y1 moveto x2 y2 lineto
+		x1 y1 lineto x2 y2 lineto
 		
 	} ifelse
 	end
@@ -47,6 +47,13 @@
 
 % End prolog
 
+/iterations 7 def % Define to the desired number of iterations to crash your pdf viewer
+0 0 1 setrgbcolor
+0 0 moveto
+0 0 50 100 iterations koch 
+50 100 100 0 iterations koch
+100 0 0 0 iterations koch closepath
+stroke 
 
 % Draw some text and the initial triangle faintly
 0.9 0.9 1 setrgbcolor
@@ -55,12 +62,6 @@
 1E-6 setlinewidth
 0 0 moveto 50 100 lineto 100 0 lineto 0 0 lineto stroke
 
-/iterations 7 def % Define to the desired number of iterations to crash your pdf viewer
-0 0 1 setrgbcolor
-0 0 moveto
-0 0 50 100 iterations koch 
-50 100 100 0 iterations koch
-100 0 0 0 iterations koch closepath
-fill 
+
 
 showpage