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/xypic | |
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/xypic')
27 files changed, 1672 insertions, 0 deletions
diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyatip.mf b/Master/texmf-dist/fonts/source/public/xypic/xyatip.mf new file mode 100644 index 00000000000..234b2b88aff --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyatip.mf @@ -0,0 +1,69 @@ +% $Id: xyatip.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% Generate upper arrow tips for Xy-pic. +% Copyright (c) 1994-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% _________________________________________________________________________ +% +% CONTENTS: Arrow tips *pointing* in all directions. With zero bounding box +% placed at the tip; note most of the ink goes on the opposite side of where +% the tip points. +% +% Generates the half of the tip that is upper when pointing right. +% _________________________________________________________________________ +% +pickup pencircle scaled segw; char_pen := savepen; +% +% chartowards makes char cc a tip pointing towards (dx,dy)... +% +def chartowards(expr cc,dx,dy) = + beginchar(cc,0,0,0); + a := angle(dx,dy); + z0 = (tipo,0) rotated a; % tip of tip + z1 = (-segl,0) rotated a; % center of tail + z2 = (-segl,1/2 segx) rotated a; % tail ends + z3 = curvature [z1,z2]; % tail directions + pickup char_pen; draw z2..{-z3}z0; + penlabels(0,1,2,3); + endchar +enddef; + +% TESTING...we redefine openit because the characters extend far to the +% left of the bounding box! +% +def openit = openwindow currentwindow + from origin to (screen_cols,screen_rows) at (-200,300) enddef; + +% GENERATE... +% +input xyd + +bye. +% +% $Log: xyatip.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:05:28 krisrose +% New for this maintenance release. +% +% Based on xyatip10.mf,v 3.0 1995/07/07 20:14:21 kris Exp diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyatip10.mf b/Master/texmf-dist/fonts/source/public/xypic/xyatip10.mf new file mode 100644 index 00000000000..59fd91ac0be --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyatip10.mf @@ -0,0 +1,54 @@ +% $Id: xyatip10.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYATIP10: upper arrow tips for Xy-pic at 10 point "technical style". +% Copyright (c) 1991-1998 Kristoffer H. Rose <krisrose@ens-lyon.fr> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restrictions. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYATIP"; font_size 10pt#; +mode_setup; + +input xytech +input xyatip + +% $Log: xyatip10.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 03:31:56 krisrose +% Maintenance release +% +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.13 1995/07/04 15:11:17 kris +% Ready to release v3? +% +% Revision 2.7 1992/12/14 01:41:26 kris +% Now uses xyd.mf. +% +% Revision 2.1 1992/01/02 14:54:07 kris +% Release version. +% +% Revision 1.1 1991/11/27 06:40:24 kris +% Initial: \beta-test on DIKU. +% +% Based on obsolete xytip10.mf v.1.4. diff --git a/Master/texmf-dist/fonts/source/public/xypic/xybsql10.mf b/Master/texmf-dist/fonts/source/public/xypic/xybsql10.mf new file mode 100644 index 00000000000..1ea03241e4f --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xybsql10.mf @@ -0,0 +1,82 @@ +% $Id: xybsql10.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYBSQL10: lower squiggles/quarter circles for Xy-pic at 10 point. +% Copyright (c) 1992 Kristoffer H. Rose <krisrose@brics.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% _________________________________________________________________________ +% +% CONTENTS: Squiggles are quarter circles with secant in all directions. +% Each has zero bounding box around the start point, i.e., from which the +% quarter circle `turns letf' ... this can be illustrated as follows: +% +% Code: [-1] 15 31 47 63 79 95 111 127 +% _ +% | ) | /\ +% _o o o o o- o o o _o +% | ( |_ \/ | +% _________________________________________________________________________ +% +font_identifier "XYBSQL"; font_size 10pt#; +mode_setup; + +% METANESS... +% +segl# = sqrt 2 * 1/4 designsize; define_pixels(segl); % segment length +segx# = (sqrt 2 - 1)*segl#; define_pixels(segx); % segment height +segw# = .4pt#; define_whole_blacker_pixels(segw); % segment thickness +% +pickup pencircle scaled segw; char_pen := savepen; +% +% chartowards makes char cc with quarter circle that is secant to line +% from (0,0) to (dx,dy), turning left. +% +def chartowards(expr cc,dx,dy) = + beginchar(cc,0,0,0); + a := angle (dx,dy); + z0 = (0,0); z1 = segl * dir a; + pickup char_pen; draw z0{dir(a-45)}..{dir(a+45)}z1; + endchar +enddef; + +% GENERATE... +% +input xyd + +bye. +% +% $Log: xybsql10.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 03:31:56 krisrose +% Maintenance release +% +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.13 1995/07/04 15:11:17 kris +% Ready to release v3? +% +% Revision 2.7 1992/12/14 01:41:26 kris +% Now uses xyd.mf. +% +% Based on obsolete xyqc10.mf [Revision 2.6 1992/06/24 01:23:34 kris] diff --git a/Master/texmf-dist/fonts/source/public/xypic/xybtip.mf b/Master/texmf-dist/fonts/source/public/xypic/xybtip.mf new file mode 100644 index 00000000000..5b7de63a61f --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xybtip.mf @@ -0,0 +1,69 @@ +% $Id: xybtip.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% Generate lower arrow tips for Xy-pic. +% Copyright (c) 1994-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% _________________________________________________________________________ +% +% CONTENTS: Arrow tips *pointing* in all directions. With zero bounding box +% placed at the tip; note most of the ink goes on the opposite side of where +% the tip points. +% +% Generates the half of the tip that is lower when pointing right. +% _________________________________________________________________________ +% +pickup pencircle scaled segw; char_pen := savepen; +% +% chartowards makes char cc a tip pointing towards (dx,dy)... +% +def chartowards(expr cc,dx,dy) = + beginchar(cc,0,0,0); + a := angle(dx,dy); + z0 = (tipo,0) rotated a; % tip of tip + z1 = (-segl,0) rotated a; % center of tail + z2 = (-segl,-1/2 segx) rotated a; % tail ends + z3 = curvature [z1,z2] ; % tail directions + pickup char_pen; draw z2..{-z3}z0; + penlabels(0,1,2,3); + endchar +enddef; + +% TESTING...we redefine openit because the characters extend far to the +% left of the bounding box! +% +def openit = openwindow currentwindow + from origin to (screen_cols,screen_rows) at (-200,300) enddef; + +% GENERATE... +% +input xyd + +bye. +% +% $Log: xybtip.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:05:28 krisrose +% New for this maintenance release. +% +% Based on xybtip10.mf,v 3.0 1995/07/07 20:14:21 kris Exp diff --git a/Master/texmf-dist/fonts/source/public/xypic/xybtip10.mf b/Master/texmf-dist/fonts/source/public/xypic/xybtip10.mf new file mode 100644 index 00000000000..0e204d9224b --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xybtip10.mf @@ -0,0 +1,54 @@ +% $Id: xybtip10.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYBTIP10: lower arrow tips for Xy-pic at 10 point "technical style". +% Copyright (c) 1991,1992 Kristoffer H. Rose <krisrose@brics.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYBTIP"; font_size 10pt#; +mode_setup; + +input xytech +input xybtip + +% $Log: xybtip10.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 03:31:56 krisrose +% Maintenance release +% +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.13 1995/07/04 15:11:17 kris +% Ready to release v3? +% +% Revision 2.7 1992/12/14 01:41:26 kris +% Now uses xyd.mf. +% +% Revision 2.1 1992/01/02 14:54:07 kris +% Release version. +% +% Revision 1.1 1991/11/27 06:41:03 kris +% Initial: \beta-test on DIKU. +% +% Based on obsolete xytip10.mf v.1.4. diff --git a/Master/texmf-dist/fonts/source/public/xypic/xycirc10.mf b/Master/texmf-dist/fonts/source/public/xypic/xycirc10.mf new file mode 100644 index 00000000000..dfdf2f63254 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xycirc10.mf @@ -0,0 +1,154 @@ +% $Id: xycirc10.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYCIRC10: 1/8 circles with varying radii for Xy-pic at 10 point. +% Copyright (c) 1992,1993 Kristoffer H. Rose <krisrose@brics.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, Inc., +% 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% _________________________________________________________________________ +% +% CONTENTS: 1/8 circles with radii from 1 to 32pt dissected into the 1/8 +% circle segments shown below +% 6 5 +% ....... _ +% 7 .. | .. 4 | +% : | | | : | radius +% : | | | : | +% Reference point ---> ___:__|___|___|__:_____| +% : | | | : +% : | | | : +% 0 .! | !. 3 +% ...|... +% 1 2 +% +% such that each group of 8 characters cc+0 to cc+7 constitute a full circle +% with the given radius when typeset on the same baseline (as shown). +% +% The bounding box of each segment is the vertical slice of the unit square +% around the circle. +% +% The radius is given for each character group g = cc mod 8 by the formula +% +% radius [pt] = g+1, if 0 <= g < 8 +% 2(g-8) + 10, if 8 <= g < 12 [= 2g-6] +% 4(g-12) + 20, if 12 <= g < 16 [= 4g-28] +% +% The bounding box of each segment is the smallest box enclosing it (not +% including the rule width) with reference point on the horizontal line +% through the center of the circle---so segment 1256 have either height or +% depth negative. +% _________________________________________________________________________ +% +font_identifier "XYCIRC"; font_size 10pt#; +mode_setup; + +% METANESS... +% +rulew# = .4pt#; define_whole_blacker_pixels(rulew); % line thickness +% +pickup pencircle scaled rulew; char_pen := savepen; + +% TESTING...we redefine openit because the characters extend far to the +% left of the bounding box! +% +def openit = %let echar = endchar; def endchar = echar; stop ". " enddef; + openwindow currentwindow from origin to (1000,800) at (-200,300) +enddef; + +% FONT. +% +% Font dimension 8 is the rule thickness (cf. The TeXbook, app.G) +% +font_coding_scheme:="Xy-pic 1/8 circles"; +fontdimen 8: rulew#; % default_rule_thickness + +% Use the following macro that generates an entire group from character cc +% to cc+7 with radius: +% +def makeg(expr g,radius) = + + minor# := (1 - sqrt 1/2) * radius; + major# := radius - minor#; + full# := radius; + define_pixels(minor,major,full); + + beginchar(8g ,minor#,full#,full#); pickup char_pen; + z0=(0,0); z1=(minor,-major); draw z0{0,-1}..{1,-1}z1; + penlabels(0,1); endchar; + + beginchar(8g+1,major#,full#,full#); pickup char_pen; + z0=(0,-major); z1=(major,-full ); draw z0{1,-1}..{1,0}z1; + penlabels(0,1); endchar; + + beginchar(8g+2,major#,full#,full#); pickup char_pen; + z0=(0,-full); z1=(major,-major); draw z0{1,0}..{1, 1}z1; + penlabels(0,1); endchar; + + beginchar(8g+3,minor#,full#,full#); pickup char_pen; + z0=(0,-major); z1=(minor,0); draw z0{1, 1}..{0, 1}z1; + penlabels(0,1); endchar; + + beginchar(8g+4,minor#,full#,full#); pickup char_pen; + z0=(0, major); z1=(minor,0); draw z0{1,-1}..{0,-1}z1; + penlabels(0,1); endchar; + + beginchar(8g+5,major#,full#,full#); pickup char_pen; + z0=(0, full); z1=(major, major); draw z0{1,0}..{1,-1}z1; + penlabels(0,1); endchar; + + beginchar(8g+6,major#,full#,full#); pickup char_pen; + z0=(0, major); z1=(major, full); draw z0{1, 1}..{1,0}z1; + penlabels(0,1); endchar; + + beginchar(8g+7,minor#,full#,full#); pickup char_pen; + z0=(0,0); z1=(minor, major); draw z0{0, 1}..{1, 1}z1; + penlabels(0,1); endchar + +enddef; + +% Make groups: +% +for g = 0 step 1 until 7: makeg(g, (g+1)*pt#); endfor; +for g = 8 step 1 until 11: makeg(g, (2g-6)*pt#); endfor; +for g = 12 step 1 until 15: makeg(g,(4g-28)*pt#); endfor; + +bye. + +% $Log: xycirc10.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 03:31:56 krisrose +% Maintenance release +% +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.13 1995/07/04 15:11:17 kris +% Ready to release v3? +% +% Revision 2.7 1994/03/08 02:09:27 kris +% Release 3alpha. +% +% Revision 2.6.9.1 1994/03/07 04:22:46 kris +% Last internal 3alpha and pre-2.7 release. +% +% NEW file to go in version 2.7! +% Based on xymisc10.mf [Revision 2.6 1992/06/24 01:23:34 kris] diff --git a/Master/texmf-dist/fonts/source/public/xypic/xycm.mf b/Master/texmf-dist/fonts/source/public/xypic/xycm.mf new file mode 100644 index 00000000000..414f4883cdb --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xycm.mf @@ -0,0 +1,40 @@ +% $Id: xycm.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% Parameter file for Xy-pic "Computer Modern style" arrow tips. +% Copyright (c) 1994-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +segl# = 1/5 designsize; define_pixels(segl); % segment length +segx# = 1/2 designsize; define_pixels(segx); % segment height +segw# = .4pt#; define_whole_blacker_pixels(segw); % segment thickness +% +tipo# = 0#; define_pixels(tipo); % tip overshoot +curvature = 1/3; % 1 = straight tails, 0= curved tails +% +% $Log: xycm.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Extracted from xycmat10.mf,v 3.0 1995/07/07 20:14:21 kris Exp diff --git a/Master/texmf-dist/fonts/source/public/xypic/xycmat10.mf b/Master/texmf-dist/fonts/source/public/xypic/xycmat10.mf new file mode 100644 index 00000000000..cc35ec797cc --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xycmat10.mf @@ -0,0 +1,53 @@ +% $Id: xycmat10.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYCMAT10: upper arrow tips for Xy-pic at 10 point "Computer Modern style". +% Copyright (c) 1994-1996 Kristoffer H. Rose <krisrose@brics.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYCMAT"; font_size 10pt#; +mode_setup; + +input xycm +input xyatip + +% $Log: xycmat10.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 03:31:56 krisrose +% Maintenance release +% +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.13 1995/07/04 15:11:17 kris +% Ready to release v3? +% +% Revision 2.12 1994/10/25 11:34:25 kris +% Interim release just before v3 [works with AMS-LaTeX 1.2]... +% +% Recreated from xyatip10.mf (Revision 2.7 1992/12/14 01:41:26 kris). +% +% Revision 2.6 1993/10/21 21:21:24 kris +% NEW for 2.7... +% +% Based on xyatip10.mf [2.6] and Knuth's SYMBOL.MF. diff --git a/Master/texmf-dist/fonts/source/public/xypic/xycmat11.mf b/Master/texmf-dist/fonts/source/public/xypic/xycmat11.mf new file mode 100644 index 00000000000..7be6b114d3a --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xycmat11.mf @@ -0,0 +1,39 @@ +% $Id: xycmat11.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYCMAT11: upper arrow tips for Xy-pic at 11 point "Computer Modern style". +% Copyright (c) 1995 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYCMAT"; font_size 11pt#; +mode_setup; + +input xycm +input xyatip + +% $Log: xycmat11.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Based on xycmat10.mf,v 3.0 1995/07/07 20:14:21 kris Exp krisrose diff --git a/Master/texmf-dist/fonts/source/public/xypic/xycmat12.mf b/Master/texmf-dist/fonts/source/public/xypic/xycmat12.mf new file mode 100644 index 00000000000..2feec42944d --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xycmat12.mf @@ -0,0 +1,39 @@ +% $Id: xycmat12.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYCMAT12: upper arrow tips for Xy-pic at 12 point "Computer Modern style". +% Copyright (c) 1995 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYCMAT"; font_size 12pt#; +mode_setup; + +input xycm +input xyatip + +% $Log: xycmat12.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Based on xycmat10.mf,v 3.0 1995/07/07 20:14:21 kris Exp krisrose diff --git a/Master/texmf-dist/fonts/source/public/xypic/xycmbt10.mf b/Master/texmf-dist/fonts/source/public/xypic/xycmbt10.mf new file mode 100644 index 00000000000..d61f4bda2a3 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xycmbt10.mf @@ -0,0 +1,53 @@ +% $Id: xycmbt10.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYCMBT10: lower arrow tips for Xy-pic at 10 point "Computer Modern style". +% Copyright (c) 1994-1996 Kristoffer H. Rose <krisrose@brics.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYCMBT"; font_size 10pt#; +mode_setup; + +input xycm +input xybtip + +% $Log: xycmbt10.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 03:31:56 krisrose +% Maintenance release +% +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.13 1995/07/04 15:11:17 kris +% Ready to release v3? +% +% Revision 2.12 1994/10/25 11:34:25 kris +% Interim release just before v3 [works with AMS-LaTeX 1.2]... +% +% Recreated from xybtip10.mf (Revision 2.7 1992/12/14 01:41:26 kris). +% +% Revision 2.6 1993/10/21 21:21:24 kris +% NEW for 2.7... +% +% Based on xyatip10.mf [2.6] and Knuth's SYMBOL.MF. diff --git a/Master/texmf-dist/fonts/source/public/xypic/xycmbt11.mf b/Master/texmf-dist/fonts/source/public/xypic/xycmbt11.mf new file mode 100644 index 00000000000..10da60b2fd7 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xycmbt11.mf @@ -0,0 +1,39 @@ +% $Id: xycmbt11.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYCMBT11: lower arrow tips for Xy-pic at 11 point "Computer Modern style". +% Copyright (c) 1994-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYCMBT"; font_size 11pt#; +mode_setup; + +input xycm +input xybtip + +% $Log: xycmbt11.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Based on : xycmbt10.mf,v 3.0 1995/07/07 20:14:21 kris Exp kris diff --git a/Master/texmf-dist/fonts/source/public/xypic/xycmbt12.mf b/Master/texmf-dist/fonts/source/public/xypic/xycmbt12.mf new file mode 100644 index 00000000000..005aa7d5373 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xycmbt12.mf @@ -0,0 +1,39 @@ +% $Id: xycmbt12.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYCMBT12: lower arrow tips for Xy-pic at 12 point "Computer Modern style". +% Copyright (c) 1994-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYCMBT"; font_size 12pt#; +mode_setup; + +input xycm +input xybtip + +% $Log: xycmbt12.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Based on : xycmbt10.mf,v 3.0 1995/07/07 20:14:21 kris Exp kris diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyd.mf b/Master/texmf-dist/fonts/source/public/xypic/xyd.mf new file mode 100644 index 00000000000..2c5b85384a8 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyd.mf @@ -0,0 +1,71 @@ +% $Id: xyd.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYD: generate characters of `Xy-pic Directional' font. +% Copyright (c) 1992 Kristoffer H. Rose <krisrose@brics.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% _________________________________________________________________________ +% +% CONTENTS: Generate `directional' characters from 0..127 by calling +% `chartowards(Code, Dx, Dy)' with +% +% Code: 0 15 31 47 63 79 95 111 127 +% Dx,Dy: -15/16,-1 0,-1 1,-1 1,0 1,1 0,1 -1,1 -1,0 -1,-1 +% / | \ +% Direction: o o o o- o o o -o o +% / | \ / +% +% where the intervening codes are got by interpolating either Dx or Dy as +% appropriate. +% _________________________________________________________________________ +% +% Parameters: +% +font_coding_scheme:="Xy-pic directional"; +% +font_x_height segx#; +font_quad segl#; +fontdimen 8: segw#; % default_rule_thickness +% +% Characters: +% +for cc = 0 step 1 until 31: chartowards(cc,(cc-15)/16, -1); endfor; +for cc = 32 step 1 until 63: chartowards(cc, 1, (cc-47)/16); endfor; +for cc = 64 step 1 until 95: chartowards(cc,(79-cc)/16, 1); endfor; +for cc = 96 step 1 until 127: chartowards(cc, -1,(111-cc)/16); endfor; +% +% $Log: xyd.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 03:31:56 krisrose +% Maintenance release +% +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.13 1995/07/04 15:11:17 kris +% Ready to release v3? +% +% Revision 2.7 1992/12/14 01:41:26 kris +% Generate all Xy-pic `directional' characters. +% +% Extracted from xyatip10.mf [Revision 2.1 1992/01/02 14:54:07 kris] diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyd2.mf b/Master/texmf-dist/fonts/source/public/xypic/xyd2.mf new file mode 100644 index 00000000000..150f1d2963d --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyd2.mf @@ -0,0 +1,73 @@ +% $Id: xyd2.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYD2: generate characters of `Xy-pic SemiDirectional' font. +% Copyright (c) 1992 Kristoffer H. Rose <krisrose@brics.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% _________________________________________________________________________ +% +% CONTENTS: Generate `semidirectional' characters from 0..127 by calling +% `chartowards(Code, Dx, Dy)' with +% +% Code: 0 30 31 63 95 127 +% Dx,Dy: 31/32,1 1/32,1 0,-1 1,-1 1,0 1,1 +% / | / +% Direction: o o o o o- o +% | \ +% +% where the intervening codes are got by interpolating either Dx or Dy as +% appropriate. +% _________________________________________________________________________ +% +% Parameters: +% +font_coding_scheme:="Xy-pic semidirectional"; +% +font_x_height segx#; +font_quad segl#; +fontdimen 8: segw#; % default_rule_thickness +% +% Characters: +% +for cc = 0 step 1 until 30: chartowards(cc,(31-cc)/32, 1); endfor; +for cc = 31 step 1 until 63: chartowards(cc,(cc-31)/32, -1); endfor; +for cc = 64 step 1 until 127: chartowards(cc, 1,(cc-95)/32); endfor; +% +% $Log: xyd2.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 03:31:56 krisrose +% Maintenance release +% +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.13 1995/07/04 15:11:17 kris +% Ready to release v3? +% +% Revision 2.12 1994/10/25 11:34:25 kris +% Interim release just before v3 [works with AMS-LaTeX 1.2]... +% +% Revision 2.7 1992/12/14 01:41:26 kris +% Generate all Xy-pic `semidirectionsl' characters. +% +% Extracted from xyline10.mf [Revision 2.1 1992/01/02 14:54:07 kris] diff --git a/Master/texmf-dist/fonts/source/public/xypic/xydash10.mf b/Master/texmf-dist/fonts/source/public/xypic/xydash10.mf new file mode 100644 index 00000000000..c378acf0a59 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xydash10.mf @@ -0,0 +1,84 @@ +% $Id: xydash10.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYDASH10: dashes for Xy-pic at 10 point. +% Copyright (c) 1991,1992 Kristoffer H. Rose <krisrose@brics.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% _________________________________________________________________________ +% +% CONTENTS: Line segments going segl# in all rightward directions...each +% character has (width + italic correction) = cos(direction) * segl#. +% _________________________________________________________________________ +% +% SETUP: +% +font_identifier "XYDASH"; font_size 10pt#; +mode_setup; + +% METANESS... +% +segl# = 1/2 designsize; define_pixels(segl); % segment length +segx# = 1/5 designsize; define_pixels(segx); % segment height +segw# = .4pt#; define_whole_blacker_pixels(segw); % segment thickness +% +pickup pencircle scaled segw; char_pen := savepen; +% +% chartowards makes char cc with length segl line from (0,0) towards (dx,dy)... +% +def chartowards(expr cc,dx,dy) = + beginchar(cc, abs(dx)*segl#, 0, 0); + a := angle(dx,dy); + z0 = (0,0); z1 = z0 + dir a scaled segl; + pickup char_pen; draw z0--z1; + charic := abs ((cosd a)*segl#) - charwd; + penlabels(0,1); + endchar +enddef; + +% TESTING...we redefine openit because the characters extend far to the +% left of the bounding box! +% +def openit = openwindow currentwindow + from origin to (screen_cols,screen_rows) at (-200,300) enddef; + +% GENERATE... +% +input xyd2 + +bye. +% +% $Log: xydash10.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 03:31:56 krisrose +% Maintenance release +% +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.13 1995/07/04 15:11:17 kris +% Ready to release v3? +% +% Revision 2.7 1992/12/14 01:41:26 kris +% Now uses xyd2.mf. +% +% Based on obsolete xyline10.mf 2.1 1992/01/02 14:54:07 kris diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyeuat10.mf b/Master/texmf-dist/fonts/source/public/xypic/xyeuat10.mf new file mode 100644 index 00000000000..8dbde2e8898 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyeuat10.mf @@ -0,0 +1,39 @@ +% $Id: xyeuat10.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYEUAT10: upper arrow tips for Xy-pic at 10 point "Euler style". +% Copyright (c) 1994-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYEUAT"; font_size 10pt#; +mode_setup; + +input xyeuler +input xyatip + +% $Log: xyeuat10.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Based on xycmat10.mf,v 3.0 1995/07/07 20:14:21 kris Exp diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyeuat11.mf b/Master/texmf-dist/fonts/source/public/xypic/xyeuat11.mf new file mode 100644 index 00000000000..0b467291030 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyeuat11.mf @@ -0,0 +1,39 @@ +% $Id: xyeuat11.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYEUAT11: upper arrow tips for Xy-pic at 11 point "Euler style". +% Copyright (c) 1994-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this font file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYEUAT"; font_size 11pt#; +mode_setup; + +input xyeuler +input xyatip + +% $Log: xyeuat11.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Based on xycmat10.mf,v 3.0 1995/07/07 20:14:21 kris Exp diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyeuat12.mf b/Master/texmf-dist/fonts/source/public/xypic/xyeuat12.mf new file mode 100644 index 00000000000..76f4d457d25 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyeuat12.mf @@ -0,0 +1,39 @@ +% $Id: xyeuat12.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYEUAT12: upper arrow tips for Xy-pic at 12 point "Euler style". +% Copyright (c) 1994-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this font file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYEUAT"; font_size 12pt#; +mode_setup; + +input xyeuler +input xyatip + +% $Log: xyeuat12.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Based on xycmat10.mf,v 3.0 1995/07/07 20:14:21 kris Exp diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyeubt10.mf b/Master/texmf-dist/fonts/source/public/xypic/xyeubt10.mf new file mode 100644 index 00000000000..051f2f71ec7 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyeubt10.mf @@ -0,0 +1,39 @@ +% $Id: xyeubt10.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYEUBT10: lower arrow tips for Xy-pic at 10 point "Euler style". +% Copyright (c) 1994-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this font file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYEUBT"; font_size 10pt#; +mode_setup; + +input xyeuler +input xybtip + +% $Log: xyeubt10.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Based on xycmbt10.mf,v 3.0 1995/07/07 20:14:21 kris Exp diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyeubt11.mf b/Master/texmf-dist/fonts/source/public/xypic/xyeubt11.mf new file mode 100644 index 00000000000..8a0511ea75a --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyeubt11.mf @@ -0,0 +1,39 @@ +% $Id: xyeubt11.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYEUBT11: lower arrow tips for Xy-pic at 11 point "Euler style". +% Copyright (c) 1994-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this font file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYEUBT"; font_size 11pt#; +mode_setup; + +input xyeuler +input xybtip + +% $Log: xyeubt11.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Based on xycmbt10.mf,v 3.0 1995/07/07 20:14:21 kris Exp diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyeubt12.mf b/Master/texmf-dist/fonts/source/public/xypic/xyeubt12.mf new file mode 100644 index 00000000000..c1cca0f2155 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyeubt12.mf @@ -0,0 +1,39 @@ +% $Id: xyeubt12.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% XYEUBT12: lower arrow tips for Xy-pic at 12 point "Euler style". +% Copyright (c) 1994-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this font file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +font_identifier "XYEUBT"; font_size 12pt#; +mode_setup; + +input xyeuler +input xybtip + +% $Log: xyeubt12.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Based on xycmbt10.mf,v 3.0 1995/07/07 20:14:21 kris Exp diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyeuler.mf b/Master/texmf-dist/fonts/source/public/xypic/xyeuler.mf new file mode 100644 index 00000000000..fb4bb53c719 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyeuler.mf @@ -0,0 +1,40 @@ +% $Id: xyeuler.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% Parameter file for Xy-pic "Euler style" arrow tips. +% Copyright (c) 1995 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this font file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +segl# = 1/8 designsize; define_pixels(segl); % segment length +segx# = 7/16 designsize; define_pixels(segx); % segment height +segw# = .4pt#; define_whole_blacker_pixels(segw); % segment thickness +% +tipo# = 0#; define_pixels(tipo); % tip overshoot +curvature = 2/3; % 1 = straight tails, 0= curved tails +% +% $Log: xyeuler.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 04:12:13 krisrose +% New for this maintenance release. +% +% Based on xycmat10.mf,v 3.0 1995/07/07 20:14:21 kris Exp diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyline10.mf b/Master/texmf-dist/fonts/source/public/xypic/xyline10.mf new file mode 100644 index 00000000000..a80f7ced61b --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyline10.mf @@ -0,0 +1,114 @@ +% $Id: xyline10.mf,v 3.3 1996/12/19 03:31:56 krisrose Exp $ -*-tex-*- +% +% XYLINE10: line segments for XY mode at 10 point. +% Copyright (c) 1991,1992 Kristoffer H. Rose <krisrose@brics.dk> +% +% This file is part of the XY-pic macro package. +% +% The XY-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The XY-pic macro 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 macro package; if not, write to the Free Software Foundation, Inc., +% 675 Mass Ave, Cambridge, MA 02139, USA. +% +% CONTENTS: Line segments going either segl# down or to the right. Codes +% range from 0 to 127, distributed evenly in each of the +% intervals between the `purely' horizontal/ +% vertical/diagonal characters with code 31, ..../ +% 63, 95, and 127 (code -1 would be pure as : /: +% well if it existed): : / : +% :/ : +% ..../ ..../ | o o.... o.... o---- o...: +% : /: : /: | | :\ : :\ : +% : / : : / : | | : \ : : \ : +% :/ : :/ : | | : \: : \: +% o...: o...: o | :...\ :...\ +% +% Code: [-1] 0 30 31 63 64 95 127 +% +font_identifier "XYLINE"; font_size 10pt#; +font_coding_scheme:="XY line segments"; +mode_setup; + +% METANESS... +% +segl# = 1/2 designsize; define_pixels(segl); % line segment length +rulew# = .4pt#; define_whole_blacker_pixels(rulew); % line thickness +% +% drawsegment draws a line from (0,0) to the argument point... +def drawsegment expr endpoint = + z0 = (0,0); z1 = endpoint; + pickup pencircle scaled rulew rotated (angle (z1-z0) - 90); + draw z0--z1; penlabels(0,1) enddef; + +% TESTING...we redefine openit because the characters extend far to the +% left of the bounding box! +% +def openit = openwindow currentwindow + from origin to (screen_cols,screen_rows) at (-200,300) enddef; + +% FONT. +% +% Font dimension 8 is the rule thickness (cf. The TeXbook, app.G) +fontdimen 8: rulew#; +% +% The characters follow... +% +for cc = 0 step 1 until 30: + beginchar(cc,(31-cc)/32*segl#,segl#,0); drawsegment (w,h); endchar; +endfor; +% +for cc = 31 step 1 until 63: + beginchar(cc,(cc-31)/32*segl#,0,segl#); drawsegment (w,-d); endchar; +endfor; +% +for cc = 64 step 1 until 94: + beginchar(cc,segl#,0,(95-cc)/32*segl#); drawsegment (w,-d); endchar; +endfor; +% +for cc = 95 step 1 until 126: + beginchar(cc,segl#,(cc-95)/32*segl#,0); drawsegment (w,h); endchar; +endfor; +% +beginchar(127,segl#,segl#,0); drawsegment (w,h); endchar; + +bye. +% +% $Log: xyline10.mf,v $ +% Revision 3.3 1996/12/19 03:31:56 krisrose +% Maintenance release +% +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.1 1992/01/02 14:54:07 kris +% Release version. +% +% Revision 1.7 1991/12/17 04:51:16 kris +% Version distributed with `final draft' on Usenet. +% +% Revision 1.6 1991/11/27 06:54:21 kris +% \beta-test on DIKU. +% +% Revision 1.5 1991/10/21 23:19:08 kris +% Version described in DIKU student report 91-7-10. +% +% Revision 1.4 1991/07/28 22:16:18 kris +% Inverted char0..30 to avoid negative widths. +% +% Revision 1.3 1991/07/26 01:22:28 kris +% Set bounding box completely! +% +% Revision 1.2 91/06/09 21:59:49 kris +% separated METANESS and CHARACTERS +% +% Revision 1.1 91/06/06 22:52:31 kris +% furst succesful attempt diff --git a/Master/texmf-dist/fonts/source/public/xypic/xymisc10.mf b/Master/texmf-dist/fonts/source/public/xypic/xymisc10.mf new file mode 100644 index 00000000000..96027754d8d --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xymisc10.mf @@ -0,0 +1,138 @@ +% $Id: xymisc10.mf,v 3.3 1996/12/19 03:31:56 krisrose Exp $ -*-tex-*- +% +% XYMISC10: miscellaneous characters for XY mode at 10 point. +% Copyright (c) 1991,1992 Kristoffer H. Rose <krisrose@brics.dk> +% +% This file is part of the XY-pic macro package. +% +% The XY-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The XY-pic macro 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 macro package; if not, write to the Free Software Foundation, Inc., +% 675 Mass Ave, Cambridge, MA 02139, USA. +% +% CONTENTS: +% Metaness. +% Testing... +% Font. +% Dot fitting the rule width. +% Quarter circles with radii from 1 to 10 and 12 to 30 pt; all have +% height = depth = .5width = radius and are centered such that they +% enter and leave the box in the middle of the sides. +% +font_identifier "XYMISC"; font_size 10pt#; +font_coding_scheme:="XY miscellaneous"; +mode_setup; + +% METANESS... +% +rulew# = .4pt#; define_whole_blacker_pixels(rulew); % line thickness +% +def pickuppen = pickup pencircle scaled rulew enddef; + +% TESTING...we redefine openit because the characters extend far to the +% left of the bounding box! +% +def openit = %%let echar = endchar; def endchar = echar; stop ". " enddef; + openwindow currentwindow + from origin to (1000,800) at (-200,300) + enddef; + +% FONT. +% +% Font dimension 8 is the rule thickness (cf. The TeXbook, app.G) +fontdimen 8: rulew#; + +% DOT FOR DOTTED LINES AND DUMMY CIRCLE... +% +beginchar(0,0,0,0); pickuppen; drawdot (0,0); endchar; +beginchar(1,0,0,0); pickuppen; drawdot (0,0); endchar; +beginchar(2,0,0,0); pickuppen; drawdot (0,0); endchar; +beginchar(3,0,0,0); pickuppen; drawdot (0,0); endchar; + +% QUARTER CIRCLES... The four circles with radius N pt, 0 < N <= 10, are +% located at N*4 + QUADRANT, where 1 <= QUADRANT <= 4. All have width as +% their radius with reference point at the level of the horizontal end of the +% arc and height, depth as the extent of the arc. +% +for radius = 1 step 1 until 10: + beginchar(radius*4,2radius*pt#,radius*pt#,radius*pt#); + pickuppen; + draw quartercircle rotated 180 shifted (1,.5) scaled (radius*2pt); + endchar; + beginchar(radius*4+1,2radius*pt#,radius*pt#,radius*pt#); + pickuppen; + draw quartercircle rotated -90 shifted (0,.5) scaled (radius*2pt); + endchar; + beginchar(radius*4+2,2radius*pt#,radius*pt#,radius*pt#); + pickuppen; + draw quartercircle shifted (0,-.5) scaled (radius*2pt); + endchar; + beginchar(radius*4+3,2radius*pt#,radius*pt#,radius*pt#); + pickuppen; + draw quartercircle rotated 90 shifted (1,-.5) scaled (radius*2pt); + endchar; +endfor; +% +% For 12 <= N <= 40 we step in 2pt increments... so for 10 <= N <= 40 the +% quarter circle with radius N is located at (N div 2 + 20 + QUADRANT). +% +for radius = 12 step 2 until 40: + beginchar(radius*2+20,2radius*pt#,radius*pt#,radius*pt#); + pickuppen; + draw quartercircle rotated 180 shifted (1,.5) scaled (radius*2pt); + endchar; + beginchar(radius*2+21,2radius*pt#,radius*pt#,radius*pt#); + pickuppen; + draw quartercircle rotated -90 shifted (0,.5) scaled (radius*2pt); + endchar; + beginchar(radius*2+22,2radius*pt#,radius*pt#,radius*pt#); + pickuppen; + draw quartercircle shifted (0,-.5) scaled (radius*2pt); + endchar; + beginchar(radius*2+23,2radius*pt#,radius*pt#,radius*pt#); + pickuppen; + draw quartercircle rotated 90 shifted (1,-.5) scaled (radius*2pt); + endchar; +endfor; + +bye. +% +% $Log: xymisc10.mf,v $ +% Revision 3.3 1996/12/19 03:31:56 krisrose +% Maintenance release +% +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.6 1992/06/24 01:23:34 kris +% Cleaned up. +% +% Revision 2.1 1992/01/02 14:54:07 kris +% Release version. +% +% Revision 1.6 1991/11/27 06:54:21 kris +% \beta-test on DIKU. +% +% Revision 1.5 1991/10/21 23:19:08 kris +% Version described in DIKU student report 91-7-10. +% +% Revision 1.4 1991/08/22 01:07:46 kris +% Now has quarter circles to radius 40pt as required for xy.doc[1.28]. +% +% Revision 1.3 1991/07/21 21:04:35 kris +% Tested with xy.doc[1.19]. +% +% Revision 1.2 1991/07/19 14:52:26 kris +% Changed quarter circles to fit xy.doc[1.19?]. +% +% Revision 1.1 1991/06/24 20:57:37 kris +% Works with xy.doc [1.6] :-) diff --git a/Master/texmf-dist/fonts/source/public/xypic/xyqc10.mf b/Master/texmf-dist/fonts/source/public/xypic/xyqc10.mf new file mode 100644 index 00000000000..f1dc3c79a49 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xyqc10.mf @@ -0,0 +1,94 @@ +% $Id: xyqc10.mf,v 3.0 1995/07/07 20:14:21 kris Exp $ -*-tex-*- +% +% XYQC10: quarter circles for XY mode at 10 point. +% Copyright (c) 1992 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the XY-pic macro package. +% +% The XY-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The XY-pic macro 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 macro package; if not, write to the Free Software Foundation, Inc., +% 675 Mass Ave, Cambridge, MA 02139, USA. +% +% CONTENTS: Quarter circles in all directions: +% +% -. +% | ) | /\ +% o o o o-' o o o .-o o +% ( |_ \/ | ( +% +% Code: [-1] 15 31 47 65 79 95 111 127 +% +% Each character has a cosinoid bounding box :-) with wd = cos I = sin F, +% where I,F are the angles from direction --> to the initial,final direction. +% +font_identifier "XYQC"; font_size 10pt#; +font_coding_scheme:="XY quarter circles"; +mode_setup; + +% METANESS... +% +qcd# = 1/2 designsize; % quarter circle diameter +rulew# = .4pt#; % quarter circle line width +define_pixels(qcd,rulew); +% +% beginqc draws the quarter circle starting in the direction towards endpoint +% and turning left... +def beginqc(expr cc,ex,ey) = + alpha := angle (ex,ey); + cw := sqrt(1/2) * abs(sind(alpha + 135)); + beginchar(cc,cw*qcd#,0,0); + pickup pencircle scaled rulew rotated (alpha - 90); + if (cc<64): draw quartercircle shifted (-.5,0) rotated (alpha - 90) + scaled qcd + else: draw quartercircle shifted (-.5,0) rotated (alpha - 90) shifted (cw,0) + scaled qcd + fi +enddef; + +% TESTING...we redefine openit because the characters extend far to the +% left of the bounding box! +% +def openit = openwindow currentwindow + from origin to (screen_cols,screen_rows) at (-200,200) enddef; + +% FONT. +% +% Font dimension 8 is the rule thickness (cf. The TeXbook, app.G). +fontdimen 8: rulew#; +% +% Here are the characters... +% +for cc = 0 step 1 until 31: + beginqc(cc,cc-15,-16); endchar; +endfor; +% +for cc = 32 step 1 until 63: + beginqc(cc,16,cc-47); endchar; +endfor; +% +for cc = 64 step 1 until 95: + beginqc(cc,79-cc,16); endchar; +endfor; +% +for cc = 96 step 1 until 127: + beginqc(cc,-16,111-cc); endchar; +endfor; + +bye. +% +% $Log: xyqc10.mf,v $ +% Revision 3.0 1995/07/07 20:14:21 kris +% Major release w/new User's Guide! +% +% Revision 2.6 1992/06/24 01:23:34 kris +% Implemented and used for hooks. diff --git a/Master/texmf-dist/fonts/source/public/xypic/xytech.mf b/Master/texmf-dist/fonts/source/public/xypic/xytech.mf new file mode 100644 index 00000000000..e4c6b830f7f --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/xypic/xytech.mf @@ -0,0 +1,40 @@ +% $Id: xytech.mf,v 3.7 1999/02/16 15:12:50 krisrose Exp $ +% +% Parameter file for Xy-pic "technical style" arrow tips. +% Copyright (c) 1991-1996 Kristoffer H. Rose <kris@diku.dk> +% +% This file is part of the Xy-pic macro package. +% +% The Xy-pic macro package is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or (at your +% option) any later version. +% +% The Xy-pic macro 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 macro package; if not, write to the Free Software Foundation, +% Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +% +% As a special exception, you may use this font file and all files derived +% from it without restriction. This special exception was added with +% version 3.7 of Xy-pic. +% +segl# = 1/2 designsize; define_pixels(segl); % segment length +segx# = 0.62 segl#; define_pixels(segx); % segment height +segw# = .4pt#; define_whole_blacker_pixels(segw); % segment thickness +% +tipo# = 0#; define_pixels(tipo); % tip overshoot +curvature = 1/3; % 1 = straight tails, 0= curved tails +% +% $Log: xytech.mf,v $ +% Revision 3.7 1999/02/16 15:12:50 krisrose +% Interim release (Y&Y fonts now free). +% +% Revision 3.3 1996/12/19 03:53:24 krisrose +% Maintenance release. +% +% Extracted from xyatip10.mf,v 3.0 1995/07/07 20:14:21 kris Exp |