Gallery › Lettering and type

The Compositor's Proof

A printer's proof sheet showing artkit's paragraph flow: a round medallion, a justified block, two columns.

The Compositor's Proof, a printer's proof sheet with a motto set in a circle, a justified paragraph and a two-column colophon
Click the picture for the full-size render.

How it is made

A motto is set inside a round medallion with tfflow and a hand-written circle boundary procedure. A body paragraph is justified with tfblock, and a two-column colophon set with tfcols genuinely spills from the first column into the second.

Details

Category
Lettering and type
Tags
layout
Libraries
artkit
Added
2026-08-07
Built in
issue #16
Page size
620 × 760 points

Source

View source the whole program in a scrolling window, or read gallery/compositors_proof.ps on GitHub. To draw it yourself, from a checkout of the repository:

pscat --page 620x760 gallery/compositors_proof.ps
The first 40 of 81 lines of the source
%!PS-Adobe-3.0
%%Title: The Compositor's Proof (issue #16, artkit paragraph flow)
%%BoundingBox: 0 0 620 760
%%EndComments

% A printer's proof sheet for artkit's new paragraph-flow section
% (lib/artkit.ps): a motto set inside a round medallion via tfflow and
% a hand-written boundsproc (available width computed straight off the
% circle's own equation -- the "arbitrary region" capability tfblock/
% tfcols are just convenience wrappers over), a justified body
% paragraph under tfblock, and a two-column colophon under tfcols,
% carrying one run of copy from the first column into the second. Run
% from the repo root:
%
%   pscat --page 620x760 gallery/compositors_proof.ps

(lib/artkit.ps) run
0 srand

% --- parchment page -----------------------------------------------------
0.97 0.95 0.90 setrgbcolor clippath fill
0.45 0.35 0.22 setrgbcolor 1.5 setlinewidth
newpath 20 20 moveto 600 20 lineto 600 740 lineto 20 740 lineto closepath stroke
newpath 26 26 moveto 594 26 lineto 594 734 lineto 26 734 lineto closepath stroke

0.18 0.13 0.08 setrgbcolor

% corner ornaments -- a small star at each inside corner
0.55 0.40 0.20 setrgbcolor
newpath 36 36 8 4 5 star fill
newpath 36 724 8 4 5 star fill
newpath 584 36 8 4 5 star fill
newpath 584 724 8 4 5 star fill
0.18 0.13 0.08 setrgbcolor

% --- medallion: motto set inside a circle (tfflow, arbitrary region) ----
/MEDX 310 def /MEDY 640 def /MEDR 78 def
0.45 0.35 0.22 setrgbcolor 1.2 setlinewidth
newpath MEDX MEDY MEDR 0 360 arc stroke
newpath MEDX MEDY MEDR 6 sub 0 360 arc stroke