%D \module
%D   [       file=type-dis,
%D        version=2005.01.26, % moved from type-enc.tex 2001.04.12,
%D          title=\CONTEXT\ Typescript Macros,
%D       subtitle=Distribution scripts,
%D         author=Hans Hagen,
%D           date=\currentdate,
%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.

%D Unfortunately not all latin modern metrics ship the way we like:
%D
%D Some day I will replace cmr10 etc by their full names.

\starttypescriptcollection[distributed fonts]

\starttypescript[all][modern,latin-modern][all]

  % fallbacks, no math in latin modern

  \definefontsynonym[lmbsy10] [cmbsy10]
  \definefontsynonym[lmbsy5]  [cmbsy5]
  \definefontsynonym[lmbsy6]  [cmbsy7]
  \definefontsynonym[lmbsy7]  [cmbsy7]
  \definefontsynonym[lmbsy8]  [cmbsy7]
  \definefontsynonym[lmbsy9]  [cmbsy10]
  \definefontsynonym[lmdunh10][cmdunh10]
  \definefontsynonym[lmex10]  [cmex10]
  \definefontsynonym[lmex7]   [cmex10]
  \definefontsynonym[lmex8]   [cmex10]
  \definefontsynonym[lmex9]   [cmex10]
  \definefontsynonym[lmff10]  [cmff10]
  \definefontsynonym[lmfi10]  [cmfi10]
  \definefontsynonym[lmfib8]  [cmfib8]
  \definefontsynonym[lmmi10]  [cmmi10]
  \definefontsynonym[lmmi12]  [cmmi12]
  \definefontsynonym[lmmi5]   [cmmi5]
  \definefontsynonym[lmmi6]   [cmmi6]
  \definefontsynonym[lmmi7]   [cmmi7]
  \definefontsynonym[lmmi8]   [cmmi8]
  \definefontsynonym[lmmi9]   [cmmi9]
  \definefontsynonym[lmmib10] [cmmib10]
  \definefontsynonym[lmmib5]  [cmmib5]
  \definefontsynonym[lmmib6]  [cmmib7]
  \definefontsynonym[lmmib7]  [cmmib7]
  \definefontsynonym[lmmib8]  [cmmib7]
  \definefontsynonym[lmmib9]  [cmmib10]
  \definefontsynonym[lmsy10]  [cmsy10]
  \definefontsynonym[lmsy5]   [cmsy5]
  \definefontsynonym[lmsy6]   [cmsy6]
  \definefontsynonym[lmsy7]   [cmsy7]
  \definefontsynonym[lmsy8]   [cmsy8]
  \definefontsynonym[lmsy9]   [cmsy9]
  \definefontsynonym[lmtex10] [cmtex10]
  \definefontsynonym[lmtex8]  [cmtex8]
  \definefontsynonym[lmtex9]  [cmtex9]

\stoptypescript

%D For those who want to use the existing tfm and vf files we
%D provide:

\starttypescript [berry] [8r]

% \setupencoding[default=8r]

\definefontsynonym [8r-utmr8a]                 [ptmr8r]  [encoding=8r]
\definefontsynonym [8r-utmri8a]                [ptmri8r] [encoding=8r]
\definefontsynonym [8r-utmb8a]                 [ptmb8r]  [encoding=8r]
\definefontsynonym [8r-utmbi8a]                [ptmbi8r] [encoding=8r]

\definefontsynonym [8r-utmr8a-slanted-167]     [ptmro8r] [encoding=8r]
\definefontsynonym [8r-utmb8a-slanted-167]     [ptmbo8r] [encoding=8r]

\definefontsynonym [8r-uhvr8a]                 [phvr8r]  [encoding=8r]
\definefontsynonym [8r-uhvro8a]                [phvro8r] [encoding=8r]
\definefontsynonym [8r-uhvb8a]                 [phvb8r]  [encoding=8r]
\definefontsynonym [8r-uhvbo8a]                [phvbo8r] [encoding=8r]

\definefontsynonym [8r-ucrr8a]                 [pcrr8r]  [encoding=8r]
\definefontsynonym [8r-ucrb8a]                 [pcrb8r]  [encoding=8r]
\definefontsynonym [8r-ucrro8a]                [pcrro8r] [encoding=8r]
\definefontsynonym [8r-ucrbo8a]                [pcrbo8r] [encoding=8r]

\definefontsynonym [8r-uplr8a]                 [pplr8r]  [encoding=8r]
\definefontsynonym [8r-uplri8a]                [pplri8r] [encoding=8r]
\definefontsynonym [8r-uplb8a]                 [pplb8r]  [encoding=8r]
\definefontsynonym [8r-uplbi8a]                [pplbi8r] [encoding=8r]
\definefontsynonym [8r-uplr8a-slanted-167]     [pplro8r] [encoding=8r]
\definefontsynonym [8r-uplb8a-slanted-167]     [pplbo8r] [encoding=8r]
\definefontsynonym [8r-uplr8a-capitalized-800] [pplr8r]  [encoding=8r]

\definefontsynonym [8r-ubkl8a]                 [pbkl8r]  [encoding=8r]
\definefontsynonym [8r-ubkli8a]                [pbkli8r] [encoding=8r]
\definefontsynonym [8r-ubkd8a]                 [pbkd8r]  [encoding=8r]
\definefontsynonym [8r-ubkdi8a]                [pbkdi8r] [encoding=8r]
\definefontsynonym [8r-ubkl8a-slanted-167]     [pbklo8r] [encoding=8r]
\definefontsynonym [8r-ubkd8a-slanted-167]     [pbkdo8r] [encoding=8r]
\definefontsynonym [8r-ubkl8a-capitalized-800] [pbkl8r]  [encoding=8r]

\definefontsynonym [8r-uzcmi8a]                [pzcmi8r] [encoding=8r]

\definefontsynonym [8r-putr8a]                 [putr8r]  [encoding=8r]
\definefontsynonym [8r-putri8a]                [putri8r] [encoding=8r]
\definefontsynonym [8r-putb8a]                 [putr8r]  [encoding=8r]
\definefontsynonym [8r-putbi8a]                [putbi8r] [encoding=8r]
\definefontsynonym [8r-putr8a-slanted-167]     [putro8r] [encoding=8r]
\definefontsynonym [8r-putb8a-slanted-167]     [putbo8r] [encoding=8r]
\definefontsynonym [8r-putr8a-capitalized-800] [putr8r]  [encoding=8r]

\definefontsynonym [8r-bchr8a]                 [bchr8r]  [encoding=8r]
\definefontsynonym [8r-bchri8a]                [bchri8r] [encoding=8r]
\definefontsynonym [8r-bchb8a]                 [bchb8r]  [encoding=8r]
\definefontsynonym [8r-bchbi8a]                [bchbi8r] [encoding=8r]
\definefontsynonym [8r-bchr8a-slanted-167]     [bchro8r] [encoding=8r]
\definefontsynonym [8r-bchb8a-slanted-167]     [bchbo8r] [encoding=8r]
\definefontsynonym [8r-bchr8a-capitalized-800] [bchr8r]  [encoding=8r]

\stoptypescript

\starttypescript [berry] [ec]

% \setupencoding[default=ec]

\definefontsynonym [ec-utmr8a]                 [ptmr8t]  [encoding=ec]
\definefontsynonym [ec-utmri8a]                [ptmri8t] [encoding=ec]
\definefontsynonym [ec-utmb8a]                 [ptmb8t]  [encoding=ec]
\definefontsynonym [ec-utmbi8a]                [ptmbi8t] [encoding=ec]

\definefontsynonym [ec-utmr8a-slanted-167]     [ptmro8t] [encoding=ec]
\definefontsynonym [ec-utmb8a-slanted-167]     [ptmbo8t] [encoding=ec]

\definefontsynonym [ec-uhvr8a]                 [phvr8t]  [encoding=ec]
\definefontsynonym [ec-uhvro8a]                [phvro8t] [encoding=ec]
\definefontsynonym [ec-uhvb8a]                 [phvb8t]  [encoding=ec]
\definefontsynonym [ec-uhvbo8a]                [phvbo8t] [encoding=ec]

\definefontsynonym [ec-ucrr8a]                 [pcrr8t]  [encoding=ec]
\definefontsynonym [ec-ucrb8a]                 [pcrb8t]  [encoding=ec]
\definefontsynonym [ec-ucrro8a]                [pcrro8t] [encoding=ec]
\definefontsynonym [ec-ucrbo8a]                [pcrbo8t] [encoding=ec]

\definefontsynonym [ec-uplr8a]                 [pplr8t]  [encoding=ec]
\definefontsynonym [ec-uplri8a]                [pplri8t] [encoding=ec]
\definefontsynonym [ec-uplb8a]                 [pplb8t]  [encoding=ec]
\definefontsynonym [ec-uplbi8a]                [pplbi8t] [encoding=ec]
\definefontsynonym [ec-uplr8a-slanted-167]     [pplro8t] [encoding=ec]
\definefontsynonym [ec-uplb8a-slanted-167]     [pplbo8t] [encoding=ec]
\definefontsynonym [ec-uplr8a-capitalized-800] [pplr8t]  [encoding=ec]

\definefontsynonym [ec-ubkl8a]                 [pbkl8t]  [encoding=ec]
\definefontsynonym [ec-ubkli8a]                [pbkli8t] [encoding=ec]
\definefontsynonym [ec-ubkd8a]                 [pbkd8t]  [encoding=ec]
\definefontsynonym [ec-ubkdi8a]                [pbkdi8t] [encoding=ec]
\definefontsynonym [ec-ubkl8a-slanted-167]     [pbklo8t] [encoding=ec]
\definefontsynonym [ec-ubkd8a-slanted-167]     [pbkdo8t] [encoding=ec]
\definefontsynonym [ec-ubkl8a-capitalized-800] [pbkl8t]  [encoding=ec]

\definefontsynonym [ec-uzcmi8a]                [pzcmi8t] [encoding=ec]

\definefontsynonym [ec-putr8a]                 [putr8t]  [encoding=ec]
\definefontsynonym [ec-putri8a]                [putri8t] [encoding=ec]
\definefontsynonym [ec-putb8a]                 [putr8t]  [encoding=ec]
\definefontsynonym [ec-putbi8a]                [putbi8t] [encoding=ec]
\definefontsynonym [ec-putr8a-slanted-167]     [putro8t] [encoding=ec]
\definefontsynonym [ec-putb8a-slanted-167]     [putbo8t] [encoding=ec]
\definefontsynonym [ec-putr8a-capitalized-800] [putr8t]  [encoding=ec]

\definefontsynonym [ec-bchr8a]                 [bchr8t]  [encoding=ec]
\definefontsynonym [ec-bchri8a]                [bchri8t] [encoding=ec]
\definefontsynonym [ec-bchb8a]                 [bchb8t]  [encoding=ec]
\definefontsynonym [ec-bchbi8a]                [bchbi8t] [encoding=ec]
\definefontsynonym [ec-bchr8a-slanted-167]     [bchro8t] [encoding=ec]
\definefontsynonym [ec-bchb8a-slanted-167]     [bchbo8t] [encoding=ec]
\definefontsynonym [ec-bchr8a-capitalized-800] [bchr8t]  [encoding=ec]

\stoptypescript

% the following fonts are normally not present on tex live

\starttypescript [berry] [texnansi]

% \setupencoding[default=texnansi]

%\definefontsynonym [texnansi-utmr8a]                 [ptmr8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-utmri8a]                [ptmri8y] [encoding=texnansi]
%\definefontsynonym [texnansi-utmb8a]                 [ptmb8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-utmbi8a]                [ptmbi8y] [encoding=texnansi]

%\definefontsynonym [texnansi-utmr8a-slanted-167]     [ptmro8y] [encoding=texnansi]
%\definefontsynonym [texnansi-utmb8a-slanted-167]     [ptmbo8y] [encoding=texnansi]

%\definefontsynonym [texnansi-uhvr8a]                 [phvr8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-uhvro8a]                [phvro8y] [encoding=texnansi]
%\definefontsynonym [texnansi-uhvb8a]                 [phvb8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-uhvbo8a]                [phvbo8y] [encoding=texnansi]

%\definefontsynonym [texnansi-ucrr8a]                 [pcrr8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-ucrb8a]                 [pcrb8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-ucrro8a]                [pcrro8y] [encoding=texnansi]
%\definefontsynonym [texnansi-ucrbo8a]                [pcrbo8y] [encoding=texnansi]

%\definefontsynonym [texnansi-uplr8a]                 [pplr8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-uplri8a]                [pplri8y] [encoding=texnansi]
%\definefontsynonym [texnansi-uplb8a]                 [pplb8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-uplbi8a]                [pplbi8y] [encoding=texnansi]
%\definefontsynonym [texnansi-uplr8a-slanted-167]     [pplro8y] [encoding=texnansi]
%\definefontsynonym [texnansi-uplb8a-slanted-167]     [pplbo8y] [encoding=texnansi]
%\definefontsynonym [texnansi-uplr8a-capitalized-800] [pplr8y]  [encoding=texnansi]

%\definefontsynonym [texnansi-ubkl8a]                 [pbkl8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-ubkli8a]                [pbkli8y] [encoding=texnansi]
%\definefontsynonym [texnansi-ubkd8a]                 [pbkd8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-ubkdi8a]                [pbkdi8y] [encoding=texnansi]
%\definefontsynonym [texnansi-ubkl8a-slanted-167]     [pbklo8y] [encoding=texnansi]
%\definefontsynonym [texnansi-ubkd8a-slanted-167]     [pbkdo8y] [encoding=texnansi]
%\definefontsynonym [texnansi-ubkl8a-capitalized-800] [pbkl8y]  [encoding=texnansi]

%\definefontsynonym [texnansi-uzcmi8a]                [pzcmi8y] [encoding=texnansi]

%\definefontsynonym [texnansi-putr8a]                 [putr8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-putri8a]                [putri8y] [encoding=texnansi]
%\definefontsynonym [texnansi-putb8a]                 [putr8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-putbi8a]                [putbi8y] [encoding=texnansi]
%\definefontsynonym [texnansi-putr8a-slanted-167]     [putro8y] [encoding=texnansi]
%\definefontsynonym [texnansi-putb8a-slanted-167]     [putbo8y] [encoding=texnansi]
%\definefontsynonym [texnansi-putr8a-capitalized-800] [putr8y]  [encoding=texnansi]

%\definefontsynonym [texnansi-bchr8a]                 [bchr8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-bchri8a]                [bchri8y] [encoding=texnansi]
%\definefontsynonym [texnansi-bchb8a]                 [bchb8y]  [encoding=texnansi]
%\definefontsynonym [texnansi-bchbi8a]                [bchbi8y] [encoding=texnansi]
%\definefontsynonym [texnansi-bchr8a-slanted-167]     [bchro8y] [encoding=texnansi]
%\definefontsynonym [texnansi-bchb8a-slanted-167]     [bchbo8y] [encoding=texnansi]
%\definefontsynonym [texnansi-bchr8a-capitalized-800] [bchr8y]  [encoding=texnansi]

%\stoptypescript


\starttypescript [berry] [t5]

% \setupencoding[default=t5]

\definefontsynonym [t5-utmr8a]                 [ptmr8v]  [encoding=t5]
\definefontsynonym [t5-utmri8a]                [ptmri8v] [encoding=t5]
\definefontsynonym [t5-utmb8a]                 [ptmb8v]  [encoding=t5]
\definefontsynonym [t5-utmbi8a]                [ptmbi8v] [encoding=t5]

\definefontsynonym [t5-utmr8a-slanted-167]     [ptmro8v] [encoding=t5]
\definefontsynonym [t5-utmb8a-slanted-167]     [ptmbo8v] [encoding=t5]

\definefontsynonym [t5-uhvr8a]                 [phvr8v]  [encoding=t5]
\definefontsynonym [t5-uhvro8a]                [phvro8v] [encoding=t5]
\definefontsynonym [t5-uhvb8a]                 [phvb8v]  [encoding=t5]
\definefontsynonym [t5-uhvbo8a]                [phvbo8v] [encoding=t5]

\definefontsynonym [t5-ucrr8a]                 [pcrr8v]  [encoding=t5]
\definefontsynonym [t5-ucrb8a]                 [pcrb8v]  [encoding=t5]
\definefontsynonym [t5-ucrro8a]                [pcrro8v] [encoding=t5]
\definefontsynonym [t5-ucrbo8a]                [pcrbo8v] [encoding=t5]

\definefontsynonym [t5-uplr8a]                 [pplr8v]  [encoding=t5]
\definefontsynonym [t5-uplri8a]                [pplri8v] [encoding=t5]
\definefontsynonym [t5-uplb8a]                 [pplb8v]  [encoding=t5]
\definefontsynonym [t5-uplbi8a]                [pplbi8v] [encoding=t5]
\definefontsynonym [t5-uplr8a-slanted-167]     [pplro8v] [encoding=t5]
\definefontsynonym [t5-uplb8a-slanted-167]     [pplbo8v] [encoding=t5]
\definefontsynonym [t5-uplr8a-capitalized-800] [pplr8v]  [encoding=t5]

\definefontsynonym [t5-ubkl8a]                 [pbkl8v]  [encoding=t5]
\definefontsynonym [t5-ubkli8a]                [pbkli8v] [encoding=t5]
\definefontsynonym [t5-ubkd8a]                 [pbkd8v]  [encoding=t5]
\definefontsynonym [t5-ubkdi8a]                [pbkdi8v] [encoding=t5]
\definefontsynonym [t5-ubkl8a-slanted-167]     [pbklo8v] [encoding=t5]
\definefontsynonym [t5-ubkd8a-slanted-167]     [pbkdo8v] [encoding=t5]
\definefontsynonym [t5-ubkl8a-capitalized-800] [pbkl8v]  [encoding=t5]

\stoptypescript

\stoptypescriptcollection

\endinput
