%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]                 [utmr8r]  [encoding=8r]
\definefontsynonym [8r-utmri8a]                [utmri8r] [encoding=8r]
\definefontsynonym [8r-utmb8a]                 [utmb8r]  [encoding=8r]
\definefontsynonym [8r-utmbi8a]                [utmbi8r] [encoding=8r]

\definefontsynonym [8r-utmr8a-slanted-167]     [utmro8r] [encoding=8r]
\definefontsynonym [8r-utmb8a-slanted-167]     [utmbo8r] [encoding=8r]

\definefontsynonym [8r-uhvr8a]                 [uhvr8r]  [encoding=8r]
\definefontsynonym [8r-uhvro8a]                [uhvro8r] [encoding=8r]
\definefontsynonym [8r-uhvb8a]                 [uhvb8r]  [encoding=8r]
\definefontsynonym [8r-uhvbo8a]                [uhvbo8r] [encoding=8r]

\definefontsynonym [8r-ucrr8a]                 [ucrr8r]  [encoding=8r]
\definefontsynonym [8r-ucrb8a]                 [ucrb8r]  [encoding=8r]
\definefontsynonym [8r-ucrro8a]                [ucrro8r] [encoding=8r]
\definefontsynonym [8r-ucrbo8a]                [ucrbo8r] [encoding=8r]

\definefontsynonym [8r-uplr8a]                 [uplr8r]  [encoding=8r]
\definefontsynonym [8r-uplri8a]                [uplri8r] [encoding=8r]
\definefontsynonym [8r-uplb8a]                 [uplb8r]  [encoding=8r]
\definefontsynonym [8r-uplbi8a]                [uplbi8r] [encoding=8r]
\definefontsynonym [8r-uplr8a-slanted-167]     [uplro8r] [encoding=8r]
\definefontsynonym [8r-uplb8a-slanted-167]     [uplbo8r] [encoding=8r]
\definefontsynonym [8r-uplr8a-capitalized-800] [uplr8r]  [encoding=8r]

\definefontsynonym [8r-ubkl8a]                 [ubkl8r]  [encoding=8r]
\definefontsynonym [8r-ubkli8a]                [ubkli8r] [encoding=8r]
\definefontsynonym [8r-ubkd8a]                 [ubkd8r]  [encoding=8r]
\definefontsynonym [8r-ubkdi8a]                [ubkdi8r] [encoding=8r]
\definefontsynonym [8r-ubkl8a-slanted-167]     [ubklo8r] [encoding=8r]
\definefontsynonym [8r-ubkd8a-slanted-167]     [ubkdo8r] [encoding=8r]
\definefontsynonym [8r-ubkl8a-capitalized-800] [ubkl8r]  [encoding=8r]

\definefontsynonym [8r-uzcmi8a]                [uzcmi8r] [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]                 [utmr8t]  [encoding=ec]
\definefontsynonym [ec-utmri8a]                [utmri8t] [encoding=ec]
\definefontsynonym [ec-utmb8a]                 [utmb8t]  [encoding=ec]
\definefontsynonym [ec-utmbi8a]                [utmbi8t] [encoding=ec]

\definefontsynonym [ec-utmr8a-slanted-167]     [utmro8t] [encoding=ec]
\definefontsynonym [ec-utmb8a-slanted-167]     [utmbo8t] [encoding=ec]

\definefontsynonym [ec-uhvr8a]                 [uhvr8t]  [encoding=ec]
\definefontsynonym [ec-uhvro8a]                [uhvro8t] [encoding=ec]
\definefontsynonym [ec-uhvb8a]                 [uhvb8t]  [encoding=ec]
\definefontsynonym [ec-uhvbo8a]                [uhvbo8t] [encoding=ec]

\definefontsynonym [ec-ucrr8a]                 [ucrr8t]  [encoding=ec]
\definefontsynonym [ec-ucrb8a]                 [ucrb8t]  [encoding=ec]
\definefontsynonym [ec-ucrro8a]                [ucrro8t] [encoding=ec]
\definefontsynonym [ec-ucrbo8a]                [ucrbo8t] [encoding=ec]

\definefontsynonym [ec-uplr8a]                 [uplr8t]  [encoding=ec]
\definefontsynonym [ec-uplri8a]                [uplri8t] [encoding=ec]
\definefontsynonym [ec-uplb8a]                 [uplb8t]  [encoding=ec]
\definefontsynonym [ec-uplbi8a]                [uplbi8t] [encoding=ec]
\definefontsynonym [ec-uplr8a-slanted-167]     [uplro8t] [encoding=ec]
\definefontsynonym [ec-uplb8a-slanted-167]     [uplbo8t] [encoding=ec]
\definefontsynonym [ec-uplr8a-capitalized-800] [uplr8t]  [encoding=ec]

\definefontsynonym [ec-ubkl8a]                 [ubkl8t]  [encoding=ec]
\definefontsynonym [ec-ubkli8a]                [ubkli8t] [encoding=ec]
\definefontsynonym [ec-ubkd8a]                 [ubkd8t]  [encoding=ec]
\definefontsynonym [ec-ubkdi8a]                [ubkdi8t] [encoding=ec]
\definefontsynonym [ec-ubkl8a-slanted-167]     [ubklo8t] [encoding=ec]
\definefontsynonym [ec-ubkd8a-slanted-167]     [ubkdo8t] [encoding=ec]
\definefontsynonym [ec-ubkl8a-capitalized-800] [ubkl8t]  [encoding=ec]

\definefontsynonym [ec-uzcmi8a]                [uzcmi8t] [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]                 [utmr8y]  [encoding=texnansi]
\definefontsynonym [texnansi-utmri8a]                [utmri8y] [encoding=texnansi]
\definefontsynonym [texnansi-utmb8a]                 [utmb8y]  [encoding=texnansi]
\definefontsynonym [texnansi-utmbi8a]                [utmbi8y] [encoding=texnansi]

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

\definefontsynonym [texnansi-uhvr8a]                 [uhvr8y]  [encoding=texnansi]
\definefontsynonym [texnansi-uhvro8a]                [uhvro8y] [encoding=texnansi]
\definefontsynonym [texnansi-uhvb8a]                 [uhvb8y]  [encoding=texnansi]
\definefontsynonym [texnansi-uhvbo8a]                [uhvbo8y] [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]                 [uplr8y]  [encoding=texnansi]
\definefontsynonym [texnansi-uplri8a]                [uplri8y] [encoding=texnansi]
\definefontsynonym [texnansi-uplb8a]                 [uplb8y]  [encoding=texnansi]
\definefontsynonym [texnansi-uplbi8a]                [uplbi8y] [encoding=texnansi]
\definefontsynonym [texnansi-uplr8a-slanted-167]     [uplro8y] [encoding=texnansi]
\definefontsynonym [texnansi-uplb8a-slanted-167]     [uplbo8y] [encoding=texnansi]
\definefontsynonym [texnansi-uplr8a-capitalized-800] [uplr8y]  [encoding=texnansi]

\definefontsynonym [texnansi-ubkl8a]                 [ubkl8y]  [encoding=texnansi]
\definefontsynonym [texnansi-ubkli8a]                [ubkli8y] [encoding=texnansi]
\definefontsynonym [texnansi-ubkd8a]                 [ubkd8y]  [encoding=texnansi]
\definefontsynonym [texnansi-ubkdi8a]                [ubkdi8y] [encoding=texnansi]
\definefontsynonym [texnansi-ubkl8a-slanted-167]     [ubklo8y] [encoding=texnansi]
\definefontsynonym [texnansi-ubkd8a-slanted-167]     [ubkdo8y] [encoding=texnansi]
\definefontsynonym [texnansi-ubkl8a-capitalized-800] [ubkl8y]  [encoding=texnansi]

\definefontsynonym [texnansi-uzcmi8a]                [uzcmi8y] [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]                 [utmr8v]  [encoding=t5]
\definefontsynonym [t5-utmri8a]                [utmri8v] [encoding=t5]
\definefontsynonym [t5-utmb8a]                 [utmb8v]  [encoding=t5]
\definefontsynonym [t5-utmbi8a]                [utmbi8v] [encoding=t5]

\definefontsynonym [t5-utmr8a-slanted-167]     [utmro8v] [encoding=t5]
\definefontsynonym [t5-utmb8a-slanted-167]     [utmbo8v] [encoding=t5]

\definefontsynonym [t5-uhvr8a]                 [uhvr8v]  [encoding=t5]
\definefontsynonym [t5-uhvro8a]                [uhvro8v] [encoding=t5]
\definefontsynonym [t5-uhvb8a]                 [uhvb8v]  [encoding=t5]
\definefontsynonym [t5-uhvbo8a]                [uhvbo8v] [encoding=t5]

\definefontsynonym [t5-ucrr8a]                 [ucrr8v]  [encoding=t5]
\definefontsynonym [t5-ucrb8a]                 [ucrb8v]  [encoding=t5]
\definefontsynonym [t5-ucrro8a]                [ucrro8v] [encoding=t5]
\definefontsynonym [t5-ucrbo8a]                [ucrbo8v] [encoding=t5]

\definefontsynonym [t5-uplr8a]                 [uplr8v]  [encoding=t5]
\definefontsynonym [t5-uplri8a]                [uplri8v] [encoding=t5]
\definefontsynonym [t5-uplb8a]                 [uplb8v]  [encoding=t5]
\definefontsynonym [t5-uplbi8a]                [uplbi8v] [encoding=t5]
\definefontsynonym [t5-uplr8a-slanted-167]     [uplro8v] [encoding=t5]
\definefontsynonym [t5-uplb8a-slanted-167]     [uplbo8v] [encoding=t5]
\definefontsynonym [t5-uplr8a-capitalized-800] [uplr8v]  [encoding=t5]

\definefontsynonym [t5-ubkl8a]                 [ubkl8v]  [encoding=t5]
\definefontsynonym [t5-ubkli8a]                [ubkli8v] [encoding=t5]
\definefontsynonym [t5-ubkd8a]                 [ubkd8v]  [encoding=t5]
\definefontsynonym [t5-ubkdi8a]                [ubkdi8v] [encoding=t5]
\definefontsynonym [t5-ubkl8a-slanted-167]     [ubklo8v] [encoding=t5]
\definefontsynonym [t5-ubkd8a-slanted-167]     [ubkdo8v] [encoding=t5]
\definefontsynonym [t5-ubkl8a-capitalized-800] [ubkl8v]  [encoding=t5]

\stoptypescript

\stoptypescriptcollection

\endinput
