blob: 3f69f53326eb6f4ad8b18f47cab6f9a6f180fd4d (
plain)
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
|
%*** this is file PHYSUPDT as of 1988.04.06 ***
%*** modifications and updates to PHYS-TeX version 1.0 ***
%
%*** make sure this file is read once and only once !!
%
\ifx\resetpar\undefined
\wlog{* don't read the file physupdt twice !! *}%
\expandafter\endinput\fi
\resetpar % restore definition of \par
\def\fmtupdt{1.3.0} % identifies the current update version
\wlog{* modifications and updates as of 1988.04.11 *}
\ifx\userid\undefined \def\userid{YOUR~USERID}\fi
\def\wlog#1{} % suppress allocation messages
\catcode`\@=11
%*** physorg ***
%*** physmain ***
%*** physfont ***
%*** load am... or cm... fonts according to PLAIN's selection ***
%\font\sevensl=\font@sel sl7 %not included in physe (check for TFM first)
%*** sizes ***
\def\modtwelvepoint{\modtwelve@point
\let\normal@spacing\twelve@spacing \set@spacing
\let\big=\modtwelvebig \let\Big=\modtwelveBig
\let\bigg=\modtwelvebigg \let\Bigg=\modtwelveBigg}
\def\modtwelvebig#1{{\hbox{$\left#1\vbox to9.5\p@{}\right.\n@space$}}}
\def\modtwelveBig#1{{\hbox{$\left#1\vbox to12.5\p@{}\right.\n@space$}}}
\def\modtwelvebigg#1{{\hbox{$\left#1\vbox to15.5\p@{}\right.\n@space$}}}
\def\modtwelveBigg#1{{\hbox{$\left#1\vbox to18.5\p@{}\right.\n@space$}}}
%*** fonts for sizes ***
\def\modtwelve@point{\set@fonts twelve nine eight } %let 8 ->7 if tfm's avail.
%*** macros for sizes ***
\def\modlarge{\par \bgroup \modtwelvepoint \after@arg\@size}
\def\MODLARGE#1{{\modtwelve@point #1}}
%*** phystext ***
%*** physpage ***
%*** physchap ***
%*** physequ ***
%*** physstor ***
%*** physfig ***
%*** physpict ***
%*** ProPLOT macros ***
\outer\def\ProPLOTfigs{\glet\ProPLOTpfig\pr@pfig \glet\ProPLOTlfig\pr@lfig}
\outer\def\noProPLOTfigs{\glet\ProPLOTpfig\nopr@fig \glet\ProPLOTlfig\nopr@fig}
\def\pr@pfig#1#2#3#4{\hbox\bgroup \setbox\z@\hbox{\special{ps: plotfile #1}}
\dimen\z@=#3 \advance\dimen\z@ by #4 \wd\z@=#2 \ht\z@=\dimen\z@ \dp\z@=\z@
\lower#4\box\z@ \egroup}
\def\pr@lfig#1#2#3#4{\hbox\bgroup \setbox\z@\null
\dimen\z@=#3 \advance\dimen\z@ by #4 \wd\z@=#2 \ht\z@=#3 \dp\z@=#4 \box\z@
\wd\z@=\z@ \setbox\z@\hbox{\special{ps: plotfile #1}} \lower#4\box\z@ \egroup}
%\def\pr@fig#1#2#3#4{\hbox\bgroup \setbox\z@\hbox{\special{ps: plotfile #1}}%
% \lower#4\copy\z@ \hskip#2\raise#3\box\z@ \egroup}
\def\nopr@fig#1#2#3#4{\hbox\bgroup \write\m@ne{Insert ProPLOT Output File: #1}%
\frame{#2}{#3}{#4}\egroup}
\ProPLOTfigs %set the default
%*** phystab ***
%*** phystabl ***
%*** physref ***
%*** physjrnl ***
%*** phystoc ***
%*** physfoot ***
%*** physitem ***
%*** physmath ***
%*** physsave ***
\def\save@type{.sav } % file type for save and restore
% modified from .texsave to .sav for PC use
%*** physinst ***
%*** physorg (options which must be set after defining macros) ***
\def\wlog{\immediate\write\m@ne} % restore PLAIN's definition
\catcode`\@=12 % @ signs are no longer letters
%*** end of file PHYSUPDT ***
|
