pstowne@zargon.lerc.nasa.gov (Charles E. Towne) (01/09/91)
Several months ago, in article <706@agsm.unsw.oz>, bobm@agsm.unsw.oz (Robert Marks) posted an article showing how to use the \S slant operator to get oblique greek letters in ditroff. In his post, he included the following eqn definitions for the first four greek letters: define alpha % "\S'+15'\s-1\H'+1'\(*a\H'0'\s+1\S'0'\h'0.2n'" % define beta % "\S'+15'\s-1\H'+1'\(*b\H'0'\s+1\S'0'\h'0.2n'" % define gamma % "\S'+15'\s-1\H'+1'\(*g\H'0'\s+1\S'0'\h'0.4n'" % define delta % "\S'+15'\s-1\H'+1'\(*d\H'0'\s+1\S'0'\h'0.3n'" % The \S'+15' results in letters printed at an oblique angle of 15 degrees. The other operations alter the aspect ratio (for aesthetic reasons) and add a slight space at the right of the character. Has anyone developed definitions like these for all the greek letters? If so, could you email them to me, or post them? (I tried email to Mr. Marks, but it bounced.) Since the above definitions are all the same, except for the amount of space added at the right of the character, I could assume this is true for the remaining letters, and experiment to get values for the \h values. But if someone's already developed a set of definitions, I'd like to try them. Thanks in advance. -- Charlie Towne Email: pstowne@zargon.lerc.nasa.gov MS 5-11 Phone: (216) 433-5851 NASA Lewis Research Center Cleveland, OH 44135
bobm@mummy.unsw.oz (Robert Marks) (01/09/91)
In article <1991Jan8.221651.10042@eagle.lerc.nasa.gov>, pstowne@zargon.lerc.nasa.gov (Charles E. Towne) writes: > Several months ago, in article <706@agsm.unsw.oz>, bobm@agsm.unsw.oz > (Robert Marks) posted an article showing how to use the \S slant > operator to get oblique greek letters in ditroff. In his post, he > included the following eqn definitions for the first four greek letters: > > define alpha % "\S'+15'\s-1\H'+1'\(*a\H'0'\s+1\S'0'\h'0.2n'" % > define beta % "\S'+15'\s-1\H'+1'\(*b\H'0'\s+1\S'0'\h'0.2n'" % > define gamma % "\S'+15'\s-1\H'+1'\(*g\H'0'\s+1\S'0'\h'0.4n'" % > define delta % "\S'+15'\s-1\H'+1'\(*d\H'0'\s+1\S'0'\h'0.3n'" % > > The \S'+15' results in letters printed at an oblique angle of 15 degrees. > The other operations alter the aspect ratio (for aesthetic reasons) and > add a slight space at the right of the character. > > Has anyone developed definitions like these for all the greek letters? > If so, could you email them to me, or post them? (I tried email to > Mr. Marks, but it bounced.) > > Since the above definitions are all the same, except for the amount of > space added at the right of the character, I could assume this is true > for the remaining letters, and experiment to get values for the \h values. > But if someone's already developed a set of definitions, I'd like to > try them. Thanks in advance. > > -- > Charlie Towne Email: pstowne@zargon.lerc.nasa.gov > MS 5-11 Phone: (216) 433-5851 > NASA Lewis Research Center > Cleveland, OH 44135 Here is the complete set I wrote for production of the Australian Journal of Management, with some additional symbols and definitions besides. (Although I haven't yet used groff 0.6 -- if Larry Wall has trouble compiling g++, what hope have the rest of us? -- I have read the manual entries, and I see that geqn has a much more elegant facility than definitions to obtain special words in roman font in equations; still, for what it's worth I've left these definitions in.) Robert MARKS, Australian Graduate School of Management, University of New South Wales, PO Box 1, Kensington, NSW 2033, Australia. Phone: +61 2 662-0271 Fax: +61 2 662-2451 Internet: bobm%agsm.unsw.oz.au define alpha % "\S'+15'\s-1\H'+1'\(*a\H'0'\s+1\S'0'\h'0.2n'" % define ALPHAit % "\S'+15'\s-1\H'+1'\(*A\H'0'\s+1\S'0'\h'0.1n'" % define beta % "\S'+15'\s-1\H'+1'\(*b\H'0'\s+1\S'0'\h'0.2n'" % define BETAit % "\S'+15'\s-1\H'+1'\(*B\H'0'\s+1\S'0'\h'0.2n'" % define gamma % "\S'+15'\s-1\H'+1'\(*g\H'0'\s+1\S'0'\h'0.4n'" % define GAMMAit % "\S'+15'\s-1\H'+1'\(*G\H'0'\s+1\S'0'\h'0.35n'" % define delta % "\S'+15'\s-1\H'+1'\(*d\H'0'\s+1\S'0'\h'0.3n'" % define DELTAit % "\S'+15'\s-1\H'+1'\(*D\H'0'\s+1\S'0'\h'0.1n'" % define epsilon % "\S'+15'\s-1\H'+1'\(*e\H'0'\s+1\S'0'\h'0.2n'" % define EPSILONit % "\S'+15'\s-1\H'+1'\(*E\H'0'\s+1\S'0'\h'0.25n'" % define zeta % "\S'+15'\s-1\H'+1'\(*z\H'0'\s+1\S'0'\h'0.3n'" % define ZETAit % "\S'+15'\s-1\H'+1'\(*Z\H'0'\s+1\S'0'\h'0.33n'" % define eta % "\S'+15'\s-1\H'+1'\(*y\H'0'\s+1\S'0'\h'0.17n'" % define ETAit % "\S'+15'\s-1\H'+1'\(*Y\H'0'\s+1\S'0'\h'0.28n'" % define theta % "\S'+15'\s-1\H'+1'\(*h\H'0'\s+1\S'0'\h'0.2n'" % define THETAit % "\S'+15'\s-1\H'+1'\(*H\H'0'\s+1\S'0'\h'0.2n'" % define iota % "\S'+15'\s-1\H'+1'\(*i\H'0'\s+1\S'0'\h'0.17n'" % define IOTAit % "\S'+15'\s-1\H'+1'\(*I\H'0'\s+1\S'0'\h'0.33n'" % define kappa % "\S'+15'\s-1\H'+1'\(*k\H'0'\s+1\S'0'\h'0.3n'" % define KAPPAit % "\S'+15'\s-1\H'+1'\(*K\H'0'\s+1\S'0'\h'0.33n'" % define lambda % "\S'+15'\s-1\H'+1'\(*l\H'0'\s+1\S'0'\h'0.2n'" % define LAMBDAit % "\S'+15'\s-1\H'+1'\(*L\H'0'\s+1\S'0'\h'0.1n'" % define mu % "\S'+15'\s-1\H'+1'\(*m\H'0'\s+1\S'0'\h'0.2n'" % define MUit % "\S'+15'\s-1\H'+1'\(*M\H'0'\s+1\S'0'\h'0.33n'" % define nu % "\S'+15'\s-1\H'+1'\(*n\H'0'\s+1\S'0'\h'0.25n'" % define NUit % "\S'+15'\s-1\H'+1'\(*N\H'0'\s+1\S'0'\h'0.33n'" % define xi % "\S'+15'\s-1\H'+1'\(*c\H'0'\s+1\S'0'\h'0.2n'" % define XIit % "\S'+15'\s-1\H'+1'\(*C\H'0'\s+1\S'0'\h'0.25n'" % define omicron % "\S'+15'\s-1\H'+1'\(*o\H'0'\s+1\S'0'\h'0.2n'" % define OMICRONit % "\S'+15'\s-1\H'+1'\(*O\H'0'\s+1\S'0'\h'0.2n'" % define pi % "\S'+15'\s-1\H'+1'\(*p\H'0'\s+1\S'0'\h'0.25n'" % define PIit % "\S'+15'\s-1\H'+1'\(*P\H'0'\s+1\S'0'\h'0.33n'" % define rho % "\S'+15'\s-1\H'+1'\(*r\H'0'\s+1\S'0'\h'0.2n'" % define RHOit % "\S'+15'\s-1\H'+1'\(*R\H'0'\s+1\S'0'\h'0.25n'" % define sigma % "\S'+15'\s-1\H'+1'\(*s\H'0'\s+1\S'0'\h'0.3n'" % define SIGMAit % "\S'+15'\s-1\H'+1'\(*S\H'0'\s+1\S'0'\h'0.3n'" % define tau % "\S'+15'\s-1\H'+1'\(*t\H'0'\s+1\S'0'\h'0.3n'" % define TAUit % "\S'+15'\s-1\H'+1'\(*T\H'0'\s+1\S'0'\h'0.3n'" % define upsilon % "\S'+15'\s-1\H'+1'\(*u\H'0'\s+1\S'0'\h'0.2n'" % define UPSILONit % "\S'+15'\s-1\H'+1'\(*U\H'0'\s+1\S'0'\h'0.4n'" % define phi % "\S'+15'\s-1\H'+1'\(*f\H'0'\s+1\S'0'\h'0.2n'" % define PHIit % "\S'+15'\s-1\H'+1'\(*F\H'0'\s+1\S'0'\h'0.2n'" % define psi % "\S'+15'\s-1\H'+1'\(*q\H'0'\s+1\S'0'\h'0.35n'" % define PSIit % "\S'+15'\s-1\H'+1'\(*Q\H'0'\s+1\S'0'\h'0.35n'" % define chi % "\S'+15'\s-1\H'+1'\(*x\H'0'\s+1\S'0'\h'0.25n'" % define CHIit % "\S'+15'\s-1\H'+1'\(*X\H'0'\s+1\S'0'\h'0.33n'" % define omega % "\S'+15'\s-1\H'+1'\(*w\H'0'\s+1\S'0'\h'0.2n'" % define OMEGAit % "\S'+15'\s-1\H'+1'\(*W\H'0'\s+1\S'0'\h'0.2n'" % define Fraction % {up 20 size -4 $1 down 25 "" back 12 size +1 "\S'+15'/\S'0'" up 5 "" fwd 6 size -4 $2} % define lower % sub up 30 fwd 50 % define upper % sup up 30 % define Integral % {size +2 int lower $1 upper $2} % define aleph % "\S'+15'\s-1\H'+1'\(al\H'0'\s+1\S'0'\h'0.2n'" % define ln % "\S'-15'\f2ln\fP\S'0'" % define lscr % "\S'-15'\f2l\fP\S'0'" % define becaus % "\u\s+5.\s0\d\s+5.\s0\u\s+5.\s0\d" % define times % \(mu % define lt % roman "\^<\^" % define < % roman "\^<\^" % define gt % roman "\^>\^" % define > % roman "\^>\^" % define | % roman "\^|\^" % define / % roman "\^\S'+18'\(br\S'0'\^"^ ^ % define ++++ % \(pl % define ==== % \(eq % define prime % \(mt % define there4 % \(tf % define thf % \(tf % define forall % \(fa % define oppA % \(fa % define exist % \(te % define oppE % \(te % define intersection % "\(ca" % define union % "\(cu" % define Exp % roman "Exp" % define cov % roman "cov" % define Cov % roman "Cov" % define var % roman "var" % define Var % roman "Var" % define Prob % roman "Prob" % define where % roman "where" % define subject % roman "subject" % define st % roman "st" % define nd % roman "nd" % define rd % roman "rd" % define th % roman "th" % define n.s. % roman "n.s." % define s.t. % roman "s.t." % define tr % roman "tr" % define sgn % roman "sgn" % define RR % "\fHI\h'-.85n'R\fP" % define lcb % ^ roman "{"^ % define rcb % ^ roman "}"^ % define sroot % down 20 sqrt up 20 % define app= % "\(mi" up 20 back 55 "\(ap" down 20 % define -wig % "\(mi" up 20 back 55 "\(ap" down 20 % define wig % "\(ap" % define divby % ^ "\(di" ^ % define member % "\(mo" %
lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall) (01/10/91)
In article <1023@usage.csd.unsw.oz.au> bobm@mummy.unsw.oz (Robert Marks) writes:
: (Although I haven't yet used groff 0.6 -- if Larry Wall has trouble
: compiling g++, what hope have the rest of us?
Well, thanks, but to be fair, I was trying to install it in a non-standard
place as non-superuser, because all the machines I had root access to were
administratively locked into the wrong version of gcc.
Larry Wall
lwall@jpl-devvax.jpl.nasa.gov