1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
|
=====//===== \\ // ____
// \\ // |\ /| //
// //====== \V/ ||\ //| \\
// // // \\ || \// | /\ \\ ===\
// //==== // \\ || | // \ \\ |
// // // \\ || | //===\ \\___/
//======= // \
Volume 4 Number 5
A Mostly Unofficial Publication for
Users of the TeX Typesetting System
Contents
Departments
\footnote{}........................................................2
News...............................................................3
Letters to the Editor..............................................4
ToolBox............................................................5
Latin Font Encoding Scheme.........................................6
MF Symbols for Typesetting Physics.................................7
TeXMaG Volume 4 Number 5 page 2
_______________________________________________________________________________
| |
| \footnote{Call for articles!} |
|_____________________________________________________________________________|
Well, it has been somewhat of a struggle finding much stuff to go into
this issue. I am having more and more to rely on "Letters" than I
would like. Please! I call out again! I LOVE to get your submissions.
I would LOVE to print them. Although, I cannot always include
EVERYTHING, I am normally not very picky when it comes to including
articles.
Even macros can find their way into the ToolBox normally. Much thanks
to Mauro Orlandini for his contributions from the LaTeX side of
things, both in this issue and in previous issues. Also to J"org
Knappen who has provided us with three symbols for typesetting
physics.
I hope you find the NEWS informative this month.
Drop me a note just to let me know what you think. Is TeXMaG helping
to meet your TeX needs? Is it a joy or a drudgery to read each month?
I'd love to hear from you! (Remember: NABTEXM@TAMVENUS bitnet or
NABTEXM@VENUS.TAMU.EDU internet)
-neil
TeXMaG Volume 4 Number 5 page 3
_______________________________________________________________________________
| |
| ** NEWS ** |
|_____________________________________________________________________________|
A summary of the some TeX news in the past month:
** An official release of TeX 3.1 is out. A couple of bug fixes
from TeX 3.0; it shouldn't be too much hassle for anyone's change
files. The new WEB can be FTP'd from labrea.stanford.edu or
ymir.claremont.edu, the latter has a nice VMS change file available.
In addition, Metafont 2.7 was released to be consistent with
TeX 3.1 (don't know why it was numbered 2.7 instead of 2.1?)
** LaTeXers!!! Please note the first letter in the next section. Mauro
Orlandini has the changes for S-Tables to allow easy input and use
into LaTeX.
** In addition, you've probably already heard about the DECUS 1990 TeX
Collection release. If not, it's available from wuarchive.wustl.edu
[128.252.135.4] for anonymous FTP. All appropriate files are in the
/decus/tex directory. I would suggest you take a look at the
official announcement in TeXHAX90#63. [If you have trouble doing
that, drop me a note and I'll forward it to you (my e-mail address
is somewhere at the end of this issue). -ed.]
** The European TeX Users Group held a conference in Cork, Ireland,
from September 10-12.
** Finally, about a month ago, Oren Patashnik released a set of macros
to let you use BibTeX with plain TeX. These files can also be FTP'd
from ymir.claremont.edu.
TeXMaG Volume 4, Number 5 page 4
_______________________________________________________________________________
| |
| Letters to the Editor |
|_____________________________________________________________________________|
------------------------------------------------------------------------------
S-Tables and LaTeX
------------------------------------------------------------------------------
As soon as I received the latest issue of TeXMAG (V4N4), I found the
macro package S-TABLES very interesting. Because I normally use LaTeX,
I was curious to compile the file STABLES_DOC with LaTeX, after having
changed all the commands that LaTeX does not recognize:
\eject --> \clearpage
\vfill\eject --> \clearpage
\bye --> \end{document}
and after having inserted the following preamble:
\documentstyle[a4]{article}
\nofiles
\input{s_verbatim}
\input{stables}
\begin{document}
(I use A4.STY for european page layout).
The file was compiled correctly! Of course it is not a real proof, but I
think the S-TABLES package can be used as it is in LaTeX, too.
Mauro Orlandini
Bitnet: ORLANDIN@ITSSISSA
Span: 38007::ORLANDINI
------------------------------------------------------------------------------
PsFig and OzTeX
------------------------------------------------------------------------------
I have been using OzTeX (a Macintosh version of TeX) for 2 months and
I have some problems in including pictures in my documents.
I know that there is the macro package called psfig: does someone have
some experience in using this package with OzTeX? Which version of
psfig must be used? (there are three different versions of the
"psfig.pro" and "psfig.tex" files).
Thanks.
Alfonso Fuggetta
CEFRIEL - Politecnico di Milano
e-mail: alfonso@imicefr.bitnet
------------------------------------------------------------------------------
LaTeX Wizards:
------------------------------------------------------------------------------
Is there a way of defining a LaTeX command which will put a frame of
size \textwidth by \textheight around the contents of every subsequent
page in the document ? The command should otherwise leave every thing
unchanged.
Thanks in advance.
If you find a solution I would appreciate it if you could e-mail it to
me whenever it is available.
Uri Zwick
Uri Zwick, Computer Science, Warwick University, Coventry, CV4 7AL, UK
uri@cs.warwick.ac.uk phone: +44 203 523523 ext.2368 fax: +44 203 525714
------------------------------------------------------------------------------
PC, TeX, and LaserJet
------------------------------------------------------------------------------
Dear Networkers and TeX users,
I'm a novice user of TeX on PC, and I have some questions to you
concerning the installation of the DVIxxx package. First of all, how
can I access the DVI package for my HP LaserJet printer? Second, how
can I access the related graphic fonts? In other words, please, tell
me all I have to do to access and install a complete DviLaserJet
free-of-charge package.
Thanks in advance,
Vincenzo De Florio
DEFLORIO@IBACSATA.BITNET
TeXMaG Volume 4, Number 5 page 5
_______________________________________________________________________________
| |
| The ToolBox |
|_____________________________________________________________________________|
We continue our look at verbatim scanning. Last month we introduced
the S_VERBATIM.TEX macros. It allowed you to use any character you
chose as a verbatim delimiter, except for the " and a special
character. Below is the fix to allow you to use special characters
('$', '%', '#', etc) as delimeters. Special thanks to Raymond Chen for
his solution to the problem.
S_VERBATIM.TEX fails to operate properly if the character
following the double-quote symbol is a special character:
%
% Sample file to demonstrate the problem.
\input s_verbatim
This document generates a ``runaway argument'' error because the
terminating character has the wrong catcode. Here is some "$verbatim$
text. This text is getting swallowed up by the verbatim macro
because the first dollar sign above has catcode 3, whereas
the second one has catcode 12. The blank line at the end of this
paragraph will cause \TeX\ to flag a runaway argument.
% Here's how to fix it. Keep everything upto and including the line
% that goes \catcode`\"=\active, then replace the subsequent two lines
% with the following three:
\def"{\ttverbatim\continueverbatim}
\def\continueverbatim#1{\spaceskip\ttglue
\def\readit##1#1{##1\endgroup}\expandafter\readit}
__________________________________________________________________________
Now here is a macro to allow you to input a complete file verbatim.
Use \verbatiminput{filename} in much the same way as you would use
\input filename.
%
% verbatim input macro
%
\def^^L{\par}
\def\verbatiminput#1{\begingroup \frenchspacing \raggedbottom
\def\do##1{\catcode`##1=12 } \dospecials \catcode`\|=12
\parskip 0pt \parindent 0pt
\catcode`\ =\active \catcode`\^^M=\active
\catcode`\^^L=\active \outer\def^^L{\eject}
\tt \def\par{\ \endgraf} \obeylines \obeyspaces
\input #1 \endgroup}
%
%A copy of the latest TeXMaG!!
%
\verbatiminput{texmag.txt}
%
\bye
TeXMaG Volume 4, Number 5 page 6
_______________________________________________________________________________
| |
| Latin Font Encoding Scheme --- Request for Comments |
|_____________________________________________________________________________|
[This article first appeared in UKTEX90 #31 -ed.]
At the TUG90 meeting in Cork, the font-encoding Birds-of-a-Feather
meeting devised the following encoding scheme for using all 256
glyphs supported by the 8-bit facilities in TeX 3.0.
This is currently a draft for which comments are sought:
please direct all correspondence to Norbert Schwarz
(<p920021@DBORUB01.bitnet> or alternatively try
norbert.schwarz@ruba.rz.ruhr-uni-bochum.dbp.de).
The TeX file which follows should be typeset using the Plain format,
and uses no extended characters. It can be typeset using TeX 2.x
%%%<cut here>---------------------------------------------------------
% This is the final definition of a 256 character code set for
% TeX prepared by the TEX-CHAR working group, discussed at
% the TeX conference at Cork.
%
% Cork, September 12, 1990
%
% --------------------------------------------------------------------
%
%
\advance\voffset by -1.5truecm
\advance\vsize by 3truecm
%
\nopagenumbers
\leftline{\bf Extended \TeX\ Font Encoding Scheme --- Latin }
\medskip
\hrule height 1pt
\medskip
\medskip
\leftline{finished in Cork, September 12, 1990 (corrected a typo in
text)}
\bigskip
%
%
%
\newcount\m \newcount\n \newdimen\dim
\def\oct#1{\hbox{\rm\'{}\kern-.2em\it#1\/\kern.05em}} % octal constant
\def\hex#1{\hbox{\rm\H{}\tt#1}} % hexadecimal constant
\def\setdigs#1"#2{\gdef\h{#2}% \h=hex prefix; \0\1=corresponding octal
\m=\n \divide\m by 64 \xdef\0{\the\m}%
\multiply\m by-64 \advance\m by\n \divide\m by 8 \xdef\1{\the\m}}
\def\oddline{\cr
\noalign{\nointerlineskip}
\multispan{19}\hrulefill&
\setbox0=\hbox{\lower 2.3pt\hbox{\hex{\h x}}}\smash{\box0}\cr
\noalign{\nointerlineskip}}
\def\evenline{
\ifnum\n<256 \m=\n \divide\m 16 \chardef\next=\m
\expandafter\setdigs\meaning\next\fi
\ifnum\n=256 \let\next=\endchart\else\let\next=\morechart\fi
\next}
\def\morechart{\cr\noalign{\hrule\penalty5000}
\chartline \oddline \m=\1 \advance\m 1 \xdef\1{\the\m}
\chartline \evenline}
\def\chartline{&\oct{\0\1x}&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&}
\def\chartstrut{\lower4.5pt\vbox to14pt{}}
\def\table{$$\global\n=0
\halign to\hsize\bgroup
\chartstrut##\tabskip0pt plus10pt&
&\hfil##\hfil&\vrule##\cr
\lower6.5pt\null
&&&\oct0&&\oct1&&\oct2&&\oct3&&\oct4&&\oct5&&\oct6&&\oct7&\evenline}
\def\endchart{\cr\noalign{\hrule}
\raise11.5pt\null&&&\hex 8&&\hex 9&&\hex A&&\hex B&
&\hex C&&\hex D&&\hex E&&\hex F&\cr\egroup$$\par}
\def\:{\setbox0=\hbox{\csname ec\number\n\endcsname}%
\ifdim\ht0>7.5pt\reposition
\else\ifdim\dp0>2.5pt\reposition\fi\fi
\box0\global\advance\n 1 }
\def\reposition{\setbox0=\vbox{\kern2pt\box0}\dim=\dp0
\advance\dim 2pt \dp0=\dim}
\def\centerlargechars{
\def\reposition{\setbox0=\hbox{$\vcenter{\kern2pt\box0\kern2pt}$}}}
\font\minisan=cmss10
\font\san=cmss10 scaled \magstep1
\font\San=cmss10 scaled \magstep2
\def\eng{{\san r \hskip-6pt\j}}
\def\Eng{{\San r \hskip-7pt\j}}
\def\Thorn{{\San\lower4pt\hbox{l} \hskip-8.5pt\relax b}}
\def\thorn{{\san\lower3pt\hbox{l} \hskip-7pt\relax b}}
\def\eth{{\minisan \raise4pt\hbox{$\times$} \hskip-8.5pt\relax o}}
%
\def\ogonek#1{\setbox0=\hbox{`}\ooalign{%
\hidewidth\lower\ht0\copy0\hidewidth\crcr#1\crcr}}
\font\tenu=cmu10
\def\ec#1{\expandafter\def\csname ec\number\n\endcsname{#1}\advance\n by 1{}}
\n=0
%
%
% accents
%
% '000-'015
%
\ec{\`{}} \ec{\'{}} \ec{\~{}} \ec{\%{}}
\ec{\"{}} \ec{\H{}} \ec{\char23} \ec{\v{}}
%
\ec{\u{}} \ec{\={}} \ec{\.{}} \ec{\c{}}
\ec{\ogonek{\ }}
%
% quotation marks
%
% '016-'024
\ec{,} \ec{$\scriptstyle<$} \ec{$\scriptstyle>$} \ec{``} \ec{''}
\ec{,\hskip-1pt ,} \ec{$\scriptstyle\ll$} \ec{$\scriptstyle\gg$}
% dashes
\ec{--}\ec{---}
%
% compound word mark
%
\ec{{\tt<\san cwm\tt>}}
%
% a small 0, to extend % into 0/00 and 0/000
\ec{$_0$}
% dotless i and j
\ec{\i}\ec{\j}
% f ligatures
\ec{ff}\ec{fi}\ec{fl}\ec{ffi}\ec{ffl}
% visible space
\ec{{\tt\char32}}
% the ASCII character set
\ec{!}\ec{{\tt"}}\ec{\#}\ec{\$}\ec{\%}\ec{\&}\ec{'}
\ec{(}\ec{)}\ec{*}\ec{+}\ec{,}\ec{-}\ec{.}\ec{/}
\n=48
\ec{0}\ec{1}\ec{2}\ec{3}\ec{4}\ec{5}\ec{6}\ec{7}\ec{8}\ec{9}
\ec{:}\ec{;}\ec{$<$}\ec{=}\ec{$>$}\ec{?}
\n=64
\ec{@}
\ec{A}\ec{B}\ec{C}\ec{D}\ec{E}\ec{F}\ec{G}\ec{H}\ec{I}\ec{J}\ec{K}\ec{L}\ec{M}
\ec{N}\ec{O}\ec{P}\ec{Q}\ec{R}\ec{S}\ec{T}\ec{U}\ec{V}\ec{W}\ec{X}\ec{Y}\ec{Z}
\ec{\lbrack}
\ec{$\backslash$}
\ec{\rbrack}
\ec{{\tt\~{}}}
\ec{{\tt\char`\_}}
\n=96
\ec{`}
\ec{a}\ec{b}\ec{c}\ec{d}\ec{e}\ec{f}\ec{g}\ec{h}\ec{i}\ec{j}\ec{k}\ec{l}\ec{m}
\ec{n}\ec{o}\ec{p}\ec{q}\ec{r}\ec{s}\ec{t}\ec{u}\ec{v}\ec{w}\ec{x}\ec{y}\ec{z}
\ec{$\{$}
\ec{$|$}
\ec{$\}$}
\ec{{\tt\%{}}}
\n=127
% hyphenation character
\ec{{\sevenrm (hyph.char) }-}
%
% accented letters, mainly from ISO Latin 2 (8859/2), and some more
%
% '200-'237 uppercase
%
\ec{\u A} \ec{\ogonek{A}} \ec{\'C} \ec{\v C}
\ec{\v D} \ec{\v E} \ec{\ogonek{E}} \ec{\u G}
%
\ec{\'L} \ec{L\kern-2pt'} \ec{\L} \ec{\'N}
\ec{\v N} \ec{Eng/\Eng} \ec{\H O} \ec{\'R}
%
\ec{\v R} \ec{\'S} \ec{\v S} \ec{\c S}
\ec{\v T} \ec{\c T} \ec{\H U} \ec{\accent 23U}
%%
\ec{\"Y} \ec{\'Z} \ec{\v Z} \ec{\.Z}
\ec{IJ} \ec{\.I} \ec{d\llap{\raise0.7ex\hbox{--}}} \ec{\S}
%
% '240-'277
%
\ec{\u a} \ec{\ogonek{a}} \ec{\'c} \ec{\v c}
\ec{d\kern-1pt'} \ec{\v e} \ec{\ogonek{e}} \ec{\u g}
%
\ec{\'l} \ec{l\kern-1pt'} \ec{\l} \ec{\'n}
\ec{\v n} \ec{eng/\eng} \ec{\H o} \ec{\'r}
%
\ec{\v r} \ec{\'s} \ec{\v s} \ec{\c s}
\ec{t\kern-1pt'} \ec{\c t} \ec{\H u} \ec{\accent 23u}
%
\ec{\"y} \ec{\'z} \ec{\v z} \ec{\.z}
\ec{ij} \ec{!`} \ec{?`} \ec{{\tenu\$}}
%
% accented letters, mainly from ISO Latin 1
%
% '300-'337 uppercase characters
%
\ec{\`A} \ec{\'A} \ec{\~A} \ec{\%A}
\ec{\"A} \ec{\AA} \ec{\AE} \ec{\c C}
%
\ec{\`E} \ec{\'E} \ec{\~E} \ec{\"E}
\ec{\`I} \ec{\'I} \ec{\~I} \ec{\"I}
%
\ec{Eth/\rlap{\raise0.3ex\hbox{--}}D} \ec{\%N} \ec{\`O} \ec{\'O}
\ec{\~O} \ec{\%O} \ec{\"O} \ec{\OE}
%
\ec{\O} \ec{\`U} \ec{\'U} \ec{\~U}
\ec{\"U} \ec{\'Y} \ec{Thorn/\Thorn} \ec{SS}
%
% '340-'377 lowercase characters
%
\ec{\`a} \ec{\'a} \ec{\~a} \ec{\%a}
\ec{\"a} \ec{\aa} \ec{\ae} \ec{\c c}
%
\ec{\`e} \ec{\'e} \ec{\~e} \ec{\"e}
\ec{\`\i} \ec{\'\i} \ec{\~\i} \ec{\"\i}
%
\ec{eth/\eth} \ec{\%n} \ec{\`o} \ec{\'o}
\ec{\~o} \ec{\%o} \ec{\"o} \ec{\oe}
%
\ec{\o} \ec{\`u} \ec{\'u} \ec{\~u}
\ec{\"u} \ec{\'y} \ec{thorn/\thorn} \ec{\ss}
%
\table
\noindent{\bf A few words of explanation:}
\medskip
\noindent
\oct{000}--\oct{014} are accents. \oct{014} is an ogonek.
\oct{015}--\oct{024} are quotation marks.
\oct{030} is a small 0 to put after the per cent sign, to turn it into
a per thousand (\%$_0$) or per million (\%$_{00}$) sign.
\oct{027} ({\san cwm}) is a compound word mark
(a zero-width invisible character) used e.g.\ for avoiding ligatures.
\oct{040} is a visible space.
\oct{042} is a {\it straight} double quotation mark.
\noindent \oct{041}--\oct{176} is like the 7 bit ASCII code.
Some characters that --- at first glance --- appear duplicated as accent
characters usually have a different shape.
\noindent \oct{177} is the hyphen character (that may be different from
the dash (\oct{055})).
\oct{201}, \oct{206}, \oct{241}, and \oct{246} are A's and E's with
ogonek accents.
\medskip
\noindent The table has been sorted to reflect {\tt\string\uppercase}
{\tt\string\lowercase} mechanism for all characters.
\medskip
\noindent This table shows the character codes positions, but the
shapes are only approximations.
\bye
%%%<cut here>---------------------------------------------------------
TeXMaG Volume 4, Number 5 page 7
_______________________________________________________________________________
| |
| Three MF Symbols for Typesetting Physics |
|_____________________________________________________________________________|
by J"org Knappen
For typesetting physics, I created three new symbols:
1. a triple dot accent, denoting the third time derivative,
2. a left-pointing vector arrow, and
3. a double headed vector arrow.
The latter two are both used in quantum field theory (Dirac equations,
etc.). I decided to create them in Metafont (\stackrel or something
like this usually fails in footnotes).
Way of usage (some do-it-yourself):
Take the file cmsy10.mf and copy it to mysy10.mf. Change the line
generate mathsy into generate mysymbol.
Copy mathsy.mf to mysymbol.mf and delete the ligtable. Change the
"input symbol" into "input mysy" . The file mysy.mf will follow at the
end of this posting.
Run METAFONT on MYSY10.MF and create the .tfm and .pk files and place
them into their directories. [see TeXMaG V4N3, "Frequently Asked
Questions" -ed.]
Now take the file amssymb.tex (or .sty ,if you use LaTeX), copy it to
mysymb.tex. Replace the string "msym" by "mysy", delete everything
what has to do with msxm. Also delete the long list of definitions at
the end of the file.
Add the following definitions:
\def\tridot{\mathaccent"0\mysy@7C }
\def\leftvec{\mathaccent"0\mysy@7D }
\def\leftrightvec{\mathaccent"0\mysy@7F }
This will allow you to use these characters like the other math
characters.
%%%%--------schnipp-schnapp----------------------------------------%%%%
% mysy.mf by J"org Knappen, Bitnet: knappen@dmznat51
cmchar"Triple dot accent";
numeric dot_diam#,dot_diam;
dot_diam#=max(dot_size#,cap_curve#);
beginchar(hex"7C",9u#,min(asc_height#,10/7x_height#+.5dot_diam#),0);
dot_diam=max(tiny.breadth,hround(max(dot_size,cap_curve)-2stem_corr));
italcorr h#*slant+.5dot_diam#-1.25u#;
adjust_fit(0,0);
pickup tiny.nib; pos1(dot_diam,0); pos2(dot_diam,90);
x1=x2=1.5u; top y2r=h+1;
if bot y2l<x_height+o+slab: y2l:=min(y2r-eps,x_height+o+slab+.5tiny); fi
y1=.5[y2l,y2r]; dot(1,2); % left dot
pos3(dot_diam,0); penpos4(y2r-y2l,90); y3=y4=y1; x3=x4=w-x1;
dot(3,4); % right dot
pos5(dot_diam,0); penpos6(y2r-y2l,90);
x5=x6=.5w; y5=y6=y1;
dot(5,6); % middle dot
penlabels(1,2,3,4,5,6); endchar;
cmchar "Leftarrow accent";
beginchar(hex"7D",9u#,asc_height#+.5rule_thickness#,0);
italcorr .7[x_height#,asc_height#]*slant;
adjust_fit(0,0); pickup rule.nib;
lft x1=hround .5u; x2=w-x1; y1=y2=good.x .7[x_height,asc_height];
draw z1--z2; % bar
lft x3=lft x4=hround(x1+u);
y3=y2+.3(asc_height-x_height); y4=y2-.3(asc_height-x_height);
draw z3{x1-x3,2(y1-y3)}...{2(x1-x3),y1-y3}z1; % upper point
draw z4{x1-x4,2(y1-y4)}...{2(x1-x4),y1-y4}z1; % lower point
labels(1,2,3,4); endchar;
cmchar "Leftrightarrow accent";
beginchar(hex"7F",9u#,asc_height#+.5rule_thickness#,0);
italcorr .7[x_height#,asc_height#]*slant;
adjust_fit(0,0); pickup rule.nib;
lft x1=hround .5u; x2=w-x1; y1=y2=good.x .7[x_height,asc_height];
draw z1--z2; % bar
rt x3=rt x4=hround(x2-u);
lft x5=lft x6=hround(x1+u);
y3=y2+.3(asc_height-x_height); y4=y2-.3(asc_height-x_height);
y5=y2+.3(asc_height-x_height); y6=y2-.3(asc_height-x_height);
draw z3{x2-x3,2(y2-y3)}...{2(x2-x3),y2-y3}z2; % upper point right
draw z4{x2-x4,2(y2-y4)}...{2(x2-x4),y2-y4}z2; % lower point right
draw z5{x1-x5,2(y1-y5)}...{2(x1-x5),y1-y5}z1; % upper point left
draw z6{x1-x6,2(y1-y6)}...{2(x1-x6),y2-y6}z1; % lower point left
labels(1,2,3,4,5,6); endchar; endinput;
%%%%--------schnipp-schnapp---------------------------------------%%%%
______________________________________________________________________
TeXMaG is an electronic magazine available free of charge to all
interested parties reachable by electronic mail. It is published
monthly. Letters to the editor may be sent to NABTEXM@TAMVENUS
(BITNet) or NABTEXM@VENUS.TAMU.EDU (Internet) and may be published in
a future issue.
Publisher: Academic Computing Services of
Texas A&M University
Managing Editor: Neil Burleson
TeX Consultant: Robert Nilsson
Copy Editor: Diana Armstrong
Chief Consultant: John McClain, Ph.D
SUBSCRIPTIONS:
CDNnet: Send a note to <list-request@relay.cdnnet.ca> asking to receive
TeXMaG.
JANET: Send a note to Peter Abbott, <Abbottp@Uk.Ac.Aston> asking to
receive TeXMaG.
All others: Send the following command as an interactive message
(Bitnet) or as a single-line mail message to LISTSERV@UICVM
or LISTSERV@UICVM.UIC.EDU:
SUBS TEXMAG-L Your_Full_Name.
If you have difficulty doing this, send a note to Neil Burleson
<NABTEXM@VENUS.TAMU.EDU>.
SUBMISSIONS:
Please send submissions to <TEXMAG-L@UICVM.UIC.EDU> or
<TEXMAG-L@UICVM>; they will automatically be forwarded to the
editor.
BACK ISSUES:
Back issues may be FTP'd from YMIR.CLAREMONT.EDU from the directory
[ANONYMOUS.TEX.PERIODICALS.TEXMAG]
Back issues may also be FTP'd from SUN.SOE.CLARKSON.EDU from the
directory pub/texmag. Users without FTP access may request back
issues from the Clarkson repository by sending a mail message
to <archive-server@sun.soe.clarkson.edu> with the form
path A_MAIL_PATH_FROM_CLARKSON_TO_YOU
get texmag texmag.V.NN
where V is the volume number and NN is the issue number. Including
a line "index texmag" in the message will return a list of back
issues available.
Janet users may obtain back issues from the Aston archive.
DECNET/SPAN users may obtain them from the Decnet repository (see
below).
\bye bye!
% End of TeXMaG
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|