DataMuseum.dk

top - metrics - download

    Length: 3104 (0xc20)
    Types: TextFile
    Names: »compute_sigma.mf«

└─⟦52210d11f⟧ Bits:30007239 EUUGD2: TeX 3 1992-12
    └─⟦c319c2751⟧ »unix3.0/TeX3.0.tar.Z« 
        └─⟦036c765ac⟧ 
            └─⟦this⟧ »TeX3.0/TeXcontrib/sauter/compute_sigma.mf« 
└─⟦060c9c824⟧ Bits:30007080 DKUUG TeX 2/12/89
    └─⟦this⟧ »./tex82/TeXcontrib/sauter/compute_sigma.mf« 
└─⟦52210d11f⟧ Bits:30007239 EUUGD2: TeX 3 1992-12
    └─⟦63303ae94⟧ »unix3.14/TeX3.14.tar.Z« 
        └─⟦c58930e5c⟧ 
            └─⟦this⟧ »TeX3.14/TeXcontrib/sauter/compute_sigma.mf« 

TextFile

% Compute and pass to MetaFont the font parameters sigma 8 through sigma 22.
% This is used by the math symbol fonts.

fontdimen 8:  % parameters $\sigma_8$ through $\sigma_{22}$ will now be listed
 math_axis#+3.51rth#+
    (if design_size <  9: (360)
                    else: ((design_size*180)-1260)fi)/360pt#+
    subs*desc_depth#,                                             % num1

 math_axis#+1.51rth#+
    (if design_size <  6: ((design_size*60)-270)
 elseif design_size <  7: ((design_size*30)-90)
 elseif design_size <  9: (-(design_size*design_size*30) +
                           (design_size*570) - 2400)
                    else: (300)fi)/360pt#,                        % num2

 math_axis#+1.51rth#+
    (if design_size <  7: ((design_size*50)-10)
 elseif design_size <  8: ((design_size*40)+60)
                    else: ((design_size*50)-20)fi)/360pt#,        % num3

 -(math_axis#-3.51rth#-subs*fig_height#+
    (if design_size <  6: (-(design_size*110)-80)
 elseif design_size <  8: (-(design_size*120)-20)
                    else: (-(design_size*130)+60)fi)/360pt#),     % denom1

 -(math_axis#-1.51rth#-subs*fig_height#-
    (if design_size <  6: ((design_size*60)-270)
 elseif design_size <  7: ((design_size*30)-90)
 elseif design_size <  9: (-(design_size*design_size*30) +
                           (design_size*570) - 2400)
                    else: (300)fi)/360pt#),                       % denom2

   ((if design_size <  8: ((design_size*50)+349)
 elseif design_size <  9: ((design_size*100)-51)
                    else: ((design_size*50)+399)fi)/100pt#) -
    subs*asc_height#,                                             % sup1

   ((if design_size <  8: ((design_size*50)+299)
 elseif design_size <  9: ((design_size*100)-101)
                    else: ((design_size*50)+349)fi)/100pt#) -
    subs*asc_height#,                                             % sup2

    (if design_size <  6: ((design_size*90)+80)
 elseif design_size <  8: ((design_size*100)+20)
                    else: ((design_size*110)-60)fi)/360pt#,       % sup3

    (if design_size <  9: (360)
                    else: ((design_size*180)-1260)fi)/360pt#,     % sub1

    (if design_size <  9: (72/36pt#)
                    else: -((((design_size*50)+349)/100pt#) -
    2subs*asc_height#-3.1rth#)fi),                                % sub2

 subs*asc_height#-36/36pt#,                                       % sup\_drop

 180/360pt#,                                                      % sub\_drop

    (if design_size <  6: ((design_size*20)-1)
 elseif design_size <  8: (119)
 elseif design_size <  9: ((design_size*120)-841)
 elseif design_size < 10: (239)
                    else: ((design_size*25)-11)fi)/10pt#,         % delim1

    (if design_size <  6: ((design_size*10)+21)
 elseif design_size <  7: (81)
 elseif design_size <  8: ((design_size*10)+11)
 elseif design_size <  9: (91)
 elseif design_size < 10: ((design_size*10)+1)
                    else: ((design_size*5)+51)fi)/10pt#,          % delim2

 math_axis#;                                                      % axis\_height