summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/acmart/samples/rosette.eps
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/acmart/samples/rosette.eps')
-rw-r--r--Master/texmf-dist/doc/latex/acmart/samples/rosette.eps76
1 files changed, 0 insertions, 76 deletions
diff --git a/Master/texmf-dist/doc/latex/acmart/samples/rosette.eps b/Master/texmf-dist/doc/latex/acmart/samples/rosette.eps
deleted file mode 100644
index 9d56a1ecd55..00000000000
--- a/Master/texmf-dist/doc/latex/acmart/samples/rosette.eps
+++ /dev/null
@@ -1,76 +0,0 @@
-%!
-%%BoundingBox: 124.38 124.38 487.61 487.61
-% Cookbook Example Program from First Printing, Revised 7 Jan 1985
-% Program: Repeated Shapes Number: 6
-%-----------------------------------------------------------------------------
-%
- % This program prints a rosette
- % design by defining a section of
- % that design and printing that
- % section repeatedly. This program
- % illustrates the ``for'' and
- % "arc" operators, and it shows
- % how coordinate transformations
- % can be nested so as to use the
- % most convenient coordinate
- % system for each part of a
- % design.
-/inch {72 mul} def
-
-/wedge % Define an ``ice cream cone''
- { newpath % shape by means of the ``arc''
- 0 0 moveto % operator. This shape will have a
- 1 0 translate % 30 degree angle topped off with
- 15 rotate % a semicircle. Set the path's
- 0 15 sin translate % first point at the current
- 0 0 15 sin -90 90 arc % origin. Next, move the origin to
- closepath % the center of the semicircle by
- } def % translating to the right 1 unit,
- % rotating counter-clockwise by 15
- % degrees, and translating ``up''
- % in the rotated system by the
- % radius of the semicircle. The
- % ``arc'' operator includes a
- % straight line to the initial
- % point of the arc and a curved
- % section to the end of the arc.
- % Note that the semicircle goes
- % from -90 degrees to 90 degrees
- % in the rotated coordinate
- % system.
-
-gsave
- 4.25 inch 4.25 inch translate % Move into position for the
- % rosette.
- 1.75 inch 1.75 inch scale % Make the edges of the rosette 1
- % 3/4 inches long.
- 0.02 setlinewidth % Use a 7/200 inch thick line.
- 2 1 13 % Set up the ``for'' operator to
- % iterate 12 times, pushing 2 onto
- % the stack the first time, 3 the
- % next time, ... , and 13 the last
- % time.
- { % The last argument for ``for'' is
- % the sequence of operations to be
- % repeated. This sequence must be
- % enclosed by braces.
- 13 div setgray % Divide the loop index by 13 to
- % set a gray value.
- gsave % Enclose the ``wedge'' operation
- wedge % in a ``gsave''-``grestore''
- % pair, as it will mess up the
- % coordinate system.
- gsave % Save the wedge path for use
- % after the ``fill''.
- fill
- grestore
- 0 setgray stroke % Draw a black border around the
- % wedge.
- grestore % Get out of the coordinate system
- % left by wedge.
- 30 rotate % Set up for the next section.
- } for % Close the last argument and
- % execute the ``for'' operator.
-grestore
-showpage
-