summaryrefslogtreecommitdiff
path: root/fonts/ec/src/txpseudo.mf
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /fonts/ec/src/txpseudo.mf
Initial commit
Diffstat (limited to 'fonts/ec/src/txpseudo.mf')
-rw-r--r--fonts/ec/src/txpseudo.mf66
1 files changed, 66 insertions, 0 deletions
diff --git a/fonts/ec/src/txpseudo.mf b/fonts/ec/src/txpseudo.mf
new file mode 100644
index 0000000000..40fdbe9683
--- /dev/null
+++ b/fonts/ec/src/txpseudo.mf
@@ -0,0 +1,66 @@
+% txpseudo.mf
+%
+%
+% (c) Copyright 1995, 1996, 1997 J"org Knappen
+%
+% This file is part of ecfonts version 1.0
+%
+% Please read the files 00readme.txt, 00inst.txt, 00error.txt, and
+% copyrite.txt for further information
+%
+% You find some documentation in ecdoc.tex (needs LaTeX2e)
+%
+% This file contains pseudoparameters which are not entered in the
+% parameter files, but are computed from the initial parameter set.
+% There are also ad hoc parameters needed only once, and scratch
+% parameters with different values at each occuerence (like |theta|).
+%
+
+version_check(1,0); % |version_check| was introduced in dc1.3
+
+% Diameters of dots
+
+numeric idot_diam#,udot_diam#,pdot_diam#;
+idot_diam#=max(dot_size#,cap_curve#); % dot of letters `i' and `j'
+udot_diam#=max(dot_size#,cap_curve#); % umlaut dots
+pdot_diam#=if monospace: 5/4 fi\\ dot_size#; % punctuation dots
+
+% |limit_dist| is used in |put_cross|
+% (the value of |u| is changed by |mono_adjust|, hence the global setting)
+
+vardef limit_dist=5/4u enddef;
+
+% More parametrisations for accents from csaccent.mf (csfonts):
+
+numeric uc_acc_height, uc_acc_height#,
+ lc_acute_height, lc_acute_height#,
+ lc_hachek_height, lc_hachek_height#,
+ accent_u, accent_u#,
+ accent_thin,
+ uc_acc_shift, asc_acc_shift;
+if unknown circ_weight: circ_weight:=1; fi
+
+uc_acc_height# = cap_height#+asc_height#-hi.x_height#;
+lc_acute_height# = asc_height#;
+lc_hachek_height# = hi.x_height#+acc_height#;
+accent_u# = u#; % unexpanded dimension unit
+
+vardef accent_thin = if thin_join > crisp: thin_join else: crisp+eps fi enddef;
+
+vardef uc_acc_shift = cap_height - hi.x_height enddef;
+vardef asc_acc_shift = asc_height - hi.x_height enddef;
+
+% Height of floating accents for capitals (note, that TeX raises them
+% by |uc_acc_shift|)
+
+numeric cap_accent_height, cap_accent_height#;
+cap_accent_height# = acc_height# + hi.x_height#;
+
+def pseudo_setup=
+ define_whole_blacker_pixels(idot_diam,udot_diam,pdot_diam);
+ define_whole_vertical_pixels(uc_acc_height,lc_acute_height,
+ lc_hachek_height);
+ define_pixels(accent_u);
+ define_whole_vertical_pixels(cap_accent_height);
+enddef;
+endinput;