git.ucc.asn.au
/
ipdf
/
sam.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Minor fixes to Lit Review
[ipdf/sam.git]
/
figures
/
koch.ps
diff --git
a/figures/koch.ps
b/figures/koch.ps
index
45f88b2
..
3a0b733
100644
(file)
--- a/
figures/koch.ps
+++ b/
figures/koch.ps
@@
-36,7
+36,7
@@
%xB debug
}
{
%xB debug
}
{
- x1 y1
mov
eto x2 y2 lineto
+ x1 y1
lin
eto x2 y2 lineto
} ifelse
end
} ifelse
end
@@
-47,6
+47,13
@@
% End prolog
% 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
% 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
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
showpage
UCC
git Repository :: git.ucc.asn.au