summaryrefslogtreecommitdiff
path: root/info/examples/tip/font-cpp.tip
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2024-02-01 03:00:51 +0000
committerNorbert Preining <norbert@preining.info>2024-02-01 03:00:51 +0000
commita494a509f3f4a13a450c898488155f7aa5353bd3 (patch)
treeab11a3116dfe36f273b0eefe1a7abb556253a9c8 /info/examples/tip/font-cpp.tip
parent79e1bbc1ad6b308aa2074540b2afd43b6a72ce03 (diff)
CTAN sync 202402010300
Diffstat (limited to 'info/examples/tip/font-cpp.tip')
-rw-r--r--info/examples/tip/font-cpp.tip45
1 files changed, 0 insertions, 45 deletions
diff --git a/info/examples/tip/font-cpp.tip b/info/examples/tip/font-cpp.tip
deleted file mode 100644
index c127d76ed5..0000000000
--- a/info/examples/tip/font-cpp.tip
+++ /dev/null
@@ -1,45 +0,0 @@
-% This macro source file is from the four volume series
-% "TeX in Practice" by Stephan von Bechtolsheim, published
-% 1993 by Springer-Verlag, New York.
-% Copyright 1993 Stephan von Bechtolsheim.
-% No warranty or liability is assumed.
-% This macro may be copied freely if no fees other than
-% media cost or shipping charges are charged and as long
-% as this copyright and the following source code itself
-% is not changed. Please see the series for further information.
-%
-% Version: 1.0
-% Date: May 1, 1993
-%
-%
-% This source code is documented in 16.2.11, p. II-283.
-% Original source in file "fonts2.TEX", starting line 1007.
-\wlog{L: "font-cpp.tip" ["fonts2.TEX," l. 1007, p. II-283]}%
-% This file DOES belong to format "texip."
-\InputD{leadingz.tip}
-\InputD{imodn.tip}
-\def\CharactersPerPica #1{%
- \setbox0 = \hbox{%
- #1\relax
- This paragraph has 423 characters. We know that
- because we counted it. It is very simple to count, because
- the Emacs editor we are using has a function ``advance
- by one character.'' And with the prefix command (that's
- Emacs terminology) you can execute ``advance by
- one character'' 423~times. Now, let's hope that this text
- is representative of ordinary text so that our average
- number of characters per pica is correct.
- }%
- {%
- \count1 = \wd0
- \divide\count1 by 100
- \count0 = 423
- \multiply\count0 by 65536
- \multiply\count0 by 12
- \divide\count0 by \count1
- \count2 = \count0
- \divide\count2 by 100
- \IModN{\count0}{100}{\count3}%
- \the\count2.\LeadingZ{\count3}%
- }%
-}