.\"     Copyright 1985, 1986, 1987, 1988 Chris Lewis
.\"		All Rights Reserved
.\"
.\"    Permission to copy and further distribute is freely given provided
.\"    this copyright notice remains intact and that this software is not
.\"    sold for profit.
.\"
.\"	Project:	Generic Troff drivers
.\"	Module:		tmac.eci.sh
.\"	Author: 	Chris Lewis
.\"	Specs:		MM Prolog
.\"ident  "@(#)tmac.eci.sh: 2.1 Copyright 90/07/18 16:52:13 Chris Lewis"
.\"endif
.so %%LIBDIR%%/adapters/tmac.m
.tr \(bs
.ds}2 Elegant Communications Inc.
.dsIn \*(}2
.dsBU \s+2\(bu\s0
.de eX
.ie \\w'\\$1'=0 .ds ee
.el .ds ee "\\$1
.DS \\$2 \\$3
\!.fp 1 C
.\"\!.lg 0
\!.cs 1 24
.ss 24
\!.br
..
.de eE
\!.fp 1 R
\!.cs 1
.ss 12
\!.br
\.if \\w'\\*(ee'>0 .FG "\\*(ee"
.DE
..
.ds HP +4 +2
.ds HF 3 3 2 2
.OH "'''Elegant Communications Inc.'"
.EH "'''Elegant Communications Inc.'"
.PH "''''"
.if t .PF "''\s8481 University Avenue, Suite 602, Toronto, Canada, M5G 2E9 (416)-595-5425, FAX (416) 595-5439\s0''"
.if n .PF "''481 University Avenue, Suite 602, Toronto, Canada''"
.\".OF "'Page \\\\nP''\\\\*(DT'"
.OF "'\\\\*(DT''Page \\\\nP'"
.EF "'\\\\*(DT''Page \\\\nP'"
.de nH
.OF "''''"
.EF "''''"
.PF "''''"
.OH "''''"
.EH "''''"
.PH "''''"
..
.de aD
.SP 3
.DS
Elegant Communications Inc.
481 University Avenue,
Suite 602
Toronto, Ontario
M5G 2E9

Phone: (416) 595-5425
Fax: (416) 595-5439
.DE
..
.\"	Appendix Macros
.de AH
.if \\n(aH=0\{
.nr aH 1
.nr h1 0\}
.nr;1 0\\$1
.if!\\n(;1 .)D "aH:bad arg:\\$1"
.if2-\\n(;1 .nr h2 0 1
.if3-\\n(;1 .nr h3 0 1
.if4-\\n(;1 .nr h4 0 1
.if5-\\n(;1 .nr h5 0 1
.if6-\\n(;1 .nr h6 0 1
.if7-\\n(;1 .nr h7 0 1
.nr h\\n(;1 +1
.afh1 A
.ds}0 \\n(h1.
.if0\\$1-1 .as }0 \\n(h2
.if0\\$1-2 .as }0 .\\n(h3
.if0\\$1-3 .as }0 .\\n(h4
.if0\\$1-4 .as }0 .\\n(h5
.if0\\$1-5 .as }0 .\\n(h6
.if0\\$1-6 .as }0 .\\n(h7
.nr Hu \\n(;1
.HU "Appendix \\*(}0\\ \\ \\$2"
..