summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/universa
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-09 23:38:21 +0000
committerKarl Berry <karl@freefriends.org>2006-01-09 23:38:21 +0000
commit215012a8d684889983ec2c0629e1c704e6853d9c (patch)
treeebf1271bd71869069824935ae8a5678745bf8bce /Master/texmf-dist/fonts/source/public/universa
parent1af3d19d6dbcbf309667d9cb4aa3cdda914914a9 (diff)
trunk/Master/texmf-dist/fonts/source
git-svn-id: svn://tug.org/texlive/trunk@101 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/universa')
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbc10.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbc12.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbc17.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbc8.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbc9.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbo10.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbo12.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbo17.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbo8.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbo9.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbr10.mf31
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbr12.mf31
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbr17.mf31
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbr8.mf31
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbr9.mf31
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbst10.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbst12.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbst17.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbst8.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulbst9.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmc10.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmc12.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmc17.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmc8.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmc9.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmo10.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmo12.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmo17.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmo8.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmo9.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmr10.mf31
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmr12.mf31
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmr17.mf31
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmr8.mf31
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmr9.mf31
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmst10.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmst12.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmst17.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmst8.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/fulmst9.mf32
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/uniacc.mf109
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/unibase.mf279
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/unidig.mf119
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/uniext.mf239
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/unilig.mf110
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/unilow.mf247
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/unipun.mf170
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/unispe.mf82
-rw-r--r--Master/texmf-dist/fonts/source/public/universa/uniupp.mf264
49 files changed, 2889 insertions, 0 deletions
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbc10.mf b/Master/texmf-dist/fonts/source/public/universa/fulbc10.mf
new file mode 100644
index 00000000000..9c9f6ed86d7
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbc10.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbc10.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,caps,ten')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+caps := true ;
+start_font(10pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbc10.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbc12.mf b/Master/texmf-dist/fonts/source/public/universa/fulbc12.mf
new file mode 100644
index 00000000000..37eb75f771d
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbc12.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbc12.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,caps,twelve')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+caps := true ;
+start_font(12pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbc12.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbc17.mf b/Master/texmf-dist/fonts/source/public/universa/fulbc17.mf
new file mode 100644
index 00000000000..a396976a6f1
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbc17.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbc17.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,caps,seventeen')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+caps := true ;
+start_font(17pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbc17.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbc8.mf b/Master/texmf-dist/fonts/source/public/universa/fulbc8.mf
new file mode 100644
index 00000000000..15f7067155d
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbc8.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbc8.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,caps,eight')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+caps := true ;
+start_font(8pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbc8.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbc9.mf b/Master/texmf-dist/fonts/source/public/universa/fulbc9.mf
new file mode 100644
index 00000000000..388a882c9a2
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbc9.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbc9.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,caps,nine')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+caps := true ;
+start_font(9pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbc9.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbo10.mf b/Master/texmf-dist/fonts/source/public/universa/fulbo10.mf
new file mode 100644
index 00000000000..ec5e56bb7af
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbo10.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbo10.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,slanted,ten')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+slant := true ;
+start_font(10pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbo10.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbo12.mf b/Master/texmf-dist/fonts/source/public/universa/fulbo12.mf
new file mode 100644
index 00000000000..5187b3f9b6f
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbo12.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbo12.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,slanted,twelve')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+slant := true ;
+start_font(12pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbo12.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbo17.mf b/Master/texmf-dist/fonts/source/public/universa/fulbo17.mf
new file mode 100644
index 00000000000..e9631dc8ab9
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbo17.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbo17.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,slanted,seventeen')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+slant := true ;
+start_font(17pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbo17.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbo8.mf b/Master/texmf-dist/fonts/source/public/universa/fulbo8.mf
new file mode 100644
index 00000000000..0438fe42a5d
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbo8.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbo8.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,slanted,eight')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+slant := true ;
+start_font(8pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbo8.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbo9.mf b/Master/texmf-dist/fonts/source/public/universa/fulbo9.mf
new file mode 100644
index 00000000000..7ee8d2dc42a
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbo9.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbo9.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,slanted,nine')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+slant := true ;
+start_font(9pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbo9.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbr10.mf b/Master/texmf-dist/fonts/source/public/universa/fulbr10.mf
new file mode 100644
index 00000000000..7b93fd11728
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbr10.mf
@@ -0,0 +1,31 @@
+%%
+%% This is file `fulbr10.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,ten')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+start_font(10pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbr10.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbr12.mf b/Master/texmf-dist/fonts/source/public/universa/fulbr12.mf
new file mode 100644
index 00000000000..9b783c4d1e7
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbr12.mf
@@ -0,0 +1,31 @@
+%%
+%% This is file `fulbr12.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,twelve')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+start_font(12pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbr12.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbr17.mf b/Master/texmf-dist/fonts/source/public/universa/fulbr17.mf
new file mode 100644
index 00000000000..4a4cb1c57c5
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbr17.mf
@@ -0,0 +1,31 @@
+%%
+%% This is file `fulbr17.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,seventeen')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+start_font(17pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbr17.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbr8.mf b/Master/texmf-dist/fonts/source/public/universa/fulbr8.mf
new file mode 100644
index 00000000000..04b994a0182
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbr8.mf
@@ -0,0 +1,31 @@
+%%
+%% This is file `fulbr8.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,eight')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+start_font(8pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbr8.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbr9.mf b/Master/texmf-dist/fonts/source/public/universa/fulbr9.mf
new file mode 100644
index 00000000000..e5cb1401aa2
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbr9.mf
@@ -0,0 +1,31 @@
+%%
+%% This is file `fulbr9.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,nine')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+start_font(9pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbr9.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbst10.mf b/Master/texmf-dist/fonts/source/public/universa/fulbst10.mf
new file mode 100644
index 00000000000..4e218f98a47
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbst10.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbst10.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,strict,ten')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+strict := true ;
+start_font(10pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbst10.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbst12.mf b/Master/texmf-dist/fonts/source/public/universa/fulbst12.mf
new file mode 100644
index 00000000000..8a4d50436b1
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbst12.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbst12.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,strict,twelve')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+strict := true ;
+start_font(12pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbst12.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbst17.mf b/Master/texmf-dist/fonts/source/public/universa/fulbst17.mf
new file mode 100644
index 00000000000..d0b6ea83264
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbst17.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbst17.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,strict,seventeen')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+strict := true ;
+start_font(17pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbst17.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbst8.mf b/Master/texmf-dist/fonts/source/public/universa/fulbst8.mf
new file mode 100644
index 00000000000..667b7f6448f
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbst8.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbst8.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,strict,eight')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+strict := true ;
+start_font(8pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbst8.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulbst9.mf b/Master/texmf-dist/fonts/source/public/universa/fulbst9.mf
new file mode 100644
index 00000000000..937f247707c
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulbst9.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulbst9.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,bold,strict,nine')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+bold := true ;
+strict := true ;
+start_font(9pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulbst9.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmc10.mf b/Master/texmf-dist/fonts/source/public/universa/fulmc10.mf
new file mode 100644
index 00000000000..1ab6a18ef1f
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmc10.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmc10.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,caps,ten')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+caps := true ;
+start_font(10pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmc10.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmc12.mf b/Master/texmf-dist/fonts/source/public/universa/fulmc12.mf
new file mode 100644
index 00000000000..4c99016720a
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmc12.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmc12.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,caps,twelve')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+caps := true ;
+start_font(12pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmc12.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmc17.mf b/Master/texmf-dist/fonts/source/public/universa/fulmc17.mf
new file mode 100644
index 00000000000..4f3d469468e
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmc17.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmc17.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,caps,seventeen')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+caps := true ;
+start_font(17pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmc17.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmc8.mf b/Master/texmf-dist/fonts/source/public/universa/fulmc8.mf
new file mode 100644
index 00000000000..fbcc9e8ab38
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmc8.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmc8.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,caps,eight')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+caps := true ;
+start_font(8pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmc8.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmc9.mf b/Master/texmf-dist/fonts/source/public/universa/fulmc9.mf
new file mode 100644
index 00000000000..16d998eb6bc
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmc9.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmc9.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,caps,nine')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+caps := true ;
+start_font(9pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmc9.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmo10.mf b/Master/texmf-dist/fonts/source/public/universa/fulmo10.mf
new file mode 100644
index 00000000000..e275580fa08
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmo10.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmo10.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,slanted,ten')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+slant := true ;
+start_font(10pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmo10.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmo12.mf b/Master/texmf-dist/fonts/source/public/universa/fulmo12.mf
new file mode 100644
index 00000000000..27f82bf9e11
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmo12.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmo12.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,slanted,twelve')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+slant := true ;
+start_font(12pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmo12.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmo17.mf b/Master/texmf-dist/fonts/source/public/universa/fulmo17.mf
new file mode 100644
index 00000000000..aad5cd800f0
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmo17.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmo17.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,slanted,seventeen')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+slant := true ;
+start_font(17pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmo17.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmo8.mf b/Master/texmf-dist/fonts/source/public/universa/fulmo8.mf
new file mode 100644
index 00000000000..c383a76dc1a
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmo8.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmo8.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,slanted,eight')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+slant := true ;
+start_font(8pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmo8.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmo9.mf b/Master/texmf-dist/fonts/source/public/universa/fulmo9.mf
new file mode 100644
index 00000000000..527c58ebd62
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmo9.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmo9.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,slanted,nine')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+slant := true ;
+start_font(9pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmo9.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmr10.mf b/Master/texmf-dist/fonts/source/public/universa/fulmr10.mf
new file mode 100644
index 00000000000..9ec12a7bc74
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmr10.mf
@@ -0,0 +1,31 @@
+%%
+%% This is file `fulmr10.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,ten')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+start_font(10pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmr10.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmr12.mf b/Master/texmf-dist/fonts/source/public/universa/fulmr12.mf
new file mode 100644
index 00000000000..fd849054193
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmr12.mf
@@ -0,0 +1,31 @@
+%%
+%% This is file `fulmr12.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,twelve')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+start_font(12pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmr12.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmr17.mf b/Master/texmf-dist/fonts/source/public/universa/fulmr17.mf
new file mode 100644
index 00000000000..efeb2f06d06
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmr17.mf
@@ -0,0 +1,31 @@
+%%
+%% This is file `fulmr17.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,seventeen')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+start_font(17pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmr17.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmr8.mf b/Master/texmf-dist/fonts/source/public/universa/fulmr8.mf
new file mode 100644
index 00000000000..05c0c81c61e
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmr8.mf
@@ -0,0 +1,31 @@
+%%
+%% This is file `fulmr8.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,eight')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+start_font(8pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmr8.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmr9.mf b/Master/texmf-dist/fonts/source/public/universa/fulmr9.mf
new file mode 100644
index 00000000000..93495cbcf8a
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmr9.mf
@@ -0,0 +1,31 @@
+%%
+%% This is file `fulmr9.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,nine')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+start_font(9pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmr9.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmst10.mf b/Master/texmf-dist/fonts/source/public/universa/fulmst10.mf
new file mode 100644
index 00000000000..1e2b0857195
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmst10.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmst10.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,strict,ten')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+strict := true ;
+start_font(10pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmst10.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmst12.mf b/Master/texmf-dist/fonts/source/public/universa/fulmst12.mf
new file mode 100644
index 00000000000..82e86948cd2
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmst12.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmst12.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,strict,twelve')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+strict := true ;
+start_font(12pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmst12.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmst17.mf b/Master/texmf-dist/fonts/source/public/universa/fulmst17.mf
new file mode 100644
index 00000000000..9b5bb0d8b62
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmst17.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmst17.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,strict,seventeen')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+strict := true ;
+start_font(17pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmst17.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmst8.mf b/Master/texmf-dist/fonts/source/public/universa/fulmst8.mf
new file mode 100644
index 00000000000..346f7c55ce1
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmst8.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmst8.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,strict,eight')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+strict := true ;
+start_font(8pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmst8.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/fulmst9.mf b/Master/texmf-dist/fonts/source/public/universa/fulmst9.mf
new file mode 100644
index 00000000000..31208f7a0fd
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/fulmst9.mf
@@ -0,0 +1,32 @@
+%%
+%% This is file `fulmst9.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `font,medium,strict,nine')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if unknown unibase : input unibase; fi;
+
+medium := true ;
+strict := true ;
+start_font(9pt#) ;
+input uniupp ; input unilow ; input unidig ; input unispe ;
+input unilig ; input unipun ; input uniacc ; input uniext ;
+
+end_font;
+
+\endinput
+%%
+%% End of file `fulmst9.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/uniacc.mf b/Master/texmf-dist/fonts/source/public/universa/uniacc.mf
new file mode 100644
index 00000000000..4dd4b8a73a6
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/uniacc.mf
@@ -0,0 +1,109 @@
+%%
+%% This is file `uniacc.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `acc')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+beginchar(hex"12",x_w#,l_h#,0) ; "The accent `" ;
+ uniend(P_T/2,(w/2,a_h+P_T/2),90,270,10) ;
+ z1 = (w/2,a_h+P_T) ; z2 = (w/2,a_h) ; z3 = (w/2+P_T,a_h) ;
+ fill z1--z2--z3--cycle ; penlabels(1,2,3) ;
+endchar ;
+
+beginchar(hex"13",x_w#,l_h#,0) ; "The accent '" ;
+ uniend(P_T/2,(w/2,a_h+P_T/2),-90,90,10) ;
+ z1 = (w/2,a_h+P_T) ; z2 = (w/2,a_h) ; z3 = (w/2-P_T,a_h) ;
+ fill z1--z2--z3--cycle ; penlabels(1,2,3) ;
+endchar ;
+
+beginchar(hex"14",x_w#,l_h#,0) ; "The accent hachek" ;
+ z1 = (w/2,a_h+p_t) ; uniend(p_t,z1,225,315,10) ;
+ z2 = z1 + p_t*(-1,-1)/sqrt(2) ; z3 = z1 + p_t*(-1,1) ;
+ z4 = z3 + (-p_t*sqrt(2),0) ; path rombe ;
+ rombe := z1--z2--z4--z3--cycle ; fill rombe ;
+ fill rombe reflectedabout ((w/2,0),(w/2,h)) ;
+ penlabels(1,2,3,4) ;
+endchar ;
+
+beginchar(hex"15",x_w#,l_h#,0) ; "The accent breve" ;
+ rad := 3p_t/2 ; uniarc(rad,p_t,(w/2,a_h+rad),180,360,10) ;
+endchar ;
+
+beginchar(hex"16",x_w#,a_h#+p_t#,0) ; "The accent macron (bar)" ;
+ pickup unipensqu ;
+ bot lft z1 = (w/2-2p_t,a_h) ; bot rt z2 = (w/2+2p_t,a_h) ;
+ draw z1--z2 ; penlabels(1,2) ;
+endchar ;
+
+beginchar(hex"17",A_w#+4/3*(l_h#-x_h#)*slantratio,l_h#,0) ;
+ "The accent circle" ;
+ rad := P_T ; unicir(rad,p_t,(w/2,h-rad),10) ;
+endchar ;
+
+beginchar(hex"18",x_w#,x_h#,2c_d#) ; "The accent cidelia" ;
+ uniarc(d/2,2P_T/3,(w/2+d/4,-d/2),90,270,10) ;
+endchar ;
+
+phi := 15 ; tmp# := 3c_d# ; define_pixels(tmp) ;
+beginchar(hex"20",tmp#*cosd(phi)+p_t#*sind(phi),l_h#,0) ;
+ "The accent bar over l" ;
+ z1 = (0,(h+p_t*cosd(phi)-tmp*sind(phi))/2) ;
+ z2 = (p_t*sind(phi),(h-p_t*cosd(phi)-tmp*sind(phi))/2) ;
+ z3 = (w,(h-p_t*cosd(phi)+tmp*sind(phi))/2) ;
+ z4 = (w-p_t*sind(phi),(h+p_t*cosd(phi)+tmp*sind(phi))/2) ;
+ fill z1--z2--z3--z4--cycle ;
+ penlabels(1,2,3,4) ;
+endchar ;
+
+beginchar(hex"5E",x_w#,l_h#,0) ; "The accent hat" ;
+ z1 = (w/2,a_h+p_t) ; uniend(p_t,z1,45,136,10) ;
+ z2 = z1 + p_t*(-1,1)/sqrt(2) ; z3 = z1 + p_t*(-1,-1) ;
+ z4 = z3 + (-p_t*sqrt(2),0) ; path rombe ;
+ rombe := z1--z2--z4--z3--cycle ; fill rombe ;
+ fill rombe reflectedabout ((w/2,0),(w/2,h)) ;
+ penlabels(1,2,3,4) ;
+endchar ;
+
+beginchar(hex"5F",x_w#,l_h#,0) ; "The accent dot" ;
+ pickup UniPencir ; bot z1 = (w/2,a_h) ; drawdot z1 ; penlabels(1) ;
+endchar ;
+
+beginchar(hex"7D",x_w#,l_h#,0) ; "The accent ''" ;
+ rad := P_T/2 ;
+ uniend(rad,(w/2-rad,a_h+rad),-90,90,10) ;
+ uniend(rad,(w/2+P_T,a_h+rad),-90,90,20) ;
+ z1 = (w/2-rad-P_T,a_h) ; z2 = (w/2-rad,a_h) ;
+ z3 = (w/2-rad,a_h+P_T) ; fill z1--z2--z3--cycle ;
+ z4 = (w/2,a_h) ; z5 = (w/2+P_T,a_h) ;
+ z6 = (w/2+P_T,a_h+P_T) ; fill z4--z5--z6--cycle ;
+ penlabels(range 1 thru 6) ;
+endchar ;
+
+beginchar(hex"7E",x_w#,l_h#,0) ; "The accent ~" ;
+ rad := (w*sqrt(2)+p_t)/4 ; temp := (2w-p_t*sqrt(2))/8 ;
+ uniarc(rad,p_t,(w/2+temp,a_h+rad),225,315,10) ;
+ uniarc(rad,p_t,(w/2-temp,a_h+rad-2temp),45,135,20) ;
+endchar ;
+
+beginchar(hex"7F",x_w#,l_h#,0) ; "The accent umlout (double dot)" ;
+ pickup UniPencir ;
+ bot z1 = (w/2-P_T,a_h) ; bot z2 = (w/2+P_T,a_h) ;
+ drawdot z1 ; drawdot z2 ; penlabels(1,2) ;
+endchar ;
+
+\endinput
+%%
+%% End of file `uniacc.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/unibase.mf b/Master/texmf-dist/fonts/source/public/universa/unibase.mf
new file mode 100644
index 00000000000..27e04d9581d
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/unibase.mf
@@ -0,0 +1,279 @@
+%%
+%% This is file `unibase.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `unibase')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% This file is NOT the source for universal, because almost all
+%% comments have been stripped from it. It is NOT the preferred
+%% form of universal for making modifications to it.
+%%
+%% Therefore you can NOT redistribute and/or modify THIS file.
+%% You can however redistribute the complete source (uni.dtx
+%% and uni.ins) and/or modify it under the terms of the GNU
+%% General Public License as published by the Free Software
+%% Foundation; either version 2, or (at your option) any later
+%% version.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% You should have received a copy of the GNU General Public
+%% License along with this package; if not, write to the
+%% Free Software Foundation, Inc.,
+%% 675 Mass Ave, Cambridge,
+%% MA 02139, USA.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+unibase := 1 ;
+string univer ;
+univer = "2.0" ;
+if proofing > 1 :
+ message "Base file for font `universal', version " & univer ;
+fi
+boolean medium , slant , bold , caps , strict ;
+medium := false ; slant := false ; bold := false ;
+caps := false ; strict := false ;
+font_identifier:="universal";
+
+def start_font(expr size) =
+ u# := size/18 ;
+ mode_setup;
+ x_h# := 8u# ; x_w# := 8u# ; m_w# := 11u# ; l_h# := 13u# ;
+ p_d# := 5u# ; l_s# := 2u# ; r_s# := 2u# ; A_w# := 10u# ;
+ M_w# := 14u# ; c_d# := 3u#/2 ; C_d# := 2u# ;
+ if (medium and bold) :
+ message "Font can't be both medium and bold, making medium font." ;
+ medium := true ;
+ fi;
+ if medium : p_t# := 2u#/3 ; P_t# := u# ; P_T# := u# ; fi ;
+ if bold : P_T# := 3u#/2 ; p_t# := 3u#/2 ; P_t# := 2u# ; fi ;
+ a_h# := x_h#+p_t#/2 ;
+ if (slant and (caps or strict)) : double_shape := 1 ; fi ;
+ if (caps and (slant or strict)) : double_shape := 1 ; fi ;
+ if (strict and (caps or slant)) : double_shape := 1 ; fi ;
+ if known double_shape :
+ message "Font cannot be two shapes, doing upright shape." ;
+ slant := false ; caps := false ; strict := false ;
+ fi ;
+ if slant : slantratio := 1/6 ; else: slantratio := 0 ; fi ;
+ currenttransform := identity slanted slantratio ;
+ font_x_height 8u# ; font_quad 12u#+2u# ;
+ font_normal_space 8u# ; font_normal_stretch 3u# ;
+ font_normal_shrink 2u# ; font_extra_space 2u# ;
+ font_coding_scheme:="TeX text" ; font_size 18u# ;
+ spanish_shriek:=hex"3C" ; spanish_query:=hex"3E";
+ define_pixels(u,x_h,x_w,m_w,l_h,p_d,A_w,M_w,c_d,C_d,a_h);
+ define_blacker_pixels(p_t,P_t,P_T);
+ picture e_pic, a_pic ;
+ do_pens ;
+ extra_beginchar := extra_beginchar&"fit_font;" ;
+ extra_endchar := extra_endchar&
+ "end_fit_font;extra_proof_rules;charcode:=charcode+code_offset;" ;
+ code_offset := 0 ;
+enddef;
+
+def do_pens =
+ clear_pen_memory ;
+ pickup pencircle scaled P_T slanted slantratio ;
+ UniPencir := savepen ;
+ pickup pencircle scaled p_t slanted slantratio ;
+ unipencir := savepen ;
+ pickup pencircle scaled P_t slanted slantratio ;
+ Unipencir := savepen ;
+ pickup pensquare scaled P_T slanted slantratio ;
+ UniPensqu := savepen ;
+ pickup pensquare scaled p_t slanted slantratio ;
+ unipensqu := savepen ;
+ pickup pensquare scaled P_t slanted slantratio ;
+ Unipensqu := savepen ;
+enddef ;
+
+def fit_font =
+ l := -hround(l_s#*hppp) ; interim xoffset := -l ;
+ charwd := charwd+l_s#+r_s# ; r := l+hround(charwd*hppp) ;
+ w := r-hround(r_s#*hppp) ;
+ italcorr charht*slantratio ;
+enddef;
+
+def end_fit_font =
+ w := r+l ;
+enddef;
+
+def extra_proof_rules =
+ if proofing > 1 :
+ for xa = l,r,w/2: proofrule((xa,-d), (xa,h)) ; endfor ;
+ for ya = 0,h/4,h/2,3h/4,h: proofrule((l,ya), (r,ya)) ; endfor ;
+ if d > 0 :
+ proofrule((l,-d/2), (r,-d/2)) ;
+ proofrule((l,-d), (r,-d)) ;
+ fi
+ fi
+enddef ;
+
+def end_font =
+ ligtable "u" : "h" kern u# ;
+ ligtable "f" : "f" kern 0 , "l" kern 0 , "i" kern 0 ;
+ ligtable "o" : "l" kern u# ;
+ ligtable "?" : "`" =: spanish_query ;
+ ligtable "!" : "`" =: spanish_shriek ;
+ ligtable "`" : "`" kern -l_s#-r_s#+p_t# ;
+ ligtable "'" : "'" kern -l_s#-r_s#+p_t# ,
+ "?" kern 2u#, "!" kern 2u# ;
+ ligtable "-" : "-" =: hex"7B" ;
+ ligtable hex"7B" : "-" =: hex"7C" ;
+ ligtable hex"22" : hex"22" kern -l_s#-r_s# ;
+ ligtable hex"5C" : hex"5C" kern -l_s#-r_s# ;
+ ligtable hex"20" :
+ "l" kern -3c_d#*cosd(15)-p_t#*sind(15)-l_s#-r_s# ,
+ "L" kern -3c_d#*cosd(15)-p_t#*sind(15)-l_s#-r_s# ;
+ bye
+enddef;
+
+def do_caps(expr offset) =
+ sc_shrink := x_h#/l_h# ;
+ P_t# := sc_shrink*P_t# ; l_h# := sc_shrink*l_h# ;
+ A_w# := sc_shrink*A_w# ; M_w# := sc_shrink*M_w# ;
+ C_d# := sc_shrink*C_d# ;
+ code_offset := offset ;
+ define_pixels(l_h,A_w,M_w,C_d) ;
+ define_blacker_pixels(P_t) ;
+ do_pens ;
+enddef ;
+
+def end_do_caps =
+ no_shrink := 1/sc_shrink ;
+ P_t# := no_shrink*P_t# ; l_h# := no_shrink*l_h# ;
+ A_w# := no_shrink*A_w# ; M_w# := no_shrink*M_w# ;
+ C_d# := no_shrink*C_d# ;
+ code_offset := 0 ;
+ define_pixels(l_h,A_w,M_w,C_d) ;
+ define_blacker_pixels(P_t) ;
+ do_pens ;
+enddef ;
+
+def no_adjust=
+ old_begin_adjust := extra_beginchar ;
+ old_end_adjust := extra_endchar ;
+ extra_beginchar := " " ;
+ extra_endchar :=
+ "extra_proof_rules;charcode:=charcode+code_offset" ;
+enddef;
+
+def restore_adjust=
+ extra_beginchar := old_begin_adjust ;
+ extra_endchar := old_end_adjust ;
+enddef;
+string old_begin_adjust, old_end_adjust ;
+
+def unicir(expr rad, thick, center, m)=
+ pickup pensquare scaled thick;
+ top z[m] = (0,rad) + center ; penpos[m](thick,90) ;
+ lft z[m+1] = (-rad,0) + center ; penpos[m+1](thick,180) ;
+ bot z[m+2] = (0,-rad) + center ; penpos[m+2](thick,270) ;
+ rt z[m+3] = (rad,0) + center ; penpos[m+3](thick,0) ;
+ penstroke z[m]e{left}..z[m+1]e{down}..
+ z[m+2]e{right}..z[m+3]e{up}..cycle ;
+ penlabels(range m thru m+3);
+enddef;
+
+def uniarc(expr rad, thick, center, ang_a, ang_b, m)=
+ pickup pensquare scaled thick ;
+ path arc.l, arc.r, arc.e ; n:=m ; ang_c := abs(ang_b-ang_a) ;
+ if ang_c >= 360 :
+ unicir(rad,center,n) ;
+ else:
+ top z[n] = (0,rad) + center ; penpos[n](thick,90) ;
+ arc.r := z[n]r{left} ;
+ arc.l := z[n]l{left} ;
+ if ang_c > 90 :
+ n := n+1 ; lft z[n] = (-rad,0) + center ; penpos[n](thick,180) ;
+ arc.r := arc.r&z[n-1]r..z[n]r{down} ;
+ arc.l := arc.l&z[n-1]l..z[n]l{down} ;
+ if ang_c > 180 :
+n := n+1 ; bot z[n] = (0,-rad) + center ; penpos[n](thick,270) ;
+arc.r := arc.r&z[n-1]r..z[n]r{right} ;
+arc.l := arc.l&z[n-1]l..z[n]l{right} ;
+if ang_c > 270 :
+ n := n+1 ; rt z[n] = (rad,0) + center ; penpos[n](thick,0) ;
+ arc.r := arc.r&z[n-1]r..z[n]r{up} ;
+ arc.l := arc.l&z[n-1]l..z[n]l{up} ;
+fi ;
+ fi ;
+ fi ;
+ n:=n+1 ; z[n] = z[m] rotatedabout(center,ang_c) ;
+ penpos[n](thick,90+ang_c) ;
+ arc.r := arc.r&z[n-1]r..z[n]r{dir(180+ang_c)} ;
+ arc.l := arc.l&z[n-1]l..z[n]l{dir(180+ang_c)} ;
+ arc.e := arc.l--reverse arc.r--cycle;
+ fill (arc.e rotatedabout(center,-90+ang_a));
+ fi;
+ penlabels(range m thru n);
+enddef;
+
+def uniend(expr rad, center, ang_a, ang_b, m)=
+ path arc ; n:=m ; ang_c := abs(ang_b-ang_a) ;
+ if ang_c >= 360 :
+ Rad := 2*rad ;
+ pickup pencircle scaled Rad ; z[n]=center ; drawdot z[n] ;
+ else:
+ z[n] = (0,rad) + center ; arc := center{up}--z[n]{left} ;
+ if ang_c > 90 :
+ n := n+1 ; z[n] = (-rad,0) + center ;
+ arc := arc&z[n-1]..z[n]{down} ;
+ if ang_c > 180 :
+n := n+1 ; z[n] = (0,-rad) + center ;
+arc := arc&z[n-1]..z[n]{right} ;
+if ang_c > 270 :
+ n := n+1 ; z[n] = (rad,0) + center ;
+ arc := arc&z[n-1]..z[n]{up} ;
+fi ;
+ fi ;
+ fi ;
+ n := n+1 ; z[n] = z[m] rotatedabout(center,ang_c) ;
+ arc := arc&z[n-1]..z[n]{dir(180+ang_c)}--cycle ;
+ fill (arc rotatedabout(center,-90+ang_a));
+ fi;
+ penlabels(range m thru n);
+enddef;
+
+
+def unilne(expr thick, start, stop, endcutstart, endcutstop, m)=
+ pickup pensquare scaled thick;
+ if endcutstart = endcutstop :
+ if endcutstart = 0 :
+ lft bot z[m] = start ; rt top z[m+1] = stop ;
+ ang_c := angle(z[m+1]-z[m]) ;
+ penpos[m](thick,-90+ang_c) ;
+ penpos[m+1](thick,-90+ang_c) ;
+ elseif endcutstart > 0 :
+ lft z[m] = start ; rt z[m+1] = stop ;
+ ang_c := angle(z[m+1]-z[m]) ;
+ penpos[m](thick/sind(ang_c),0) ;
+ penpos[m+1](thick/sind(ang_c),0) ;
+ elseif endcutstart < 0:
+ bot z[m] = start ; top z[m+1] = stop ;
+ ang_c := angle(z[m+1]-z[m]) ;
+ penpos[m](thick/cosd(ang_c),90) ;
+ penpos[m+1](thick/cosd(ang_c),90) ;
+ fi;
+ penstroke z[m]e--z[m+1]e ;
+ else :
+ message "Different endcuts on unilne not implemented yet.";
+ fi;
+ n := m + 1 ;
+ penlabels(range m thru n);
+enddef;
+
+\endinput
+%%
+%% End of file `unibase.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/unidig.mf b/Master/texmf-dist/fonts/source/public/universa/unidig.mf
new file mode 100644
index 00000000000..415a7f3b9be
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/unidig.mf
@@ -0,0 +1,119 @@
+%%
+%% This is file `unidig.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `dig')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+beginchar("0",A_w#,l_h#,0) ; "The number 0" ;
+ uniarc(w/2,p_t,(w/2,h-w/2),0,180,10) ;
+ uniarc(w/2,p_t,(w/2,w/2),180,360,20) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h-w/2) ; bot lft z2 = (0,w/2) ; draw z1--z2 ;
+ top rt z3 = (w,h-w/2) ; bot rt z4 = (w,w/2) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+endchar;
+
+beginchar("1",2c_d#,l_h#,0) ; "The number 1" ;
+ uniend(p_t,(w-p_t,h-p_t),0,90,10) ;
+ pickup unipensqu ;
+ lft top z1 = (0,h) ; rt top z2 = (w-p_t,h) ; draw z1--z2 ;
+ rt top z3 = (w,h-p_t) ; rt bot z4 = (w,0) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+endchar;
+
+beginchar("2",A_w#,l_h#,0) ; "The number 2" ;
+ uniarc(w/2,p_t,(w/2,h-w/2),0,180,10) ;
+ phi := angle((w,h-w/2)-(0,p_t)) ;
+ z1 = (w-p_t,h-w/2) ; z2 = z1 + p_t*(sind(phi),-cosd(phi)) ;
+ z3 = (p_t,p_t) ; z4 = z3 + p_t*(-sind(phi),cosd(phi)) ;
+ fill z1--z2--z3--z4--cycle ;
+ uniend(p_t,z1,270+phi,360,20) ;
+ uniend(p_t,z3,90+phi,270,30) ;
+ pickup unipensqu ;
+ bot lft z5 = (p_t,0) ; bot rt z6 = (w,0) ; draw z5--z6 ;
+ penlabels(range 1 thru 6) ;
+endchar;
+
+beginchar("3",A_w#,l_h#,0) ; "The number 3" ;
+ path arc_a, arc_b ;
+ arc_a = (w,h-w/2)..(w/2,h-w) ; arc_b = (w,w/2)..(w/2,w) ;
+ z3 = arc_a intersectionpoint arc_b ; phi := angle(z3-(w/2,w/2)) ;
+ uniarc(w/2,p_t,(w/2,h-w/2),-phi,180,10) ;
+ uniarc(w/2,p_t,(w/2,w/2),-180,phi,20) ;
+ pickup unipensqu ;
+ rt z1 = (w/2*(1+cosd(phi)),h/2) ; lft z2 = (w/2,h/2) ; draw z1--z2 ;
+ penlabels(1,2) ;
+endchar;
+
+beginchar("4",A_w#,l_h#,0) ; "The number 4" ;
+ z1 = (w-p_t,h-p_t) ; z2 = z1 + p_t*(-1/sqrt(2),1/sqrt(2)) ;
+ z3 = (p_t,h-w+p_t) ; z4 = z3 + p_t*(-1/sqrt(2),1/sqrt(2)) ;
+ fill z1--z2--z4--z3--cycle ;
+ uniend(p_t,z1,0,135,10) ;
+ uniend(p_t,z3,135,270,20) ;
+ pickup unipensqu ;
+ top rt z5 = (w,h-p_t) ; bot rt z6 = (w,0) ; draw z5--z6 ;
+ bot lft z7 = (p_t,h-w) ; bot rt z8 = (w,h-w) ; draw z7--z8 ;
+ penlabels(range 1 thru 8) ;
+endchar;
+
+beginchar("5",A_w#,l_h#,0) ; "The number 5" ;
+ rad := 9w/20 ;
+ uniarc(rad,p_t,(w-rad,rad),-150,90,10) ;
+ uniend(p_t,(p_t,h-p_t),90,180,20) ;
+ uniend(p_t,(p_t,2rad),180,270,30) ;
+ pickup unipensqu ;
+ top lft z1 = (p_t,2rad) ; top rt z2 = (w-rad,2rad) ; draw z1--z2 ;
+ bot lft z3 = (0,2rad) ; top lft z4 = (0,h-p_t) ; draw z3--z4 ;
+ top lft z5 = (p_t,h) ; top rt z6 = (w,h) ; draw z5--z6 ;
+ penlabels(range 1 thru 6) ;
+endchar;
+
+beginchar("6",A_w#,l_h#,0) ; "The number 6" ;
+ unicir(w/2,p_t,(w/2,w/2),10) ;
+ uniarc(w/2,p_t,(w/2,h-w/2),60,180,20) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h-w/2) ; bot lft z2 = (0,w/2) ; draw z1--z2 ;
+ penlabels(1,2) ;
+endchar;
+
+beginchar("7",A_w#,l_h#,0) ; "The number 7" ;
+ z1 = (w-p_t,h-p_t) ; phi := angle(z1) ;
+ uniend(p_t,z1,-90+phi,90,10) ;
+ z2 = z1 + p_t*(cosd(90-phi),-sind(90-phi)) ;
+ z3 = (p_t/cosd(90-phi),0) ; z4 = (0,0) ;
+ fill z1--z2--z3--z4--cycle ;
+ pickup unipensqu ;
+ top lft z5 = (0,h) ; top rt z6 = (w-p_t,h) ; draw z5--z6 ;
+ penlabels(range 1 thru 6) ;
+endchar;
+
+beginchar("8",1/2*(l_h#+p_t#),l_h#,0) ; "The number 8" ;
+ unicir(w/2,p_t,(w/2,w/2),10) ;
+ unicir(w/2,p_t,(w/2,h-w/2),20) ;
+endchar;
+
+beginchar("9",A_w#,l_h#,0) ; "The number 9" ;
+ unicir(w/2,p_t,(w/2,h-w/2),10) ;
+ uniarc(w/2,p_t,(w/2,w/2),-150,0,20) ;
+ pickup unipensqu ;
+ top rt z1 = (w,h-w/2) ; bot rt z2 = (w,w/2) ; draw z1--z2 ;
+ penlabels(1,2) ;
+endchar;
+
+\endinput
+%%
+%% End of file `unidig.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/uniext.mf b/Master/texmf-dist/fonts/source/public/universa/uniext.mf
new file mode 100644
index 00000000000..587e6a048a6
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/uniext.mf
@@ -0,0 +1,239 @@
+%%
+%% This is file `uniext.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `ext')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+currenttransform := identity ;
+
+beginchar(hex"00",l_h#,l_h#,0) ; "The filled square symbol" ;
+ z1 = (0,0) ; z2 = (w,0) ; z3 = (w,h) ; z4 = (0,h) ;
+ fill z1--z2--z3--z4--cycle ;
+ penlabels(1,2,3,4) ;
+endchar ;
+
+beginchar(hex"01",l_h#,l_h#,0) ; "The filled circle symbol" ;
+ z1 = (w,h/2) ; z2 = (w/2,h) ; z3 = (0,h/2) ; z4 = (w/2,0) ;
+ fill z1..z2..z3..z4..cycle ;
+ penlabels(1,2,3,4) ;
+endchar ;
+
+beginchar(hex"02",l_h#,l_h#,0) ; "The filled triangle symbol" ;
+ z1 = (0,0) ; z2 = (w,0) ; z3 = (w/2,h) ;
+ fill z1--z2--z3--cycle ;
+ penlabels(1,2,3) ;
+endchar ;
+
+beginchar(hex"03",2l_h#,2l_h#,0) ; "The bauhaus-head symbol" ;
+ unicir(w/2,2c_d/9,(w/2,w/2),40) ;
+ a1 := .702h ; a2 := .561h ; a3 := .491h ; a4 := .351h ;
+ a5 := .272h ; a6 := .140h ;
+ b1 := .202w ; b2 := .307w ; b3 := .412w ; b4 := .447w ;
+ b5 := .465w ; b6 := .518w ; b7 := .588w ; b8 := .623w ;
+ temp := c_d/6 ; pickup pensquare scaled temp ;
+ top lft z1 = (b1,a1) ; top rt z2 = (b2,a1) ; draw z1--z2 ;
+ bot rt z3 = (b4,a3) ; top rt z4 = (b4,a2) ; draw z3--z4 ;
+ z5 = (b2,a1) ; z6 = (b4,a1) ; z7 = (b4,a2) ; z8 = (b2,a2) ;
+ fill z5--z6--z7--z8--cycle ;
+ lft bot z9 = (b4,a4) ; lft bot z10 = (b7,a4) ; draw z9--z10 ;
+ lft bot z11 = (b2,a6) ; rt bot z12 = (b6,a6) ; draw z11--z12 ;
+ temp := 3c_d/5 ; pickup pensquare scaled temp ;
+ lft top z13 = (b5,a5) ; rt top z14 = (b6,a5) ; draw z13--z14 ;
+ z15 = (b6,a4) ; z16 = (b7,a4) ; z17 = (b7,a6) ; z18 = (b6,a6) ;
+ fill z15--z16--z17--z18--cycle ;
+ path noselft, nosert, necklft, neckrt ;
+ path headcircle , parttop, partbot;
+ z19 = (b7,a4) ; z20 = (b7,h) ; noselft = z19--z20 ;
+ z21 = (b8,h) ; z22 = (b8,a4) ; nosert = z21--z22 ;
+ z23 = (b3,a6) ; z24 = (b3,0) ; necklft = z23--z24 ;
+ z25 = (b6,0) ; z26 = (b6,a6) ; neckrt = z25--z26 ;
+ z27 = (w/2,h) ; z28 = (w,h/2) ; z29 = (w/2,0) ; z30 = (0,h/2) ;
+ headcircle := z27..z28..z29..z30..cycle ;
+ z31 = noselft intersectiontimes headcircle ;
+ z32 = nosert intersectiontimes headcircle ;
+ parttop = subpath(y31,y32) of headcircle ;
+ z33 = neckrt intersectiontimes headcircle ;
+ z34 = necklft intersectiontimes headcircle ;
+ partbot = subpath(y34,y33) of headcircle ;
+ fill z19--parttop--z22--cycle ;
+ fill z23--partbot--z26--cycle ;
+ penlabels(range 1 thru 34) ;
+endchar ;
+
+beginchar(hex"04",2l_h#,2l_h#,0) ; "The bauhaus-forms symbol" ;
+ phi := 36.673 ;
+ thn_pen := 2c_d/9 ; med_pen := 3c_d/9 ; thk_pen := 4c_d/9 ;
+ unicir(w/2,thn_pen,(w/2,w/2),20) ;
+ z1 = (thn_pen+med_pen,h/2) ;
+ z2 = (.6433w-med_pen,.9790h-med_pen) ;
+ z3 = (.6433w-med_pen,.0210h+med_pen) ;
+ uniend(med_pen,z1,phi+90,270-phi,30) ;
+ uniend(med_pen,z2,0,phi+90,40) ;
+ uniend(med_pen,z3,270-phi,360,50) ;
+ z4 = z1 + med_pen*(-sind(phi),cosd(phi)) ;
+ z5 = z2 + med_pen*(-sind(phi),cosd(phi)) ;
+ path sl_line ; sl_line = z1--z4--z5--z2--cycle ; fill sl_line ;
+ fill sl_line reflectedabout((0,h/2),(w,h/2)) ;
+ pickup pensquare scaled med_pen ;
+ lft bot z6 = z2 ; lft top z7 = z3 ; draw z6--z7 ;
+ z8 = (.3687w+thk_pen,.2254h+thk_pen) ;
+ z9 = (.9179w-thk_pen,.2254h+thk_pen) ;
+ z10 = (.9179w-thk_pen,.7746h-thk_pen) ;
+ z11 = (.3687w+thk_pen,.7746h-thk_pen) ;
+ uniend(thk_pen,z8,180,270,60) ;
+ uniend(thk_pen,z9,270,360,70) ;
+ uniend(thk_pen,z10,0,90,80) ;
+ uniend(thk_pen,z11,90,180,90) ;
+ pickup pensquare scaled thk_pen ;
+ lft top z12 = z8 ; rt top z13 = z9 ; draw z12--z13 ;
+ lft bot z14 = z9 ; lft top z15 = z10 ; draw z14--z15 ;
+ bot rt z16 = z10 ; bot lft z17 = z11 ; draw z16--z17 ;
+ top rt z18 = z11 ; bot rt z19 = z8 ; draw z18--z19 ;
+ penlabels(range 1 thru 19) ;
+endchar ;
+
+currenttransform := identity slanted slantratio ;
+
+if not caps :
+ for temp = 1,2 :
+ if temp = 2 : code_offset := 3 ; fi ;
+ beginchar(hex"05",x_w#,l_h#,0) ; "The letter eth" ;
+ unicir(w/2,p_t,(w/2,w/2),10) ;
+ uniarc(w/2,p_t,(w/2,h-w/2),0,120,20) ;
+ pickup unipensqu ;
+ top rt z1 = (w,h-w/2) ; bot rt z2 = (w,w/2) ; draw z1--z2 ;
+ z3 = (w/2,h-w/2+p_t/sqrt(2)) ; z4 = (w/2+p_t/sqrt(2),h-w/2) ;
+ z5 = (w,h-p_t/sqrt(2)) ; z6 = (w-p_t/sqrt(2),h) ;
+ fill z3--z4--z5--z6--cycle ;
+ penlabels(range 1 thru 6) ;
+ endchar ;
+
+ beginchar(hex"06",x_w#,x_h#,p_d#) ; "The letter eng" ;
+ uniarc(w/2,p_t,(w/2,h-w/2),0,180,10) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h-w/2) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ top rt z3 = (w,h-w/2) ; bot rt z4 = (w,-d) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+ endchar ;
+
+ beginchar(hex"07",x_w#,l_h#,p_d#) ; "The letter thorn" ;
+ rad := (h+d)/4 ;
+ uniarc(rad,p_t,(w-rad,rad),-90,90,10) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,-d) ; draw z1--z2 ;
+ top lft z3 = (p_t,2rad) ; top rt z4 = (w-rad,2rad) ;
+ bot lft z5 = (p_t,0) ; bot rt z6 = (w-rad,0) ;
+ draw z3--z4 ; draw z5--z6 ;
+ penlabels(range 1 thru 6) ;
+ endchar ;
+ exitif (not strict) ;
+ if temp = 2 : code_offset := 0 ; fi ;
+ endfor ;
+fi ;
+
+if not strict :
+ for temp = 1,2 :
+ if temp = 2 : do_caps(-3) ; fi ;
+
+ beginchar(hex"08",A_w#,l_h#,0) ; "The variant letter Q";
+ unicir(w/2,P_t,(w/2,h-w/2),10)
+ pickup Unipensqu ;
+ rt top z1 = (w,h-w/2) ; rt bot z2 = (w,0) ; draw z1--z2 ;
+ penlabels(1,2);
+ endchar ;
+
+ beginchar(hex"09",A_w#,l_h#,0) ; "The letter Eng" ;
+ rad := 3C_d ;
+ uniarc(w/2,P_t,(w/2,h-w/2),0,180,10) ;
+ uniarc(rad,P_t,(w-rad,rad),-90,0,20) ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h-w/2) ; bot lft z2 = (0,0); draw z1--z2 ;
+ top rt z3 = (w,h-w/2) ; bot rt z4 = (w,rad) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+ endchar ;
+
+ beginchar(hex"0A",A_w#,l_h#,0) ; "The letter Thorn" ;
+ rad := h/4 ;
+ uniarc(rad,P_t,(w-rad,h/2),-90,90,10) ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ top lft z3 = (P_t,h/2+rad) ; top rt z4 = (w-rad,h/2+rad) ;
+ bot lft z5 = (P_t,h/2-rad) ; bot rt z6 = (w-rad,h/2-rad) ;
+ draw z3--z4 ; draw z5--z6 ;
+ penlabels(range 1 thru 6) ;
+ endchar ;
+ exitif (not caps) ;
+ if temp = 2 : end_do_caps ; fi ;
+ endfor ;
+fi ;
+
+beginchar(hex"0B",x_w#,x_h#,2c_d#) ; "The accent ogoneck" ;
+ uniarc(d/2,2P_T/3,(w/2-d/4,-d/2),-90,90,10) ;
+endchar ;
+
+beginchar(hex"0C",3c_d#,l_h#,p_d#) ; "The left brace ({)" ;
+ uniarc(2c_d,p_t,(3c_d,h-2c_d),90,180,10) ;
+ uniarc(2c_d,p_t,(3c_d,-d+2c_d),180,270,20) ;
+ pickup unipensqu ;
+ top lft z1 = (c_d,h-2c_d) ; bot lft z2 = (c_d,-d+2c_d) ; draw z1--z2 ;
+ lft z3 = (0,(h-d)/2) ; rt z4 = (c_d,(h-d)/2) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+endchar ;
+
+beginchar(hex"0D",3c_d#,l_h#,p_d#) ; "The right brace (})" ;
+ uniarc(2c_d,p_t,(0,h-2c_d),0,90,10) ;
+ uniarc(2c_d,p_t,(0,-d+2c_d),270,360,20) ;
+ pickup unipensqu ;
+ top rt z1 = (w-c_d,h-2c_d) ; bot rt z2 = (w-c_d,-d+2c_d) ;
+ draw z1--z2 ;
+ rt z3 = (w,(h-d)/2) ; lft z4 = (w-c_d,(h-d)/2) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+endchar ;
+
+beginchar(hex"0E",(l_h#+p_d#+2p_t#)/3,l_h#,p_d#) ;
+ "The Paragraph sign" ;
+ uniarc(w/2,p_t,(w/2,h-w/2),30,270,10) ;
+ uniarc(w/2,p_t,(w/2,w/2-d),-150,90,20) ;
+ unicir(w/2,p_t,(w/2,(h-d)/2),30) ;
+endchar ;
+
+beginchar(hex"0F",p_t#,l_h#,p_d#) ; "The symbol bar (|)" ;
+ pickup unipensqu ;
+ lft top z1 = (0,h) ; lft bot z2 = (0,-d) ; draw z1--z2 ;
+ penlabels(1,2);
+endchar ;
+
+beginchar(hex"22",2x_w#/3,x_h#,0) ; "The single left guillomot" ;
+ z1 = (p_t,h/2) ; z2 = (w,h) ; phi := angle(z2-z1) ;
+ uniend(p_t,(z1),90+phi,270-phi,10) ;
+ z3 = (w-p_t/sind(phi),h) ; z4 = z1 + p_t*(-sind(phi),cosd(phi)) ;
+ path rombe ; rombe := z1--z2--z3--z4--cycle ; fill rombe ;
+ fill rombe reflectedabout ((0,h/2),(w,h/2)) ;
+ penlabels(1,2,3,4) ;
+endchar ;
+
+beginchar(hex"5C",2x_w#/3,x_h#,0) ; "The single right guillomot";
+ z1 = (w-p_t,h/2) ; z2 = (0,h) ; phi := 180-angle(z2-z1) ;
+ uniend(p_t,(z1),phi-90,90-phi,10) ;
+ z3 = (p_t/sind(phi),h) ; z4 = z1 + p_t*(sind(phi),cosd(phi)) ;
+ path rombe ; rombe := z1--z2--z3--z4--cycle ; fill rombe ;
+ fill rombe reflectedabout ((0,h/2),(w,h/2)) ;
+ penlabels(1,2,3,4) ;
+endchar ;
+
+\endinput
+%%
+%% End of file `uniext.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/unilig.mf b/Master/texmf-dist/fonts/source/public/universa/unilig.mf
new file mode 100644
index 00000000000..540f79876cb
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/unilig.mf
@@ -0,0 +1,110 @@
+%%
+%% This is file `unilig.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `lig')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if caps:
+ beginchar(hex"19",5/2x_w#,x_h#,0) ; "Ligature SS" ;
+ temp := (h+p_t)/4 ;
+ uniarc(temp,p_t,(temp,temp),180,270,10) ;
+ uniarc(temp,p_t,(2w/5-temp,temp),270,450,20) ;
+ uniarc(temp,p_t,(temp,h-temp),90,270,30) ;
+ uniarc(temp,p_t,(2w/5-temp,h-temp),0,90,40) ;
+ pickup unipensqu ;
+ bot lft z1 = (temp,0) ; bot rt z2 = (2w/5-temp,0) ;
+ lft z3 = (temp,h/2) ; rt z4 = (2w/5-temp,h/2) ;
+ top lft z5 = (temp,h) ; top rt z6 = (2w/5-temp,h) ;
+ draw z1--z2 ; draw z3--z4 ; draw z5--z6 ;
+ penlabels(1,2,3,4,5,6) ;
+ currentpicture := currentpicture + (currentpicture shifted
+ (3/5w,0)) ;
+ endchar ;
+
+else:
+ beginchar(hex"19",(l_h#+3p_t#)/2,l_h#,p_t#) ; "Ligature ss" ;
+ rad := (w-p_t)/2 ;
+ uniarc(rad,p_t,(p_t+rad,h-rad),-90,180,10) ;
+ uniarc(rad,p_t,(p_t+rad,rad),-90,90,20) ;
+ pickup unipensqu ;
+ top lft z1 = (p_t,h-rad) ; bot lft z2 = (p_t,-d) ; draw z1--z2 ;
+ lft z3 = (0,h/2) ; rt z4 = (w-rad,h/2) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+ endchar ;
+fi ;
+
+if not caps :
+ for temp = 1,2 :
+ if temp = 2 : code_offset := 3 ; fi ;
+ beginchar(hex"1A",2x_w#-p_t#,x_h#,0) ; "Ligature ae" ;
+ currentpicture := a_pic + ( e_pic shifted ((w-p_t)/2,0)) ;
+ endchar ;
+
+ beginchar(hex"1B",2x_w#-p_t#,x_h#,0) ; "Ligature oe" ;
+ unicir(h/2,p_t,(h/2,h/2),10) ;
+ currentpicture := currentpicture + (e_pic shifted ((w-p_t)/2,0)) ;
+ endchar ;
+
+ beginchar(hex"1C",x_w#,x_h#,0) ; "Ligature o/" ;
+ unicir(w/2,p_t,(w/2,h/2),10) ;
+ unilne(p_t,(0,0),(w,h),1,1,20) ;
+ endchar ;
+ exitif (not strict) ;
+ if temp = 2 : code_offset := 0 ; fi ;
+ endfor ;
+fi ;
+
+if not strict :
+ for temp = 1,2 :
+ if temp = 2 : do_caps(-3) ; fi ;
+
+ beginchar(hex"1D",M_w#,l_h#,0) ; "Ligature AE" ;
+ uniarc(w/2,P_t,(w/2,h-w/2),90,180,21) ;
+ uniend(P_t,((w+P_t)/2,P_t),180,270,30) ;
+ pickup Unipensqu ;
+ top lft z1 = (w/2,h) ; top rt z2 = (w,h) ;
+ top lft z3 = (0,h-w/2) ; bot lft z4 = (0,0) ;
+ lft z5 = (0,h/2) ; rt z6 = (w,h/2) ;
+ bot lft z7 = ((w+P_t)/2,0) ; bot rt z8 = (w,0) ;
+ top z9 = (w/2,h) ; bot z10 = (w/2,P_t) ;
+ draw z1--z2 ; draw z3--z4 ; draw z5--z6 ;
+ draw z7--z8 ; draw z9--z10 ;
+ penlabels(range 1 thru 10) ;
+ endchar ;
+
+ beginchar(hex"1E",M_w#,l_h#,0) ; "Ligature OE" ;
+ uniarc(h/2,P_t,(h/2,h/2),90,270,10) ;
+ pickup Unipensqu ;
+ top lft z1 = (h/2,h) ; top rt z2 = (w,h) ; draw z1--z2 ;
+ lft z3 = (h/2,h/2) ; rt z4 = (w,h/2) ; draw z3--z4 ;
+ bot lft z5 = (h/2,0) ; bot rt z6 = (w,0) ; draw z5--z6 ;
+ top z7 = (h/2,h) ; bot z8 = (h/2,0) ; draw z7--z8 ;
+ penlabels(range 1 thru 8) ;
+ endchar ;
+
+ beginchar(hex"1F",l_h#,l_h#,0) ; "Liguture O/" ;
+ unicir(w/2,P_t,(w/2,h/2),10) ;
+ unilne(P_t,(0,0),(w,h),1,1,20) ;
+ endchar ;
+
+ exitif (not caps) ;
+ if temp = 2 : end_do_caps ; fi ;
+ endfor ;
+fi ;
+
+\endinput
+%%
+%% End of file `unilig.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/unilow.mf b/Master/texmf-dist/fonts/source/public/universa/unilow.mf
new file mode 100644
index 00000000000..13332715391
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/unilow.mf
@@ -0,0 +1,247 @@
+%%
+%% This is file `unilow.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `low')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if not caps :
+
+ beginchar("a",x_w#,x_h#,0); "The letter a";
+ uniarc(w/2,p_t,(w/2,h/2),0,290,10);
+ pickup unipensqu ;
+ z1 = ((cosd(290)*(w-p_t)+w)/2,(sind(290)*(w-p_t)+w)/2);
+ z2 = (w-p_t/2,2h/5) ; penpos1(p_t,-70); penpos2(p_t,-45);
+ fill z1l{dir(20)}..z2l{dir(45)}--
+ z2r{dir(225)}..z1r{dir(200)}--cycle;
+ top rt z3 = (w,.5h) ; bot rt z4 = (w,0) ; draw z3{down}--z4 ;
+ penlabels(1,2,3,4);
+ a_pic := currentpicture ;
+ endchar;
+
+ beginchar("b",x_w#,l_h#,0); "The letter b";
+ unicir(w/2,p_t,(w/2,w/2),10);
+ pickup unipensqu ;
+ lft bot z1 = (0,w/2) ; lft top z2 = (0,h) ; draw z1{up}--z2 ;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("c",x_w#*(1+cosd(30))/2,x_h#,0); "The letter c";
+ uniarc(h/2,p_t,(h/2,h/2),30,330,10);
+ endchar;
+
+ beginchar("d",x_w#,l_h#,0); "The letter d";
+ unicir(w/2,p_t,(w/2,w/2),10);
+ pickup unipensqu ;
+ rt bot z1 = (w,w/2) ; rt top z2 = (w,h) ; draw z1{up}--z2 ;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("e",x_w#,x_h#,0); "The letter e";
+ uniarc(w/2,p_t,(w/2,h/2),0,330,10);
+ temp := p_t/2 ;
+ pickup pensquare xscaled p_t yscaled temp slanted slantratio ;
+ top rt z1 = (w,h/2) ; drawdot z1 ;
+ pickup unipensqu ;
+ z2 = (p_t,h/2) ; z3 = (w-p_t,h/2) ; draw z2--z3 ;
+ penlabels(1,2,3);
+ e_pic := currentpicture ;
+ endchar;
+
+ beginchar("f",4p_t#,l_h#,0); "The letter f";
+ uniarc(3/4w,p_t,(3/4w,h-3/4w),90,180,10);
+ pickup unipensqu ;
+ top rt z1 = (w,h) ; drawdot z1 ;
+ lft top z2 = (0,h-3/4w) ; bot lft z3 = (0,0) ; draw z2--z3 ;
+ top lft z4 = (0,x_h) ; top rt z5 = (w,x_h) ; draw z4--z5 ;
+ penlabels(1,2,3,4,5);
+ endchar;
+
+ beginchar("g",x_w#,x_h#,p_d#); "The letter g" ;
+ uniarc(w/2,p_t,(w/2,h/2),30,360,10) ;
+ pickup unipensqu ;
+ top rt z1 = (w,h/2) ; bot rt z2 = (w,-d) ; draw z1--z2;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("h",x_w#,l_h#,0); "The letter h" ;
+ uniarc(w/2,p_t,(w/2,w/2),0,180,10) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ top rt z3 = (w,x_h-w/2) ; bot rt z4 = (w,0) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+ endchar;
+
+ beginchar("i",p_t#,l_h#,0) ; "The letter i" ;
+ pickup unipensqu ;
+ top lft z1 = (0,x_h) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ pickup unipencir ;
+ top lft z3 = (0,h) ; drawdot z3 ;
+ penlabels(1,2,3) ;
+ endchar;
+
+ beginchar("j",p_t#,l_h#,p_d#); "The letter j" ;
+ pickup unipensqu ;
+ top lft z1 = (0,x_h) ; bot lft z2 = (0,-d) ; draw z1--z2 ;
+ pickup unipencir ;
+ top lft z3 = (0,h) ; drawdot z3 ;
+ penlabels(1,2,3) ;
+ endchar;
+
+ beginchar("k",(x_h#+3p_t#)/2,x_h#,0) ; "The letter k" ;
+ uniarc((h+p_t)/2,p_t,(p_t,h),270,360,10) ;
+ uniarc((h+p_t)/2,p_t,(p_t,0),0,90,20) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("l",p_t#,l_h#,0) ; "The letter l" ;
+ pickup unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,0) ; draw z1--z2;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("m",m_w#,x_h#,0) ; "The letter m" ;
+ temp := .25*(w+p_t);
+ uniarc(temp,p_t,(temp,h-temp),0,180,10) ;
+ uniarc(temp,p_t,(w-temp,h-temp),0,180,20) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h-temp) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ top z3 = (w/2,h-temp) ; bot z4 = (w/2,0) ; draw z3--z4 ;
+ top rt z5 = (w,h-temp) ; bot rt z6 = (w,0) ; draw z5--z6 ;
+ penlabels(1,2,3,4,5,6);
+ endchar;
+
+ beginchar("n",x_w#,x_h#,0); "The letter n" ;
+ uniarc(w/2,p_t,(w/2,h-w/2),0,180,10) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h-w/2) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ top rt z3 = (w,h-w/2) ; bot rt z4 = (w,0) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+ endchar;
+
+ beginchar("o",x_w#,x_h#,0) ; "The letter o";
+ unicir(w/2,p_t,(w/2,h/2),10);
+ endchar;
+
+ beginchar("p",x_w#,x_h#,p_d#) ; "The letter p" ;
+ unicir(w/2,p_t,(w/2,w/2),10);
+ pickup unipensqu ;
+ lft top z1 = (0,h/2) ; lft bot z2 = (0,-d) ; draw z1--z2 ;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("q",x_w#,x_h#,p_d#) ; "The letter q" ;
+ unicir(w/2,p_t,(w/2,w/2),10);
+ pickup unipensqu ;
+ rt top z1 = (w,h/2) ; rt bot z2 = (w,-d) ; draw z1--z2 ;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("r",3p_t#,x_h#,0) ; "The letter r" ;
+ uniarc(w,p_t,(w,h-w),90,180,10) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h-w) ; bot lft z2 = (0,0) ; draw z1--z2;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("s",x_w#,x_h#,0) ; "The letter s" ;
+ temp := (h+p_t)/4 ;
+ uniarc(temp,p_t,(temp,temp),180,270,10) ;
+ uniarc(temp,p_t,(w-temp,temp),270,450,20) ;
+ uniarc(temp,p_t,(temp,h-temp),90,270,30) ;
+ uniarc(temp,p_t,(w-temp,h-temp),0,90,40) ;
+ pickup unipensqu ;
+ bot lft z1 = (temp,0) ; bot rt z2 = (w-temp,0) ; draw z1--z2 ;
+ lft z3 = (temp,h/2) ; rt z4 = (w-temp,h/2) ; draw z3--z4 ;
+ top lft z5 = (temp,h) ; top rt z6 = (w-temp,h) ; draw z5--z6 ;
+ penlabels(1,2,3,4,5,6) ;
+ endchar;
+
+ beginchar("t",p_t#+2c_d#,l_h#,0); "The letter t" ;
+ pickup unipensqu ;
+ top z1 = (w/2,h) ; bot z2 = (w/2,0) ; draw z1--z2 ;
+ top lft z3 = (0,x_h) ; top rt z4 = (w,x_h) ; draw z3--z4 ;
+ penlabels(1,2,3,4);
+ endchar;
+
+ beginchar("u",x_w#,x_h#,0); "The letter u" ;
+ uniarc(w/2,p_t,(w/2,w/2),180,360,10) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,w/2) ; draw z1--z2 ;
+ top rt z3 = (w,h) ; bot rt z4 = (w,w/2) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+ endchar;
+
+ beginchar("v",x_w#,x_h#,0); "The letter v" ;
+ unilne(p_t,(0,h),(w/2,p_t),1,1,10);
+ unilne(p_t,(w/2,p_t),(w,h),1,1,20);
+ uniarc(p_t,p_t,(w/2,p_t),180,360,30);
+ endchar;
+
+ beginchar("w",m_w#,x_h#,0) ; "The letter w" ;
+ temp := .25*(w+p_t);
+ uniarc(temp,p_t,(temp,temp),180,360,10) ;
+ uniarc(temp,p_t,(w-temp,temp),180,360,20) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,temp) ; draw z1--z2 ;
+ top z3 = (w/2,h) ; bot z4 = (w/2,temp) ; draw z3--z4 ;
+ top rt z5 = (w,h) ; bot rt z6 = (w,temp) ; draw z5--z6 ;
+ penlabels(1,2,3,4,5,6);
+ endchar;
+
+ beginchar("x",x_w#,x_h#,0) ; "The letter x" ;
+ uniarc(h/2,p_t,(p_t/2,h/2),270,90,10);
+ uniarc(h/2,p_t,(w-p_t/2,h/2),90,270,20);
+ temp := (w-h+p_t)/2 ;
+ pickup pensquare xscaled temp yscaled p_t slanted slantratio ;
+ lft top z1 = (0,h) ; drawdot z1 ;
+ lft bot z2 = (0,0) ; drawdot z2 ;
+ rt top z3 = (w,h) ; drawdot z3 ;
+ rt bot z4 = (w,0) ; drawdot z4 ;
+ penlabels(1,2,3,4);
+ endchar;
+
+ beginchar("y",x_w#,x_h#,p_d#); "The letter y" ;
+ uniarc(w/2,p_t,(w/2,w/2),180,360,10) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,w/2); draw z1--z2 ;
+ top rt z3 = (w,h) ; bot rt z4 = (w,-d) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+ endchar;
+
+ beginchar("z",x_w#,x_h#,0) ; "The letter z" ;
+ pickup unipensqu ;
+ top lft z1 = (0,h) ; top rt z2 = (w-p_t,h) ; draw z1--z2 ;
+ bot lft z3 = (p_t,0) ; bot rt z4 = (w,0) ; draw z3--z4 ;
+ phi := angle((w,h-p_t)-(0,p_t)) ; % Uuuuupps !?!!!!!!
+ z5 = (p_t,p_t) ; z6 = z5 + p_t*(-sind(phi),cosd(phi)) ;
+ z7 = (w-p_t,h-p_t) ; z8 = z7 + p_t*(sind(phi),-cosd(phi)) ;
+ uniend(p_t,z5,90+phi,270,10);
+ uniend(p_t,z7,-90+phi,90,20);
+ fill z5--z6--z7--z8--cycle ;
+ penlabels(range 1 thru 8);
+ endchar;
+
+else :
+ do_caps(ASCII"a" - ASCII"A") ;
+ input uniupp ;
+ end_do_caps ;
+fi ;
+
+\endinput
+%%
+%% End of file `unilow.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/unipun.mf b/Master/texmf-dist/fonts/source/public/universa/unipun.mf
new file mode 100644
index 00000000000..9fdb2cf625a
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/unipun.mf
@@ -0,0 +1,170 @@
+%%
+%% This is file `unipun.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `pun')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+beginchar("!",P_T#,l_h#,0) ; "The exclamation mark (!)" ;
+ pickup UniPensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,2P_T) ; draw z1--z2 ;
+ pickup UniPencir ;
+ bot lft z3 = (0,0) ; drawdot z3 ;
+ penlabels(1,2,3) ;
+endchar;
+
+beginchar("(",x_w#/2,l_h#,p_d#) ; "The left paranthesis (()" ;
+ z1 = (w,h) ; z2 = (p_t,(h-d)/2) ; z3 = (w,-d) ;
+ z4 = (w-p_t,-d) ; z5 = (0,(h-d)/2) ; z6 = (w-p_t,h) ;
+ fill z1..z2..z3--z4..z5..z6--cycle ;
+ penlabels(range 1 thru 6) ;
+endchar;
+
+beginchar(")",x_w#/2,l_h#,p_d#) ; "The right paranthesis ())" ;
+ z1 = (p_t,h) ; z2 = (w,(h-d)/2) ; z3 = (p_t,-d) ;
+ z4 = (0,-d) ; z5 = (w-p_t,(h-d)/2) ; z6 = (0,h) ;
+ fill z1..z2..z3--z4..z5..z6--cycle ;
+ penlabels(range 1 thru 6) ;
+endchar;
+
+beginchar("#",x_w#,x_h#,0) ; "The hash mark (#)" ;
+ unilne(p_t,(0,0),(w/2,h),1,1,10) ;
+ unilne(p_t,(w/2,0),(w,h),1,1,20) ;
+ pickup unipensqu ;
+ top lft z1 = (0,(h-c_d)/2) ; top rt z2 = (w,(h-c_d)/2) ;
+ bot lft z3 = (0,(h+c_d)/2) ; bot rt z4 = (w,(h+c_d)/2) ;
+ draw z1--z2 ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+endchar;
+
+beginchar("%",x_w#,l_h#,0) ; "The percent sign (%)" ;
+ temp := 3c_d/2 ;
+ unicir(temp,p_t,(temp,h-temp),10) ;
+ unicir(temp,p_t,(w-temp,temp),20) ;
+ unilne(p_t,(0,0),(w,h),1,1,30) ;
+endchar;
+
+beginchar("'",2P_T#,l_h#,0) ; "The apostrophe (')" ;
+ uniend(w/2,(w/2,h-w/2),0,180,10) ;
+ z1 = (0,h-w/2) ; z2 = (w,h-w/2) ; z3 = (0,h-3w/2) ;
+ fill z1--z2--z3--cycle ; penlabels(1,2,3) ;
+endchar;
+
+beginchar("*",x_w#,l_h#,0) ; "The ast (*)" ;
+ path rect ;
+ temp := h-(w*sind(60)-p_t*cosd(60))/2 ;
+ pickup unipensqu ;
+ lft z1 = (0,temp) ; rt z2 = (w,temp) ; draw z1--z2 ;
+ rect = (bot lft z1)--(top lft z1)--(top rt z2)--(bot rt z2)--cycle ;
+ fill rect rotatedabout((w/2,temp),60) ;
+ fill rect rotatedabout((w/2,temp),120) ;
+ penlabels(1,2) ;
+endchar;
+
+beginchar("+",x_w#,x_h#,0) ; "The plus sign (+)" ;
+ pickup unipensqu ;
+ lft z1 = (0,w/2) ; rt z2 = (w,w/2) ; draw z1--z2 ;
+ bot z3 = (w/2,0) ; top z4 = (w/2,w) ; draw z3--z4 ;
+endchar;
+
+beginchar(",",2P_T#,2P_T#,2P_T#) ; "The punctuation ," ;
+ uniend(w/2,(w/2,0),0,180,10) ;
+ z1 = (0,0) ; z2 = (w,0) ; z3 = (0,-d) ;
+ fill z1--z2--z3--cycle ; penlabels(1,2,3) ;
+endchar;
+
+beginchar("-",4x_w#/5,x_h#,0) ; "The hyphen (-)" ;
+ pickup unipensqu ;
+ lft z1 = (0,h/2) ; rt z2 = (w,h/2) ; draw z1--z2 ;
+ penlabels(1,2);
+endchar;
+
+beginchar(".",2P_T#,2P_T#,0) ; "The punctuation ." ;
+ uniend(w/2,(w/2,h/2),0,360,10) ;
+endchar;
+
+beginchar("/",x_w#,l_h#,0) ; "The slash (/)" ;
+ unilne(p_t,(0,0),(w,h),1,1,10) ;
+endchar;
+
+beginchar(":",2P_T#,x_h#,0) ; "The punctuation :" ;
+ uniend(w/2,(w/2,h-w/2),0,360,10) ;
+ uniend(w/2,(w/2,w/2),0,360,20) ;
+endchar;
+
+beginchar(";",2P_T#,x_h#,2P_T#) ; "The punctuation ;" ;
+ uniend(w/2,(w/2,h-w/2),0,360,10) ;
+ uniend(w/2,(w/2,0),0,180,20) ;
+ z2 = (0,0) ; z3 = (w,0) ; z4 = (0,-d) ; fill z2--z3--z4--cycle ;
+ penlabels(1,2,3,4) ;
+endchar;
+
+beginchar("=",x_w#,x_h#,0) ; "The equal sign (=)" ;
+ pickup unipensqu ;
+ top lft z1 = (0,(h-p_t)/2) ; top rt z2 = (w,(h-p_t)/2) ;
+ bot lft z3 = (0,(h+p_t)/2) ; bot rt z4 = (w,(h+p_t)/2) ;
+ draw z1--z2 ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+endchar;
+
+beginchar("@",l_h#,l_h#,0) ; "The at sign (@)" ;
+ uniarc(w/2,p_t,(w/2,h/2),0,240,10) ;
+ unicir(w/3,p_t,(2w/3,w/3),20) ;
+ pickup unipensqu ;
+ top rt z1 = (w,w/2) ; bot rt z2 = (w,0) ; draw z1--z2 ;
+ penlabels(1,2) ;
+endchar;
+
+beginchar("[",3p_t#,l_h#,p_d#) ; "The left bracket ([)" ;
+ uniend(p_t,(p_t,h-p_t),90,180,10) ;
+ uniend(p_t,(p_t,-d+p_t),180,270,20) ;
+ pickup unipensqu ;
+ top lft z1 = (p_t,h) ; top rt z2 = (w,h) ; draw z1--z2 ;
+ top lft z3 = (0,h-p_t) ; bot lft z4 = (0,-d+p_t) ; draw z3--z4 ;
+ bot lft z5 = (p_t,-d) ; bot rt z6 = (w,-d) ; draw z5--z6 ;
+ penlabels(range 1 thru 6) ;
+endchar;
+
+beginchar("]",3p_t#,l_h#,p_d#) ; "The right braket (])" ;
+ uniend(p_t,(w-p_t,h-p_t),0,90,10) ;
+ uniend(p_t,(w-p_t,-d+p_t),270,360,20) ;
+ pickup unipensqu ;
+ top lft z1 = (0,h) ; top rt z2 = (w-p_t,h) ; draw z1--z2 ;
+ top rt z3 = (w,h-p_t) ; bot rt z4 = (w,-d+p_t) ; draw z3--z4 ;
+ bot lft z5 = (0,-d) ; bot rt z6 = (w-p_t,-d) ; draw z5--z6 ;
+ penlabels(range 1 thru 6) ;
+endchar;
+
+beginchar("`",2P_T#,l_h#,0) ; "The reversed apostroph (`)" ;
+ uniend(w/2,(w/2,h-w),180,360,10) ;
+ z1 = (0,h) ; z2 = (0,h-w) ; z3 = (w,h-w) ; fill z1--z2--z3--cycle ;
+ penlabels(1,2,3) ;
+endchar;
+
+beginchar(hex"7B",m_w#,x_h#,0) ; "The en-dash (--)" ;
+ pickup unipensqu ;
+ lft z1 = (0,h/2) ; rt z2 = (w,h/2) ; draw z1--z2 ;
+ penlabels(1,2) ;
+endchar;
+
+beginchar(hex"7C",M_w#,x_h#,0) ; "The em-dash (---)" ;
+ pickup unipensqu ;
+ lft z1 = (0,h/2) ; rt z2 = (w,h/2) ; draw z1--z2 ;
+ penlabels(1,2) ;
+endchar;
+
+\endinput
+%%
+%% End of file `unipun.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/unispe.mf b/Master/texmf-dist/fonts/source/public/universa/unispe.mf
new file mode 100644
index 00000000000..8f728daa191
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/unispe.mf
@@ -0,0 +1,82 @@
+%%
+%% This is file `unispe.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `spe')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+beginchar(hex"10",p_t#,x_h#,0) ; "The dotless letter i" ;
+ pickup unipensqu ;
+ bot lft z1 = (0,0) ; top lft z2 = (0,h) ; draw z1--z2;
+ penlabels(1,2);
+endchar;
+
+beginchar(hex"11",p_t#,x_h#,p_d#) ; "The dotless letter j" ;
+ pickup unipensqu ;
+ bot lft z1 = (0,-d) ; top lft z2 = (0,h) ; draw z1--z2 ;
+ penlabels(1,2);
+endchar;
+
+beginchar("$",(l_h#-c_d#+p_t#)/2,l_h#,c_d#) ; "The dollar sign ($)" ;
+ uniarc(w/2,p_t,(w/2,w/2),180,450,10) ;
+ uniarc(w/2,p_t,(w/2,h-c_d-w/2),0,270,20) ;
+ pickup unipensqu ;
+ top z1 = (w/2,h) ; bot z2 = (w/2,-d) ; draw z1--z2 ;
+ penlabels(1,2) ;
+endchar;
+
+beginchar("&",(l_h#+p_t#)/2+c_d#,l_h#,c_d#) ; "The ampersand (&)" ;
+ rad := (w-c_d)/2 ;
+ unicir(rad,p_t,(rad,h-rad),10) ;
+ uniarc(rad,p_t,(rad,rad),0,270,20) ;
+ pickup unipensqu ;
+ lft bot z1 = (rad,0) ; rt bot z2 = (w,0) ; draw z1--z2 ;
+ rt top z3 = (w-c_d,rad) ; rt bot z4 = (w-c_d,-d) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+endchar;
+
+beginchar("?",l_h#-5c_d#/2,l_h#,0) ; "The question mark (?)" ;
+ temp := angle((P_T,-w/2)) - 0.01 ;
+ uniarc(w/2,P_T,(w/2,h-w/2),temp,180,10) ;
+ uniend(P_T,((w+P_T)/2,h-w),90,180,20) ;
+ uniend(P_T,((w+P_T)/2,h-w+P_T),270,360+temp,30) ;
+ pickup UniPensqu ;
+ top z1 = (w/2,h-w) ; bot z2 = (w/2,2P_T) ; draw z1--z2 ;
+ pickup UniPencir ;
+ bot z3 = (w/2,0) ; drawdot z3 ;
+ penlabels(1,2,3) ;
+endchar;
+
+beginchar(spanish_query,l_h#-5c_d#/2,x_h#,p_d#) ; "The Spanish query" ;
+ temp := angle((-P_T,w/2))-0.01 ;
+ uniarc(w/2,P_T,(w/2,-d+w/2),temp,360,10) ;
+ uniend(P_T,((w-P_T)/2,-d+w),270,360,20) ;
+ uniend(P_T,((w-P_T)/2,-d+w-P_T),90,temp,30) ;
+ pickup UniPensqu ;
+ bot z1 = (w/2,-d+w) ; top z2 = (w/2,h-2P_T) ; draw z1--z2 ;
+ pickup UniPencir ;
+ top z3 = (w/2,h) ; drawdot z3 ;
+ penlabels(1,2,3) ;
+endchar;
+
+beginchar(spanish_shriek,P_T#,x_h#,p_d#) ; "The Spanish shriek" ;
+ pickup UniPencir ; top z1 = (w/2,h) ; drawdot z1 ;
+ pickup UniPensqu ; top z2 = (w/2,h-2P_T) ; bot z3 = (w/2,-d) ;
+ draw z2--z3 ; penlabels(1,2,3) ;
+endchar;
+
+\endinput
+%%
+%% End of file `unispe.mf'.
diff --git a/Master/texmf-dist/fonts/source/public/universa/uniupp.mf b/Master/texmf-dist/fonts/source/public/universa/uniupp.mf
new file mode 100644
index 00000000000..2890fa5557c
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/public/universa/uniupp.mf
@@ -0,0 +1,264 @@
+%%
+%% This is file `uniupp.mf',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uni.dtx (with options: `upp')
+%%
+%% Copyright (C) 1998 Christian Holm.
+%%
+%% The universal font and package is distributed in the hope that
+%% it will be useful, but WITHOUT ANY WARRANTY; without even the
+%% implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
+%% PURPOSE. See the GNU General Public License for more details.
+%%
+%% See the file uni.dtx for further comments and documentation.
+%%
+
+
+if not strict :
+
+ beginchar("A",A_w#,l_h#,0); "The letter A";
+ uniarc(w/2,P_t,(w/2,h-w/2),0,180,10);
+ pickup Unipensqu ;
+ top lft z1 = (0,h-w/2) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ top rt z3 = (w,h-w/2) ; bot rt z4 = (w,0) ; draw z3--z4 ;
+ lft z5 = (0,h/2) ; rt z6 = (w,h/2) ; draw z5--z6 ;
+ penlabels(1,2,3,4,5,6);
+ endchar;
+
+ beginchar("B",A_w#,l_h#,0) ; "The letter B" ;
+ rad := 1/4(h+P_t) ;
+ uniarc(rad,P_t,(w-rad,h-rad),-90,90,10) ;
+ uniarc(rad,P_t,(w-rad,rad),-90,90,20) ;
+ uniend(P_t,(P_t,h-P_t),90,180,30) ;
+ uniend(P_t,(P_t,P_t),180,270,40) ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h-P_t) ; bot lft z2 = (0,P_t) ; draw z1--z2 ;
+ top lft z3 = (P_t,h) ; top rt z4 = (w-rad,h) ; draw z3--z4 ;
+ lft z5 = (P_t,h/2) ; rt z6 = (w-rad,1/2h) ; draw z5--z6 ;
+ bot lft z7 = (P_t,0) ; bot rt z8 = (w-rad,0) ; draw z7--z8 ;
+ penlabels(range 1 thru 8);
+ endchar;
+
+ beginchar("C",l_h#*(1+cosd(30))/2,l_h#,0); "The letter C";
+ uniarc(h/2,P_t,(h/2,h/2),30,330,10);
+ endchar;
+
+ beginchar("D",A_w#,l_h#,0); "The letter D";
+ uniarc(1/2h,P_t,(w-1/2h,1/2h),-90,90,10);
+ uniend(P_t,(P_t,h-P_t),90,180,20);
+ uniend(P_t,(P_t,P_t),180,270,30);
+ pickup Unipensqu ;
+ top lft z1 = (0,h-P_t) ; bot lft z2 = (0,P_t) ; draw z1--z2 ;
+ top lft z3 = (P_t,h) ; top rt z4 = (w-1/2h,h) ; draw z3--z4 ;
+ bot lft z5 = (P_t,0) ; bot rt z6 = (w-1/2h,0) ; draw z5--z6 ;
+ penlabels(1,2) ;
+ endchar;
+
+ beginchar("E",A_w#,l_h#,0); "The letter E" ;
+ uniend(P_t,(P_t,h-P_t),90,180,10);
+ uniend(P_t,(P_t,P_t),180,270,20);
+ pickup Unipensqu ;
+ lft top z1 = (P_t,h) ; rt top z2 = (w,h) ; draw z1--z2 ;
+ lft z3 = (P_t,h/2) ; rt z4 = (w,h/2) ; draw z3--z4 ;
+ lft bot z5 = (P_t,0) ; rt bot z6 = (w,0) ; draw z5--z6 ;
+ lft top z7 = (0,h-P_t) ; lft bot z8 = (0,P_t) ; draw z7--z8 ;
+ penlabels(range 1 thru 8) ;
+ endchar;
+
+ beginchar("F",A_w#,l_h#,0); "The letter F" ;
+ uniend(P_t,(P_t,h-P_t),90,180,10);
+ pickup Unipensqu ;
+ lft top z1 = (P_t,h) ; rt top z2 = (w,h) ; draw z1--z2 ;
+ lft z3 = (P_t,h/2) ; rt z4 = (w,h/2) ; draw z3--z4 ;
+ lft top z5 = (0,h-P_t) ; lft bot z6 = (0,0) ; draw z5--z6 ;
+ penlabels(range 1 thru 8);
+ endchar;
+
+ beginchar("G",l_h#,l_h#,0); "The letter G" ;
+ uniarc(w/2,P_t,(w/2,h/2),30,360,10) ;
+ pickup Unipensqu ;
+ top rt z1 = (w,h/2) ; bot rt z2 = (w,0) ;
+ draw z1--z2;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("H",A_w#,l_h#,0); "The letter H" ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ top rt z3 = (w,h) ; bot rt z4 = (w,0) ; draw z3--z4 ;
+ lft z5 = (0,h/2) ; rt z6 = (w,h/2) ; draw z5--z6 ;
+ penlabels(1,2,3,4,5,6);
+ endchar;
+
+ beginchar("I",P_t#,l_h#,0); "The letter I" ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("J",P_t#+2C_d#,l_h#,0); "The letter J";
+ uniend(P_t,(w-P_t,P_t),270,360,10);
+ pickup Unipensqu ;
+ lft bot z1 = (0,0) ; rt bot z2 = (w-P_t,0) ; draw z1--z2 ;
+ rt bot z3 = (w,P_t) ; rt top z4 = (w,h) ; draw z3--z4 ;
+ penlabels(1,2,3,4);
+ endchar;
+
+ beginchar("K",(l_h#+3P_t#)/2,l_h#,0) ; "The letter K" ;
+ uniarc((h+P_t)/2,P_t,(P_t,h),270,360,10) ;
+ uniarc((h+P_t)/2,P_t,(P_t,0),0,90,20) ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("L",P_t#+2C_d#,l_h#,0) ; "The letter L" ;
+ uniend(P_t,(P_t,P_t),180,270,10) ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,P_t) ; draw z1--z2 ;
+ bot lft z3 = (P_t,0) ; bot rt z4 = (w,0) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+ endchar;
+
+ beginchar("M",M_w#,l_h#,0) ; "The letter M" ;
+ temp := .25*(w+P_t);
+ uniarc(temp,P_t,(temp,h-temp),0,180,10) ;
+ uniarc(temp,P_t,(w-temp,h-temp),0,180,20) ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h-temp) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ top z3 = (w/2,h-temp) ; bot z4 = (w/2,0) ; draw z3--z4 ;
+ top rt z5 = (w,h-temp) ; bot rt z6 = (w,0) ; draw z5--z6 ;
+ penlabels(1,2,3,4,5,6);
+ endchar;
+
+ beginchar("N",A_w#,l_h#,0); "The letter N" ;
+ uniarc(w/2,P_t,(w/2,h-w/2),0,180,10) ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h-w/2) ; bot lft z2 = (0,0); draw z1--z2 ;
+ top rt z3 = (w,h-w/2) ; bot rt z4 = (w,0) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+ endchar;
+
+ beginchar("O",l_h#,l_h#,0) ; "The letter O";
+ unicir(w/2,P_t,(w/2,h/2),10);
+ endchar;
+
+ beginchar("P",A_w#,l_h#,0) ; "The letter P";
+ unicir(w/2,P_t,(w/2,h-w/2),10)
+ pickup Unipensqu ;
+ lft top z1 = (0,h-w/2) ; lft bot z2 = (0,0) ; draw z1--z2 ;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("Q",l_h#,l_h#,p_d#) ; "The letter Q";
+ unicir(w/2,P_t,(w/2,w/2),10);
+ pickup Unipensqu ;
+ top z1 = (w/2,3P_t) ; bot z2 = (w/2,-d) ; draw z1--z2 ;
+ penlabels(1,2);
+ endchar;
+
+ beginchar("R",A_w#,l_h#,0) ; "The letter R";
+ unicir(w/2,P_t,(w/2,h-w/2),10) ;
+ rad := h-w+P_t ;
+ uniarc(rad,P_t,(w-rad,0),0,90,20) ;
+ pickup Unipensqu ;
+ lft top z1 = (0,h-w/2) ; bot lft z2 = (0,0) ; draw z1--z2 ;
+ temp := w/2-rad ;
+ if temp>0 :
+ pickup pensquare xscaled temp yscaled P_t ;
+ lft top z3 = (1/2w,rad) ; drawdot z3 ;
+ fi;
+ penlabels(1,2,3) ;
+ endchar;
+
+ beginchar("S",A_w#,l_h#,0) ; "The letter S" ;
+ temp := (h+P_t)/4 ;
+ uniarc(temp,P_t,(temp,temp),180,270,10) ;
+ uniarc(temp,P_t,(w-temp,temp),270,450,20) ;
+ uniarc(temp,P_t,(temp,h-temp),90,270,30) ;
+ uniarc(temp,P_t,(w-temp,h-temp),0,90,40) ;
+ pickup Unipensqu ;
+ bot lft z1 = (temp,0) ; bot rt z2 = (w-temp,0) ; draw z1--z2 ;
+ lft z3 = (temp,h/2) ; rt z4 = (w-temp,h/2) ; draw z3--z4 ;
+ top lft z5 = (temp,h) ; top rt z6 = (w-temp,h) ; draw z5--z6 ;
+ penlabels(1,2,3,4,5,6) ;
+ endchar;
+
+ beginchar("T",A_w#,l_h#,0); "The letter T" ;
+ pickup Unipensqu ;
+ top z1 = (w/2,h) ; bot z2 = (w/2,0) ; draw z1--z2 ;
+ top lft z3 = (0,h) ; top rt z4 = (w,h) ; draw z3--z4 ;
+ penlabels(1,2,3,4);
+ endchar;
+
+ beginchar("U",A_w#,l_h#,0); "The letter U" ;
+ uniarc(w/2,P_t,(w/2,w/2),180,360,10) ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,w/2) ; draw z1--z2 ;
+ top rt z3 = (w,h) ; bot rt z4 = (w,w/2) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+ endchar;
+
+ beginchar("V",A_w#,l_h#,0); "The letter V" ;
+ unilne(P_t,(0,h),(w/2,P_t),1,1,10);
+ unilne(P_t,(w/2,P_t),(w,h),1,1,20);
+ uniarc(P_t,P_t,(w/2,P_t),180,360,30);
+ endchar;
+
+ beginchar("W",M_w#,l_h#,0) ; "The letter W" ;
+ temp := .25*(w+P_t);
+ uniarc(temp,P_t,(temp,temp),180,360,10) ;
+ uniarc(temp,P_t,(w-temp,temp),180,360,20) ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h) ; bot lft z2 = (0,temp) ; draw z1--z2 ;
+ top z3 = (w/2,h) ; bot z4 = (w/2,temp) ; draw z3--z4 ;
+ top rt z5 = (w,h) ; bot rt z6 = (w,temp) ; draw z5--z6 ;
+ penlabels(1,2,3,4,5,6);
+ endchar;
+
+ beginchar("X",l_h#,l_h#,0) ; "The letter X" ;
+ uniarc(h/2,P_t,(P_t/2,h/2),270,90,10);
+ uniarc(h/2,P_t,(w-P_t/2,h/2),90,270,20);
+ temp := (h-w+P_t)/2 ;
+ pickup pensquare xscaled temp yscaled P_t slanted slantratio ;
+ lft top z1 = (0,h) ; draw z1 ;
+ lft bot z2 = (0,0) ; draw z2 ;
+ rt top z3 = (w,h) ; draw z3 ;
+ rt bot z4 = (w,0) ; draw z4 ;
+ penlabels(1,2,3,4);
+ endchar;
+
+ beginchar("Y",A_w#,l_h#,0); "The letter Y" ;
+ uniarc(w/2,P_t,(w/2,h-P_t),180,360,10) ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h) ; drawdot z1 ;
+ top rt z2 = (w,h) ; drawdot z2 ;
+ top z3 = (w/2,h-w/2) ; bot z4 = (w/2,0) ; draw z3--z4 ;
+ penlabels(1,2,3,4) ;
+ endchar;
+
+ beginchar("Z",A_w#,l_h#,0) ; "The letter Z" ;
+ pickup Unipensqu ;
+ top lft z1 = (0,h) ; top rt z2 = (w-P_t,h) ; draw z1--z2 ;
+ bot lft z3 = (P_t,0) ; bot rt z4 = (w,0) ; draw z3--z4 ;
+ phi := angle((w,h-P_t)-(0,P_t)) ;
+ z5 = (P_t,P_t) ; z6 = z5 + P_t*(-sind(phi),cosd(phi)) ;
+ z7 = (w-P_t,h-P_t) ; z8 = z7 + P_t*(sind(phi),-cosd(phi)) ;
+ uniend(P_t,z5,90+phi,270,10);
+ uniend(P_t,z7,-90+phi,90,20);
+ fill z5--z6--z7--z8--cycle ;
+ penlabels(range 1 thru 8);
+ endchar;
+
+else :
+ code_offset := ASCII"A" - ASCII"a" ;
+ input unilow ;
+ code_offset := 0 ;
+fi ;
+
+\endinput
+%%
+%% End of file `uniupp.mf'.