Greek Italics eqn troff Script.


.\" The following is a short eqn/troff macro for creating doing
.\" several things, but mainly to create oblique (or Italics) Greek
.\" lower-case letters for mathemtical equations.
.\" Simply include this file in your initial eqn set-up:
.\" .EQ
.\" include "alphas"
.\" gsize 12
.\" delim ``
.\" .EN
.\" Note: some non-ASCII characters may differ on your set-up.
.\" Edit to taste.
.\"
.\" Written by Robert Marks, bobm@agsm.edu.au.  Vers. 1.0, Aug 22, 1995.
.\"
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 Calcat % "\b'\(br\(br'" sub roman down 100 {~ $1 } %
define lower	% sub up 30 fwd 50 %
define upper	% sup up 30 %
define Integral	% {size +2 int lower $1 upper $2} %
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 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 all	% ~ roman "all" ~ %
define and	% ~ roman "and" ~ %
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" %
define $	% "$" %



Up
Robert Marks, bobm@agsm.edu.au