1 #ifndef lint 2 static char sccsid[] = "@(#)tuning.c 1.1 (CWI) 87/04/01"; 3 #endif lint 4 /* 5 6 This file contains parameter values for many of the 7 tuning parameters in eqn. Ideally, these should be 8 settable dynamically, but getting them into a single 9 file is at least a step in the right direction. 10 11 Strings are plugged in verbatim. 12 Floats are usually in ems. 13 14 */ 15 16 /* In main.c: */ 17 18 float BeforeSub = 1.2; /* line space before a subscript */ 19 float AfterSub = 0.2; /* line space after a subscript */ 20 21 /* diacrit.c: */ 22 23 float Dvshift = 0.25; /* vertical shift for diacriticals on tall letters */ 24 float Dhshift = 0.025; /* horizontal shift for tall letters */ 25 float Dh2shift = 0.05; /* horizontal shift for small letters */ 26 float Dheight = 0.25; /* increment to height for diacriticals */ 27 float Barv = 0.68; /* vertical shift for bar */ 28 float Barh = 0.05; /* 1/2 horizontal shrink for bar */ 29 char *Vec = "\\v'-.45m'\\s-1\\(->\\s0\\v'.45m'"; 30 char *Dyad = "\\v'-.45m'\\s-1\\z\\(<-\\|\\(->\\s0\\v'.45m'"; 31 char *Hat = "\\v'-.1m'\\s+1^\\s0\\v'.1m'"; 32 char *Tilde = "\\v'-.1m'\\s+1~\\s0\\v'.1m'"; 33 char *Dot = "\\v'-.67m'.\\v'.67m'"; 34 char *Dotdot = "\\v'-.67m'..\\v'.67m'"; 35 char *Utilde = "\\v'1.0m'\\s+2~\\s-2\\v'-1.0m'"; 36 37 /* eqnbox.c: */ 38 39 char *IRspace = "\\^"; /* space between italic & roman boxes */ 40 41 /* fat.c: */ 42 43 float Fatshift = 0.05; /* fattening shifts by Fatshift ems */ 44 45 /* funny.c: */ 46 47 char *Sum = "\\v'.3m'\\s+5\\(*S\\s-5\\v'-.3m'"; 48 char *Union = "\\v'.3m'\\s+5\\(cu\\s-5\\v'-.3m'"; 49 char *Inter = "\\v'.3m'\\s+5\\(ca\\s-5\\v'-.3m'"; 50 char *Prod = "\\v'.3m'\\s+5\\(*P\\s-5\\v'-.3m'"; 51 int Funnyps = 5; /* point size change (== 5 above) */ 52 float Funnyht = 0.2; /* height correction */ 53 float Funnybase = 0.3; /* base correction */ 54 55 /* integral.c: */ 56 57 char *Integral = "\\v'.1m'\\s+4\\(is\\s-4\\v'-.1m'"; 58 int Intps = 4; /* point size change for integral (== 4 above) */ 59 float Intht = 1.15; /* ht of integral in ems */ 60 float Intbase = 0.3; /* base in ems */ 61 float Int1h = 0.4; /* lower limit left */ 62 float Int1v = 0.2; /* lower limit down */ 63 float Int2h = 0.08; /* upper limit right */ 64 float Int2v = 0.1; /* upper limit up */ 65 66 /* matrix.c: */ 67 68 char *Matspace = "\\ \\ "; /* space between matrix columns */ 69 70 /* over.c: */ 71 72 float Overgap = 0.3; /* gap between num and denom */ 73 float Overwid = 0.5; /* extra width of box */ 74 float Overline = 0.1; /* extra length of fraction bar */ 75 76 /* paren.c* */ 77 78 float Parenbase = 0.4; /* shift of base for even count */ 79 80 /* pile.c: */ 81 82 float Pilegap = 0.4; /* gap between pile elems */ 83 float Pilebase = 0.5; /* shift base of even # of piled elems */ 84 85 /* shift.c: */ 86 87 float Subbase = 0.2; /* subscript base belowe main base */ 88 float Supshift = 0.4; /* superscript .4 up main box */ 89 char *Sub1space = "\\|"; /* italic sub roman space */ 90 char *Sup1space = "\\|"; /* italic sup roman space */ 91 char *Sub2space = "\\^"; /* space after subscripted thing */ 92 char *SS1space = "\\^"; /* space before sub in x sub i sup j */ 93 char *SS2space = "\\^"; /* space before sup */ 94 95 /* sqrt.c: */ 96 /* sqrt is hard! punt for now. */ 97 /* part of the problem is that every typesetter does it differently */ 98 /* and we have several typesetters to run. */ 99 100 /* text.c: */ 101 /* ought to be done by a table */ 102