%D \module
%D   [       file=type-siz,
%D        version=2001.04.12,
%D          title=\CONTEXT\ Typescript Macros,
%D       subtitle=Sizing 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.

\unprotect

\starttypescript [serif] [default] [size]
  \definebodyfont
    [4pt,5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,14.4pt,17.3pt]
    [rm] [default]
\stoptypescript

\starttypescript [sans] [default] [size]
  \definebodyfont
    [4pt,5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,14.4pt,17.3pt]
    [ss] [default]
\stoptypescript

\starttypescript [mono] [default] [size]
  \definebodyfont
    [4pt,5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,14.4pt,17.3pt]
    [tt] [default]
\stoptypescript

\starttypescript [math,boldmath] [default] [size]
  \definebodyfont
    [4pt,5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,14.4pt,17.3pt]
    [mm] [default]
\stoptypescript

\starttypescript [bfmath] [default] [size]
  \definebodyfont
    [4pt,5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,14.4pt,17.3pt]
    [mm] [bfmath]
\stoptypescript

\starttypescript [handwriting] [default] [size]
  \definebodyfont
    [4pt,5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,14.4pt,17.3pt]
    [hw] [default]
\stoptypescript

\starttypescript [calligraphy] [default] [size]
  \definebodyfont
    [4pt,5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,14.4pt,17.3pt]
    [cg] [default]
\stoptypescript

\starttypescript [casual] [default] [size] % maps onto rm !
  \definebodyfont
    [4pt,5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,14.4pt,17.3pt]
    [rm] [default]
\stoptypescript

\starttypescript [all] [dtp] [size]

\definebodyfontenvironment
  [4pt]
  [        \s!text=4pt, \s!script=4pt, \s!scriptscript=4pt,
              \c!x=4pt,     \c!xx=4pt,
          \c!groot=6pt,  \c!klein=4pt]

\definebodyfontenvironment
  [5pt]
  [        \s!text=5pt, \s!script=5pt, \s!scriptscript=5pt,
              \c!x=5pt,     \c!xx=5pt,
          \c!groot=7pt,  \c!klein=5pt]

\definebodyfontenvironment
  [6pt]
  [        \s!text=6pt, \s!script=5pt, \s!scriptscript=5pt,
              \c!x=5pt,     \c!xx=5pt,
          \c!groot=8pt,  \c!klein=5pt]

\definebodyfontenvironment
  [7pt]
  [        \s!text=7pt, \s!script=6pt, \s!scriptscript=5pt,
              \c!x=6pt,     \c!xx=5pt,
          \c!groot=9pt,  \c!klein=5pt]

\definebodyfontenvironment
  [8pt]
  [        \s!text=8pt, \s!script=6pt, \s!scriptscript=5pt,
              \c!x=6pt,     \c!xx=5pt,
          \c!groot=10pt, \c!klein=6pt]

\definebodyfontenvironment
  [9pt]
  [        \s!text=9pt, \s!script=7pt, \s!scriptscript=5pt,
              \c!x=7pt,     \c!xx=5pt,
          \c!groot=11pt, \c!klein=7pt]

\definebodyfontenvironment
  [10pt]
  [        \s!text=10pt, \s!script=7pt, \s!scriptscript=5pt,
              \c!x=8pt,      \c!xx=6pt,
          \c!groot=12pt,  \c!klein=8pt]

\definebodyfontenvironment
  [11pt]
  [        \s!text=11pt, \s!script=8pt, \s!scriptscript=6pt,
              \c!x=9pt,      \c!xx=7pt,
          \c!groot=13pt,  \c!klein=9pt]

\definebodyfontenvironment
  [12pt]
  [        \s!text=12pt, \s!script=9pt, \s!scriptscript=7pt,
              \c!x=10pt,     \c!xx=8pt,
          \c!groot=14pt,  \c!klein=10pt]

\definebodyfontenvironment
  [13pt]
  [        \s!text=13pt, \s!script=10pt, \s!scriptscript=8pt,
              \c!x=11pt,     \c!xx=9pt,
          \c!groot=16pt,  \c!klein=11pt]

\definebodyfontenvironment
  [14pt]
  [        \s!text=14pt, \s!script=10pt, \s!scriptscript=7pt,
              \c!x=12pt,     \c!xx=10pt,
          \c!groot=16pt,  \c!klein=12pt]

\definebodyfontenvironment
  [16pt]
  [        \s!text=16pt, \s!script=12pt, \s!scriptscript=9pt,
              \c!x=13pt,     \c!xx=11pt,
          \c!groot=18pt,  \c!klein=14pt]

\stoptypescript

\starttypescript [serif] [dtp] [size]
  \definebodyfont
    [5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,13pt,14pt,16pt,18pt,22pt,28pt]
    [rm] [default]
\stoptypescript

\starttypescript [sans] [dtp] [size]
  \definebodyfont
    [5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,13pt,14pt,16pt,18pt,22pt,28pt]
    [ss] [default]
\stoptypescript

\starttypescript [mono] [dtp] [size]
  \definebodyfont
    [5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,13pt,14pt,16pt,18pt,22pt,28pt]
    [tt] [default]
\stoptypescript

\starttypescript [math,boldmath] [dtp] [size]
  \definebodyfont
    [5pt,6pt,7pt,8pt,9pt,10pt,11pt,12pt,13pt,14pt,16pt,18pt,22pt,28pt]
    [mm] [default]
\stoptypescript

% cmr

\starttypescript [serif] [computer-modern] [size]

\definebodyfont [12pt] [rm]
  [tf=cmr12,
   bf=cmbx12,
   it=cmti12,
   sl=cmsl12,
   bi=cmbxti10 at 12pt,
   bs=cmbxsl10 at 12pt,
   sc=cmcsc10 at 12pt]

\definebodyfont [11pt] [rm]
  [tf=cmr10 at 11pt,
   bf=cmbx10 at 11pt,
   sl=cmsl10 at 11pt,
   it=cmti10 at 11pt,
   bi=cmbxti10 at 11pt,
   bs=cmbxsl10 at 11pt,
   sc=cmcsc10 at 11pt]

\definebodyfont [10pt] [rm]
  [tf=cmr10,
   bf=cmbx10,
   it=cmti10,
   sl=cmsl10,
   bi=cmbxti10,
   bs=cmbxsl10,
   sc=cmcsc10]

\definebodyfont [9pt] [rm]
  [tf=cmr9,
   bf=cmbx9,
   it=cmti9,
   sl=cmsl9,
   bi=cmbxti10 at 9pt,
   bs=cmbxsl10 at 9pt,
   sc=cmcsc10 at 9pt]

\definebodyfont [8pt] [rm]
  [tf=cmr8,
   bf=cmbx8,
   it=cmti8,
   sl=cmsl8,
   bi=cmbxti10 at 8pt,
   bs=cmbxsl10 at 8pt,
   sc=cmcsc10 at 8pt]

\definebodyfont [7pt] [rm]
  [tf=cmr7,
   bf=cmbx7,
   it=cmti10 at 7pt,
   sl=cmsl10 at 7pt,
   bi=cmbxti10 at 7pt,
   bs=cmbxsl10 at 7pt,
   sc=cmcsc10 at 7pt]

\definebodyfont [6pt] [rm]
  [tf=cmr6,
   bf=cmbx6,
   it=cmti10 at 6pt,
   sl=cmsl10 at 6pt,
   bi=cmbxti10 at 6pt,
   bs=cmbxsl10 at 6pt,
   sc=cmcsc10 at 6pt]

\definebodyfont [5pt] [rm]
  [tf=cmr5,
   bf=cmbx5,
   it=cmti10 at 5pt,
   sl=cmsl10 at 5pt,
   bi=cmbxti10 at 5pt,
   bs=cmbxsl10 at 5pt,
   sc=cmcsc10 at 5pt]

\definebodyfont [4pt] [rm]
  [tf=cmr10 at 4pt,
   bf=cmbx10 at 4pt,
   it=cmti10 at 4pt,
   sl=cmsl10 at 4pt,
   bi=cmbxti10 at 4pt,
   bs=cmbxsl10 at 4pt,
   sc=cmr10 at 4pt]

\definebodyfont [14.4pt,17.3pt,20.7pt] [rm]
  [tf=cmr12 sa 1,
   bf=cmbx12 sa 1,
   it=cmti12 sa 1,
   sl=cmsl12 sa 1,
   bi=cmbxti10 sa 1,
   bs=cmbxsl10 sa 1,
   sc=cmcsc10 sa 1]

\stoptypescript

\starttypescript [sans] [computer-modern] [size]

\definebodyfont [12pt] [ss]
  [tf=cmss12,
   bf=cmssbx10 at 12pt,
   it=cmssi12,
   sl=cmssi12,
   bi=cmssbx10 at 12pt,
   bs=cmssbx10 at 12pt,
   sc=cmss10 at 12pt]

\definebodyfont [11pt] [ss]
  [tf=cmss10 at 11pt,
   bf=cmssbx10 at 11pt,
   it=cmssi10 at 11pt,
   sl=cmssi10 at 11pt,
   bi=cmssbx10 at 11pt,
   bs=cmssbx10 at 11pt,
   sc=cmss10 at 11pt]

\definebodyfont [10pt] [ss]
  [tf=cmss10,
   bf=cmssbx10,
   it=cmssi10,
   sl=cmssi10,
   bi=cmssbx10,
   bs=cmssbx10,
   sc=cmss10]

\definebodyfont [9pt] [ss]
  [tf=cmss9,
   bf=cmssbx10 at 9pt,
   it=cmssi9,
   sl=cmssi9,
   bi=cmssbx10 at 9pt,
   bs=cmssbx10 at 9pt,
   sc=cmss9]

\definebodyfont [8pt] [ss]
  [tf=cmss8,
   bf=cmssbx10 at 8pt,
   it=cmssi8,
   sl=cmssi8,
   bi=cmssbx10 at 8pt,
   bs=cmssbx10 at 8pt,
   sc=cmss8]

\definebodyfont [7pt] [ss]
  [tf=cmss10 at 7pt,
   bf=cmssbx10 at 7pt,
   it=cmssi10 at 7pt,
   sl=cmssi10 at 7pt,
   bs=cmssbx10 at 7pt,
   bi=cmssbx10 at 7pt,
   sc=cmss10 at 7pt]

\definebodyfont [6pt] [ss]
  [tf=cmss10 at 6pt,
   bf=cmssbx10 at 6pt,
   it=cmssi10 at 6pt,
   sl=cmssi10 at 6pt,
   bs=cmssbx10 at 6pt,
   bi=cmssbx10 at 6pt,
   sc=cmss10 at 6pt]

\definebodyfont [5pt] [ss]
  [tf=cmss10 at 5pt,
   bf=cmssbx10 at 5pt,
   it=cmssi10 at 5pt,
   sl=cmssi10 at 5pt,
   bs=cmssbx10 at 5pt,
   bi=cmssbx10 at 5pt,
   sc=cmss10 at 5pt]

\definebodyfont [4pt] [ss]
  [tf=cmss10 at 4pt,
   bf=cmssbx10 at 4pt,
   it=cmssi10 at 4pt,
   sl=cmssi10 at 4pt,
   bs=cmssbx10 at 4pt,
   bi=cmssbx10 at 4pt,
   sc=cmss10 at 4pt]

\definebodyfont [14.4pt,17.3pt,20.7pt] [ss]
  [tf=cmss12 sa 1,
   bf=cmssbx10 sa 1,
   it=cmssi12 sa 1,
   sl=cmssi12 sa 1,
   bi=cmssbx10 sa 1,
   bs=cmssbx10 sa 1,
   sc=cmss12 sa 1]

\stoptypescript

\starttypescript [mono] [computer-modern] [size]

\definebodyfont [12pt] [tt]
  [tf=cmtt12,
   sl=cmsltt10 at 12pt,
   it=cmitt10 at 12pt]

\definebodyfont [11pt] [tt]
  [tf=cmtt10 at 11pt,
   sl=cmsltt10 at 11pt,
   it=cmitt10 at 11pt]

\definebodyfont [10pt] [tt]
  [tf=cmtt10,
   sl=cmsltt10,
   it=cmitt10]

\definebodyfont [9pt] [tt]
  [tf=cmtt9,
   sl=cmsltt10 at 9pt,
   it=cmitt10 at 9pt]

\definebodyfont [8pt] [tt]
  [tf=cmtt8,
   sl=cmsltt10 at 8pt,
   it=cmitt10 at 8pt]

\definebodyfont [7pt] [tt]
  [tf=cmtt10 at 7pt,
   sl=cmsltt10 at 7pt,
   it=cmitt10 at 7pt]

\definebodyfont [6pt] [tt]
  [tf=cmtt10 at 6pt,
   sl=cmsltt10 at 6pt,
   it=cmitt10 at 6pt]

\definebodyfont [5pt] [tt]
  [tf=cmtt10 at 5pt,
   sl=cmsltt10 at 5pt,
   it=cmitt10 at 5pt]

\definebodyfont [4pt] [tt]
  [tf=cmtt10 at 4pt,
   sl=cmsltt10 at 4pt,
   it=cmitt10 at 4pt]

\definebodyfont [14.4pt,17.3pt,20.7pt] [tt]
  [tf=cmtt12 sa 1,
   sl=cmsltt10 sa 1,
   it=cmitt10 sa 1]

\stoptypescript

\starttypescript [math] [computer-modern] [size]

% hack to prevent mapping of filenames, watch the space!

\definefontsynonym[xcmr12][cmr12 ]
\definefontsynonym[xcmr10][cmr10 ]
\definefontsynonym[xcmr9] [cmr9 ]
\definefontsynonym[xcmr8] [cmr8 ]
\definefontsynonym[xcmr7] [cmr7 ]
\definefontsynonym[xcmr6] [cmr6 ]
\definefontsynonym[xcmr5] [cmr5 ]

\definebodyfont [12pt] [mm]
  [mr=xcmr12,
   ex=cmex10 at 12pt,
   mi=cmmi12,
   sy=cmsy10 at 12pt]

\definebodyfont [11pt] [mm]
  [mr=xcmr10 at 11pt,
   ex=cmex10 at 11pt,
   mi=cmmi10 at 11pt,
   sy=cmsy10 at 11pt]

\definebodyfont [10pt] [mm]
  [mr=xcmr10,
   ex=cmex10,
   mi=cmmi10,
   sy=cmsy10]

\definebodyfont [9pt] [mm]
  [mr=xcmr9,
   ex=cmex10 at 9pt,
   mi=cmmi9,
   sy=cmsy9]

\definebodyfont [8pt] [mm]
  [mr=xcmr8,
   ex=cmex10 at 8pt,
   mi=cmmi8,
   sy=cmsy8]

\definebodyfont [7pt] [mm]
  [mr=xcmr7,
   ex=cmex10 at 7pt,
   mi=cmmi7,
   sy=cmsy7]

\definebodyfont [6pt] [mm]
  [mr=xcmr6,
   ex=cmex10 at 6pt,
   mi=cmmi6,
   sy=cmsy6]

\definebodyfont [5pt] [mm]
  [mr=xcmr5,
   ex=cmex10 at 5pt,
   mi=cmmi5,
   sy=cmsy5]

\definebodyfont [4pt] [mm]
  [mr=xcmr5 at 4pt,
   ex=cmex10 at 4pt,
   mi=cmmi5 at 4pt,
   sy=cmsy5 at 4pt]

\definebodyfont [14.4pt,17.3pt,20.7pt] [mm]
  [mr=xcmr12 sa 1,
   ex=cmex10 sa 1,
   mi=cmmi12 sa 1,
   sy=cmsy10 sa 1]

\stoptypescript

\starttypescript [serif] [concrete] [size]

\definebodyfont [10pt,11pt,12pt,14.4pt,17.3pt] [rm]
  [tf=ccr10 sa 1,
   it=ccti10 sa 1,
   sl=ccsl10 sa 1,
   sc=cccsc10 sa 1]

\definebodyfont [5pt,6pt,7pt,8pt,9pt] [rm]
  [it=ccr9 sa 1,
   sl=ccr9 sa 1,
   sc=ccr9 sa 1]

\definebodyfont [9pt] [rm] [tf=ccr9]
\definebodyfont [8pt] [rm] [tf=ccr8]
\definebodyfont [7pt] [rm] [tf=ccr7]
\definebodyfont [6pt] [rm] [tf=ccr6]
\definebodyfont [5pt] [rm] [tf=ccr5]

\stoptypescript

% \starttypescript [serif] [fourier] [size] % experimental

%   \definebodyfont
%     [17.3pt,14.4pt,12pt,11pt,10pt,9pt,8pt,7pt,6pt,5pt,4pt]
%     [rm]
%     [bc=SerifBoldCaps sa 1,
%      bca=SerifBoldCaps sa a,
%      bcb=SerifBoldCaps sa b,
%      bcc=SerifBoldCaps sa c,
%      bcd=SerifBoldCaps sa d,
%      bcx=SerifBoldCaps sa x,
%      bcxx=SerifBoldCaps sa xx]

% \stoptypescript

% \starttypescript [serif] [fourier-expert] [size] % experimental

%   \definebodyfont
%     [17.3pt,14.4pt,12pt,11pt,10pt,9pt,8pt,7pt,6pt,5pt,4pt]
%     [rm]
%     [tf=Serif-Expert sa 1,
%      it=SerifItalic-Expert sa 1,
%      sl=SerifSlanted-Expert sa 1,
%      sc=SerifCaps-Expert sa 1,
%      db=SerifSemiBold-Expert sa 1,
%      dba=SerifSemiBold-Expert sa a,
%      dbb=SerifSemiBold-Expert sa b,
%      dbc=SerifSemiBold-Expert sa c,
%      dbd=SerifSemiBold-Expert sa d,
%      dbx=SerifSemiBold-Expert sa x,
%      dbxx=SerifSemiBold-Expert sa xx,
%      di=SerifSemiItalic-Expert sa 1,
%      dia=SerifSemiItalic-Expert sa a,
%      dib=SerifSemiItalic-Expert sa b,
%      dic=SerifSemiItalic-Expert sa c,
%      did=SerifSemiItalic-Expert sa d,
%      dix=SerifSemiItalic-Expert sa x,
%      dixx=SerifSemiItalic-Expert sa xx,
%      ds=SerifSemiSlanted-Expert sa 1,
%      dsa=SerifSemiSlanted-Expert sa a,
%      dsb=SerifSemiSlanted-Expert sa b,
%      dsc=SerifSemiSlanted-Expert sa c,
%      dsd=SerifSemiSlanted-Expert sa d,
%      dsx=SerifSemiSlanted-Expert sa x,
%      dsxx=SerifSemiSlanted-Expert sa xx,
%      dc=SerifSemiCaps-Expert sa 1,
%      dca=SerifSemiCaps-Expert sa a,
%      dcb=SerifSemiCaps-Expert sa b,
%      dcc=SerifSemiCaps-Expert sa c,
%      dcd=SerifSemiCaps-Expert sa d,
%      dcx=SerifSemiCaps-Expert sa x,
%      dcxx=SerifSemiCaps-Expert sa xx,
%      bf=SerifBold-Expert sa 1,
%      bi=SerifBoldItalic-Expert sa 1,
%      bs=SerifBoldSlanted-Expert sa 1,
%      eb=SerifBlack-Expert sa 1,
%      eba=SerifBlack-Expert sa a,
%      ebb=SerifBlack-Expert sa b,
%      ebc=SerifBlack-Expert sa c,
%      ebd=SerifBlack-Expert sa d,
%      ebx=SerifBlack-Expert sa x,
%      ebxx=SerifBlack-Expert sa xx]

% \stoptypescript

% \starttypescript [serif] [fourier-oldstyle] [size] % experimental

%   \definebodyfont
%     [17.3pt,14.4pt,12pt,11pt,10pt,9pt,8pt,7pt,6pt,5pt,4pt]
%     [rm]
%     [tf=Serif-OldStyle sa 1,
%      it=SerifItalic-OldStyle sa 1,
%      sl=SerifSlanted-OldStyle sa 1,
%      sc=SerifCaps-OldStyle sa 1,
%      db=SerifSemiBold-OldStyle sa 1,
%      dba=SerifSemiBold-OldStyle sa a,
%      dbb=SerifSemiBold-OldStyle sa b,
%      dbc=SerifSemiBold-OldStyle sa c,
%      dbd=SerifSemiBold-OldStyle sa d,
%      dbx=SerifSemiBold-OldStyle sa x,
%      dbxx=SerifSemiBold-OldStyle sa xx,
%      di=SerifSemiItalic-OldStyle sa 1,
%      dia=SerifSemiItalic-OldStyle sa a,
%      dib=SerifSemiItalic-OldStyle sa b,
%      dic=SerifSemiItalic-OldStyle sa c,
%      did=SerifSemiItalic-OldStyle sa d,
%      dix=SerifSemiItalic-OldStyle sa x,
%      dixx=SerifSemiItalic-OldStyle sa xx,
%      ds=SerifSemiSlanted-OldStyle sa 1,
%      dsa=SerifSemiSlanted-OldStyle sa a,
%      dsb=SerifSemiSlanted-OldStyle sa b,
%      dsc=SerifSemiSlanted-OldStyle sa c,
%      dsd=SerifSemiSlanted-OldStyle sa d,
%      dsx=SerifSemiSlanted-OldStyle sa x,
%      dsxx=SerifSemiSlanted-OldStyle sa xx,
%      dc=SerifSemiCaps-OldStyle sa 1,
%      dca=SerifSemiCaps-OldStyle sa a,
%      dcb=SerifSemiCaps-OldStyle sa b,
%      dcc=SerifSemiCaps-OldStyle sa c,
%      dcd=SerifSemiCaps-OldStyle sa d,
%      dcx=SerifSemiCaps-OldStyle sa x,
%      dcxx=SerifSemiCaps-OldStyle sa xx,
%      eb=SerifBlack-OldStyle sa 1,
%      eba=SerifBlack-OldStyle sa a,
%      ebb=SerifBlack-OldStyle sa b,
%      ebc=SerifBlack-OldStyle sa c,
%      ebd=SerifBlack-OldStyle sa d,
%      ebx=SerifBlack-OldStyle sa x,
%      ebxx=SerifBlack-OldStyle sa xx,
%      bf=SerifBold-OldStyle sa 1,
%      bi=SerifBoldItalic-OldStyle sa 1,
%      bs=SerifBoldSlanted-OldStyle sa 1]

% \stoptypescript

\starttypescript [math] [euler] [size]

\definebodyfont [12pt,11pt,10pt,9pt] [mm]
  [mi=eurm10 sa 1,
   ex=euex10 sa 1,
   ma=euex10 sa 1,
   mb=eusm10 sa 1,
   mc=eufm10 sa 1]

\definebodyfont [8pt,7pt,6pt,5pt] [mm]
  [ex=euex10 sa 1,
   ma=euex10 sa 1]

\definebodyfont [8pt,7pt,6pt] [mm]
  [mi=eurm7 sa 1,
   mb=eusm7 sa 1,
   mc=eufm7 sa 1]

\definebodyfont [5pt] [mm]
  [mi=eurm5,
   mb=eusm5,
   mc=eufm5]

\stoptypescript

\starttypescript [math] [ams] [size]
  \definebodyfont [17.3pt,14.4pt,12pt,11pt,10pt,9pt] [mm]
    [ma=msam10 sa 1,
     mb=msbm10 sa 1]
  \definebodyfont [8pt,7pt] [mm]
    [ma=msam7 sa 1,
     mb=msbm7 sa 1]
  \definebodyfont [6pt,5pt,4pt] [mm]
    [ma=msam5 sa 1,
     mb=msbm5 sa 1]
\stoptypescript

% math times

\starttypescript [math] [times] [size]

\mapfontsize [5pt]    [6.0pt]
\mapfontsize [6pt]    [6.8pt]
\mapfontsize [7pt]    [7.6pt]
\mapfontsize [8pt]    [8.4pt]
\mapfontsize [9pt]    [9.2pt]
\mapfontsize [10pt]   [10pt]
\mapfontsize [11pt]   [10.8pt]
\mapfontsize [12pt]   [11.6pt]
\mapfontsize [14.4pt] [13.2pt]

\stoptypescript

\protect \endinput
