diff options
author | Karl Berry <karl@freefriends.org> | 2006-01-09 23:38:21 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-01-09 23:38:21 +0000 |
commit | 215012a8d684889983ec2c0629e1c704e6853d9c (patch) | |
tree | ebf1271bd71869069824935ae8a5678745bf8bce /Master/texmf-dist/fonts/source/public/bbold/bbupper.mf | |
parent | 1af3d19d6dbcbf309667d9cb4aa3cdda914914a9 (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/bbold/bbupper.mf')
-rw-r--r-- | Master/texmf-dist/fonts/source/public/bbold/bbupper.mf | 698 |
1 files changed, 698 insertions, 0 deletions
diff --git a/Master/texmf-dist/fonts/source/public/bbold/bbupper.mf b/Master/texmf-dist/fonts/source/public/bbold/bbupper.mf new file mode 100644 index 00000000000..c839abf2ed9 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/bbold/bbupper.mf @@ -0,0 +1,698 @@ +% Blackboard bold capitals, Alan Jeffrey, 11--14 Dec 1989. + +% ------------------------------------------------------------------- + +bbcap + ("A") + (smallgap#, medcap#, smallgap#); + + "The letter A"; + + % The bar, clipped by the wedge. + draw + cliptwice + (ABar~Left -- ABar~Right) + (Bottom~Left -- Top~Middle -- Bottom~Right); + + % The left line, fattened, and clipped by the right line. + outline + fatcliponce + (rightof Bottom~Left -- rightof Top~Middle) + (Top~Middle -- Bottom~Right); + + % The right line. + draw + Top~Middle + -- Bottom~Right + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("B") + (biggap#, smallcap#, medgap#); + + "The letter B"; + + % The top arc. + draw + Top~Left + -- Top~Middle {right} + .. (Top -+- BBar)~Right + .. {left} BBar~Middle + -- BBar~Left; + + % The bottom arc. + draw + BBar~Left + -- BBar~Middle {right} + .. (BBar -+- Bottom)~Right + .. {left} Bottom~Middle + -- Bottom~Left; + + % The left line, fattened. + outline + fatten + rightof Top~Left + -- rightof Bottom~Left + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("C") + (medgap#, medcap#, medgap#); + + "The letter C"; + + % The curve of the C. + var (path) Cpath; + + Cpath + = (Top - CCurl)~Right + .. oabove Top~Middle {left} + .. Horizon~Left {down} + .. obelow Bottom~Middle {right} + .. (Bottom + CCurl)~Right; + + % The fat line emphasising the left side, clipped by the curve. + draw + fatcliptwice + (obelow rightof Bottom~Left -- oabove rightof Top~Left) + (Cpath); + + % The curve. + draw Cpath + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("D") + (biggap#, medcap#, medgap#); + + "The letter D"; + + % The curve of the D. + draw + Top~Left + -- Top~Middle {right} + .. Horizon~Right {down} + .. {left} Bottom~Middle + -- Bottom~Left; + + % The left line, fattened. + draw + fatten + rightof Top~Left + --- rightof Bottom~Left + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("E") + (biggap#, smallcap#, smallgap#); + + "The letter E"; + + % The top line. + draw + Top~Left + -- Top~Right; + + % The bar. + draw + BBar~Left + -- farrightof BBar~(Left + bigjut); + + % The bottom line. + draw + Bottom~Left + -- Bottom~Right; + + % The left line, fattened. + outline + fatten + rightof Top~Left + -- rightof Bottom~Left + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("F") + (biggap#, smallcap#, smallgap#); + + "The letter F"; + + % The top line. + draw + Top~Left + -- Top~Right; + + % The bar. + draw + BBar~Left + -- farrightof BBar~(Left + bigjut); + + % The left line, fattened. + outline + fatten + rightof Top~Left + -- rightof Bottom~Left +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("G") + (medgap#, medcap#, medgap#); + + "The letter G"; + + % The curve of the G (which is the same as of a C). + var (path) Gpath; + + Gpath + = (Top - CCurl)~Right + .. oabove Top~Middle {left} + .. Horizon~Left {down} + .. obelow Bottom~Middle {right} + .. (Bottom + CCurl)~Right; + + % The emphasis for the left of the curve. + draw + fatcliptwice + (rightof obelow Bottom~Left -- oabove rightof Top~Left) + (Gpath); + + % The curve. + draw Gpath; + + % The bar. + draw + (Bottom + CCurl)~Right + -- GBar~Right + -- GBar~(Right - bigjut) + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("H") + (biggap#, medcap#, biggap#); + + "The letter H"; + + % The right line. + draw + Top~Right + -- Bottom~Right; + + % The bar. + draw + BBar~Left + -- BBar~Right; + + % The left line, fattened. + outline + fatten + rightof Top~Left + -- rightof Bottom~Left + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("I") + (biggap#, tiny#, biggap#); + + "The letter I"; + + % The vertical, fattened. + draw + fatten + Top~Middle + -- Bottom~Middle + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("J") + (medgap#, smallcap#, biggap#); + + "The letter J"; + + % The curve. + var (path) Jpath; + + Jpath + = Top~Right + -- (Bottom -+- Top)~Right {down} + .. obelow Bottom~Middle {left} + .. (Bottom + CCurl)~Left; + + % The emphasis on the J, clipped by the curve. + draw + fatcliponce + (leftof Top~Right -- obelow leftof Bottom~Right) + (Jpath); + + % The curve. + draw Jpath + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("K") + (biggap#, smallcap#, medgap#); + + "The letter K"; + + % The point at which the top diagonal hits the left side of the character. + % It is somewhere along the line from the top right to BBar~Middle. + + z1 = whatever[Top~Right, BBar~Middle]; + x1 = Left; + + % The top diagonal. + draw + z1 -- Top~Right; + + % The bottom diagonal. + draw + BBar~Middle + -- Bottom~Right; + + % The left edge, fattened. + outline + fatten + rightof Top~Left + -- rightof Bottom~Left + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("L") + (biggap#, smallcap#, smallgap#); + + "The letter L"; + + % The bottom line. + draw + Bottom~Left + -- Bottom~Right; + + % The left line, fattened. + draw + fatten + rightof Top~Left + -- rightof Bottom~Left + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("M") + (biggap#, medcap#, biggap#); + + symmetric; + + "The letter M"; + + % The left line, fattened and clipped by the left diagonal. + + draw + fatcliponce + (rightof Bottom~Left -- rightof Top~Left) + (Top~Left -- BBar~Middle); + + % The rest of the letter. + draw + Top~Left + -- BBar~Middle + -- Top~Right + -- Bottom~Right + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("N") + (biggap#, medcap#, biggap#); + + "The letter N"; + + % The left line, fattened and clipped by the diagonal. + + draw + fatcliponce + (rightof Bottom~Left -- rightof Top~Left) + (Top~Left -- Bottom~Right); + + % The rest of the letter. + draw + Top~Left + -- Bottom~Right + -- Top~Right + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("O") + (medgap#, medcap#, medgap#); + + "The letter O"; + + % The path of the O. + var (path) Opath; + + Opath + = oabove Top~Middle + .. Horizon~Left + .. obelow Bottom~Middle + .. Horizon~Right + .. cycle; + + % The emphasis at the left of the O, clipped by the O curve. + draw + fatcliptwice + (obelow rightof Bottom~Left -- oabove rightof Top~Left) + (Opath); + + % The curve. + draw Opath + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("P") + (biggap#, smallcap#, medgap#); + + "The letter P"; + + % The arc. + draw + Top~Left + -- Top~Middle {right} + .. (Top -+- BBar)~Right + .. {left} BBar~Middle + -- BBar~Left; + + % The left line, fattened. + outline + fatten + rightof Top~Left + -- rightof Bottom~Left + +endchar; + +% ------------------------------------------------------------------- + +bbchar + ("Q") + (medgap#, medcap#, medgap#) + (ATop#, QTailBottom#); + + "The letter Q"; + + % The path of the Q. + var (path) Qpath; + + Qpath + = oabove Top~Middle + .. (Top -+- aBottom)~Left + .. obelow aBottom~Middle + .. (Top -+- aBottom)~Right + .. cycle; + + % The emphasis at the left of the Q, clipped by the Q curve. + draw + fatcliptwice + (obelow rightof Bottom~Left -- oabove rightof Top~Left) + (Qpath); + + % The curve. + draw Qpath; + + % The tail. + draw + QTailTop~Middle + -- QTailBottom~Right + +endchar; + + +% ------------------------------------------------------------------- + +bbcap + ("R") + (biggap#, smallcap#, medgap#); + + "The letter R"; + + % The arc. + draw + Top~Left + -- Top~Middle {right} + .. (Top -+- BBar)~Right + .. {left} BBar~Middle + -- BBar~Left; + + % The left line, fattened. + outline + fatten + rightof Top~Left + -- rightof Bottom~Left; + + % The diagonal. + draw + BBar~Middle + -- Bottom~Right + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("S") + (medgap#, smallcap#, medgap#); + + "The letter S"; + + % The path of the S. + var (path) Spath; + + Spath + = (Top - CCurl)~Right + .. oabove Top~Middle {left} + .. (Top -+- BBar)~Left {down} + .. BBar~Middle {right} + .. (BBar -+- Bottom)~Right {down} + .. obelow Bottom~Middle {left} + .. (Bottom + CCurl)~Left; + + % The emphasis at the top left of the S. + draw + fatcliptwice + (oabove rightof Top~Left -- rightof BBar~Left) + (subpath (0, 4) of Spath); + + % The path of the S. + draw Spath + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("T") + (smallgap#, medcap#, smallgap#); + + fatsymmetric; + + "The letter T"; + + % The top line. + draw + Top~Left + -- Top~Right; + + % The vertical, fattened. + draw + fatten + Top~Middle + -- Bottom~Middle + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("U") + (biggap#, medcap#, biggap#); + + "The letter U"; + + % The path of the U. + var (path) Upath; + + Upath + = Top~Left + -- Horizon~Left {down} + .. obelow Bottom~Middle {right} + .. {up} Horizon~Right + -- Top~Right; + + % The emphasis of the U. + draw + fatcliponce + (rightof Top~Left -- obelow rightof Bottom~Left) + (Upath); + + % The path of the U. + draw Upath + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("V") + (smallgap#, medcap#, smallgap#); + + symmetric; + + "The letter V"; + + % The left diagonal, clipped by the right. + draw + fatcliponce + (rightof Top~Left -- rightof Bottom~Middle) + (Bottom~Middle -- Top~Right); + + % The right diagonal. + draw + Bottom~Middle + -- Top~Right + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("W") + (smallgap#, bigcap#, smallgap#); + + symmetric; + + "The letter W"; + + % The left diagonal, clipped by the rest. + draw + fatcliponce + (rightof Top~Left -- rightof Bottom~(Left -+- Middle)) + (Bottom~(Left -+- Middle) -- BBar~Middle); + + % The rest of the letter. + draw + Bottom~(Left -+- Middle) + -- BBar~Middle + -- Bottom~(Middle -+- Right) + -- Top~Right + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("X") + (medgap#, medcap#, medgap#); + + "The letter X"; + + % The SE diagonal. + draw + Top~Left + -- Bottom~Right; + + % The SW diagonal, fattened. + outline + fatten + leftof Top~Right + -- rightof Bottom~Left + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("Y") + (smallgap#, medcap#, smallgap#); + + fatsymmetric; + + "The letter Y"; + + % The fat stroke running top left to bottom. + draw + fatten + rightof Top~Left + -- BBar~Middle + -- Bottom~Middle; + + % The right diagonal. + draw + rightof BBar~Middle + -- Top~Right + +endchar; + +% ------------------------------------------------------------------- + +bbcap + ("Z") + (medgap#, medcap#, medgap#); + + "The letter Z"; + + % The top line. + draw + Top~Left + -- Top~Right; + + % The diagonal, fattened. + draw + fatten + leftof Top~Right + -- rightof Bottom~Left; + + % The bottom line. + draw + Bottom~Left + -- Bottom~Right + +endchar; + +% ------------------------------------------------------------------- + |