\varkappa

[arnost]

 >Errors-To: owner-csTeX at cs.felk.cvut.cz
 >X-Listname: Czech and Slovak TeX-related mailing list <csTeX at cs.felk.cvut.cz>
 >Sender: owner-csTeX at cs.felk.cvut.cz
 >Date: Thu, 31 Oct 1996 08:43:30 +0100
 >Reply-To: csTeX at cs.felk.cvut.cz
 >Precedence: bulk
 >From: "Jiri Bajer" <BAJER at optnw.upol.cz>
 >X-Mailer:     Pegasus Mail v3.1 (R1)
 >
 >Vazeni TeXperti,
 >
 >Mam nainstalovany PlainTeX a LateX, ale ne AMSTeX a pritom chci do vzorcu
 >napsat \varkappa, tj. takove to kappa co vypada jako male psaci H, pouziva
 >se napriklad k oznaceni Newtonovy gravitacni konstanty.
 >
 >Stahl jsem si dokonce extra font cmam10 a cmbm10, kde \char123 zrejme
 >pripomina hledane kappa, ale BOHUZEL NEFUNGUJE MI TO v MATEMATICKEM MODU.
 >
 >Poradte co delam spatne, pripadne jak se to da jinak vyresit.
 >
 >Diky
 >Jirka
 >
 >------------plaintexovsky zdrojak-------------
 >
 >\font\ams=msbm10
 >\def\kappa{{\ams\char123}}
 >
 >v textovem modu kapa funguje: \kappa kT
 >
 >v matematickem nikoliv: $\kappa kT$
 >
 >Jsem z toho blazen !!!!!!!!!!!!!!!!!!!!!!!
 >
 >\end
 S fonty v matice je to trochu slozitejsi.
postup je zhruba takovyto (delano dle clanku P. Olsaka):

\font\tenmib cmmib10 scaled 1200
\font\bb   bb12
\newfam\bbfam
\newfam\mibfam
\textfont\bbfam=\bb
\textfont\mibfam=\tenmib
\scriptfont\mibfam=\tenmib
\scriptscriptfont\mibfam=\tenmib
\def\six#1{\ifcase#1 0\or1\or2\or3\or4\or5\or6\or7\or8\or9\or A%
\or B\or C\or D\or E\or F\fi}
\def\mibmathcodes{%
\mathchardef\alpha="0\six\mibfam0B
\mathchardef\beta="0\six\mibfam0C
\mathchardef\gamma="0\six\mibfam0D
\mathchardef\delta="0\six\mibfam0E
\mathchardef\epsilon="0\six\mibfam0F
\mathchardef\zeta="0\six\mibfam10
\mathchardef\eta="0\six\mibfam11
\mathchardef\theta="0\six\mibfam12
\mathchardef\iota="0\six\mibfam13
\mathchardef\kappa="0\six\mibfam14
\mathchardef\lambda="0\six\mibfam15
\mathchardef\mu="0\six\mibfam16
\mathchardef\nu="0\six\mibfam17
\mathchardef\xi="0\six\mibfam18
\mathchardef\pi="0\six\mibfam19
\mathchardef\rho="0\six\mibfam1A
\mathchardef\sigma="0\six\mibfam1B
\mathchardef\tau="0\six\mibfam1C
\mathchardef\upsilon="0\six\mibfam1D
\mathchardef\phi="0\six\mibfam1E
\mathchardef\chi="0\six\mibfam1F
\mathchardef\psi="0\six\mibfam20
\mathchardef\omega="0\six\mibfam21
\mathchardef\varepsilon="0\six\mibfam22
\mathchardef\vartheta="0\six\mibfam23
\mathchardef\varpi="0\six\mibfam24
\mathchardef\varrho="0\six\mibfam25
\mathchardef\varsigma="0\six\mibfam26
\mathchardef\varphi="0\six\mibfam27
}
\def\Bb#1{{\fam\bbfam\bb #1}}
\def\mib#1{{\fam\mibfam\mibmathcodes\tenmib #1}}
\def\tl{\fam\mibfam\mibmathcodes\tenmib}
\def\Bbb{\fam\bbfam\bb}

%%%%%pokus
%\begin{document}
${\mib{\alpha\beta\gamma\delta\epsilon\varepsilon\zeta
\eta\theta\vartheta\iota\kappa\lambda\mu\nu\xi\pi\varpi
\rho\varrho\sigma\varsigma\tau\upsilon\phi\varphi\chi\psi\omega}}\alpha$
$\Bb{ABC}$
\mib{abc}
\Bb{ABX}

$$\alpha{\tl\alpha}\alpha$$
$$INQZRC {\Bbb INQZRC} INQZRC$$

%\end{document}

format \mathardef
je: treba "0\six\famaFE
	"	znamena bude to v hexu
	0         znamena bud to znak (	1 velky operator
				2 binarni operator
				3 relace
				4 otviraci zavorka
				5 zaviraci
				6 interpunkce
				7 promenna

	\fama   family (identifikace fontu)
	FE     pozice znaku ve fontu

to \six jenom preklada cislo family do hexu

arnost