| 1 |
%% |
|---|
| 2 |
%% E-CELL logo style file |
|---|
| 3 |
%% written by Kouichi Takahashi (shafi@sfc.keio.ac.jp) 1999/03/30 |
|---|
| 4 |
%% |
|---|
| 5 |
%% usage: type \ECELL in your TeX document |
|---|
| 6 |
%% |
|---|
| 7 |
|
|---|
| 8 |
\ifx\sc\undefined |
|---|
| 9 |
\def\sc{% |
|---|
| 10 |
\expandafter\ifx\the\scriptfont\fam\nullfont |
|---|
| 11 |
\font\temp = cmr7 \temp |
|---|
| 12 |
\else |
|---|
| 13 |
\the\scriptfont\fam |
|---|
| 14 |
\fi |
|---|
| 15 |
\def\uppercasesc{\char\uccode`}% |
|---|
| 16 |
}% |
|---|
| 17 |
\fi |
|---|
| 18 |
\ifx\uppercasesc\undefined |
|---|
| 19 |
\let\uppercasesc = \relax |
|---|
| 20 |
\fi |
|---|
| 21 |
|
|---|
| 22 |
\ifx\ECELL\undefined |
|---|
| 23 |
\def\ECELL{E\kern-.05em\raise.1em\hbox{-}\kern-.08emC\kern-.13em% |
|---|
| 24 |
\hbox{\sc \uppercasesc e\kern-.1em% |
|---|
| 25 |
\uppercasesc l\kern-.12em\uppercasesc l}\/\ } |
|---|
| 26 |
\fi |
|---|
| 27 |
|
|---|
| 28 |
|
|---|
