%!PS-Adobe-1.0
%%Creator: unisoft:larry (Larry Huffman,,,)
%%Title: stdin (ditroff)
%%CreationDate: Fri Jun 2 13:06:50 1989
%%EndComments
% Start of psdit.pro -- prolog for ditroff translator
% Copyright (c) 1985,1987 Adobe Systems Incorporated. All Rights Reserved.
% GOVERNMENT END USERS: See Notice file in TranScript library directory
% -- probably /usr/lib/ps/Notice
% RCS: $Header: psdit.pro,v 2.2 87/11/17 16:40:42 byron Rel $
/$DITroff 140 dict def $DITroff begin
/fontnum 1 def /fontsize 10 def /fontheight 10 def /fontslant 0 def
/xi {0 72 11 mul translate 72 resolution div dup neg scale 0 0 moveto
/fontnum 1 def /fontsize 10 def /fontheight 10 def /fontslant 0 def F
/pagesave save def}def
/PB{save /psv exch def currentpoint translate
resolution 72 div dup neg scale 0 0 moveto}def
/PE{psv restore}def
/m1 matrix def /m2 matrix def /m3 matrix def /oldmat matrix def
/tan{dup sin exch cos div}bind def
/point{resolution 72 div mul}bind def
/dround {transform round exch round exch itransform}bind def
/xT{/devname exch def}def
/xr{/mh exch def /my exch def /resolution exch def}def
/xp{}def
/xs{docsave restore end}def
/xt{}def
/xf{/fontname exch def /slotno exch def fontnames slotno get fontname eq not
{fonts slotno fontname findfont put fontnames slotno fontname put}if}def
/xH{/fontheight exch def F}bind def
/xS{/fontslant exch def F}bind def
/s{/fontsize exch def /fontheight fontsize def F}bind def
/f{/fontnum exch def F}bind def
/F{fontheight 0 le {/fontheight fontsize def}if
fonts fontnum get fontsize point 0 0 fontheight point neg 0 0 m1 astore
fontslant 0 ne{1 0 fontslant tan 1 0 0 m2 astore m3 concatmatrix}if
makefont setfont .04 fontsize point mul 0 dround pop setlinewidth}bind def
/X{exch currentpoint exch pop moveto show}bind def
/N{3 1 roll moveto show}bind def
/Y{exch currentpoint pop exch moveto show}bind def
/S /show load def
/ditpush{}def/ditpop{}def
/AX{3 -1 roll currentpoint exch pop moveto 0 exch ashow}bind def
/AN{4 2 roll moveto 0 exch ashow}bind def
/AY{3 -1 roll currentpoint pop exch moveto 0 exch ashow}bind def
/AS{0 exch ashow}bind def
/MX{currentpoint exch pop moveto}bind def
/MY{currentpoint pop exch moveto}bind def
/MXY /moveto load def
/cb{pop}def % action on unknown char -- nothing for now
/n{}def/w{}def
/p{pop showpage pagesave restore /pagesave save def}def
/abspoint{currentpoint exch pop add exch currentpoint pop add exch}def
/dstroke{currentpoint stroke moveto}bind def
/Dl{2 copy gsave rlineto stroke grestore rmoveto}bind def
/arcellipse{oldmat currentmatrix pop
currentpoint translate 1 diamv diamh div scale /rad diamh 2 div def
rad 0 rad -180 180 arc oldmat setmatrix}def
/Dc{gsave dup /diamv exch def /diamh exch def arcellipse dstroke
grestore diamh 0 rmoveto}def
/De{gsave /diamv exch def /diamh exch def arcellipse dstroke
grestore diamh 0 rmoveto}def
/Da{currentpoint /by exch def /bx exch def /fy exch def /fx exch def
/cy exch def /cx exch def /rad cx cx mul cy cy mul add sqrt def
/ang1 cy neg cx neg atan def /ang2 fy fx atan def cx bx add cy by add
2 copy rad ang1 ang2 arcn stroke exch fx add exch fy add moveto}def
/Barray 200 array def % 200 values in a wiggle
/D~{mark}def
/D~~{counttomark Barray exch 0 exch getinterval astore /Bcontrol exch def pop
/Blen Bcontrol length def Blen 4 ge Blen 2 mod 0 eq and
{Bcontrol 0 get Bcontrol 1 get abspoint /Ycont exch def /Xcont exch def
Bcontrol 0 2 copy get 2 mul put Bcontrol 1 2 copy get 2 mul put
Bcontrol Blen 2 sub 2 copy get 2 mul put
Bcontrol Blen 1 sub 2 copy get 2 mul put
/Ybi /Xbi currentpoint 3 1 roll def def 0 2 Blen 4 sub
{/i exch def
Bcontrol i get 3 div Bcontrol i 1 add get 3 div
Bcontrol i get 3 mul Bcontrol i 2 add get add 6 div
Bcontrol i 1 add get 3 mul Bcontrol i 3 add get add 6 div
/Xbi Xcont Bcontrol i 2 add get 2 div add def
/Ybi Ycont Bcontrol i 3 add get 2 div add def
/Xcont Xcont Bcontrol i 2 add get add def
/Ycont Ycont Bcontrol i 3 add get add def
Xbi currentpoint pop sub Ybi currentpoint exch pop sub rcurveto
}for dstroke}if}def
end
/ditstart{$DITroff begin
/nfonts 60 def % NFONTS makedev/ditroff dependent!
/fonts[nfonts{0}repeat]def
/fontnames[nfonts{()}repeat]def
/docsave save def
}def
% character outcalls
/oc {/pswid exch def /cc exch def /name exch def
/ditwid pswid fontsize mul resolution mul 72000 div def
/ditsiz fontsize resolution mul 72 div def
ocprocs name known{ocprocs name get exec}{name cb}
ifelse}def
/fractm [.65 0 0 .6 0 0] def
/fraction
{/fden exch def /fnum exch def gsave /cf currentfont def
cf fractm makefont setfont 0 .3 dm 2 copy neg rmoveto
fnum show rmoveto currentfont cf setfont(\244)show setfont fden show
grestore ditwid 0 rmoveto} def
/oce {grestore ditwid 0 rmoveto}def
/dm {ditsiz mul}def
/ocprocs 50 dict def ocprocs begin
(14){(1)(4)fraction}def
(12){(1)(2)fraction}def
(34){(3)(4)fraction}def
(13){(1)(3)fraction}def
(23){(2)(3)fraction}def
(18){(1)(8)fraction}def
(38){(3)(8)fraction}def
(58){(5)(8)fraction}def
(78){(7)(8)fraction}def
(sr){gsave .05 dm .16 dm rmoveto(\326)show oce}def
(is){gsave 0 .15 dm rmoveto(\362)show oce}def
(->){gsave 0 .02 dm rmoveto(\256)show oce}def
(<-){gsave 0 .02 dm rmoveto(\254)show oce}def
(==){gsave 0 .05 dm rmoveto(\272)show oce}def
end
% DIThacks fonts for some special chars
50 dict dup begin
/FontType 3 def
/FontName /DIThacks def
/FontMatrix [.001 0.0 0.0 .001 0.0 0.0] def
/FontBBox [-220 -280 900 900] def% a lie but ...
/Encoding 256 array def
0 1 255{Encoding exch /.notdef put}for
Encoding
dup 8#040/space put %space
dup 8#110/rc put %right ceil
dup 8#111/lt put %left top curl
dup 8#112/bv put %bold vert
dup 8#113/lk put %left mid curl
dup 8#114/lb put %left bot curl
dup 8#115/rt put %right top curl
dup 8#116/rk put %right mid curl
dup 8#117/rb put %right bot curl
dup 8#120/rf put %right floor
dup 8#121/lf put %left floor
dup 8#122/lc put %left ceil
dup 8#140/sq put %square
dup 8#141/bx put %box
dup 8#142/ci put %circle
dup 8#143/br put %box rule
dup 8#144/rn put %root extender
dup 8#145/vr put %vertical rule
dup 8#146/ob put %outline bullet
dup 8#147/bu put %bullet
dup 8#150/ru put %rule
dup 8#151/ul put %underline
pop
/DITfd 100 dict def
/BuildChar{0 begin
/cc exch def /fd exch def
/charname fd /Encoding get cc get def
/charwid fd /Metrics get charname get def
/charproc fd /CharProcs get charname get def
charwid 0 fd /FontBBox get aload pop setcachedevice
40 setlinewidth
newpath 0 0 moveto gsave charproc grestore
end}def
/BuildChar load 0 DITfd put
%/UniqueID 5 def
/CharProcs 50 dict def
CharProcs begin
/space{}def
/.notdef{}def
/ru{500 0 rls}def
/rn{0 750 moveto 500 0 rls}def
/vr{20 800 moveto 0 -770 rls}def
/bv{20 800 moveto 0 -1000 rls}def
/br{20 770 moveto 0 -1040 rls}def
/ul{0 -250 moveto 500 0 rls}def
/ob{200 250 rmoveto currentpoint newpath 200 0 360 arc closepath stroke}def
/bu{200 250 rmoveto currentpoint newpath 200 0 360 arc closepath fill}def
/sq{80 0 rmoveto currentpoint dround newpath moveto
640 0 rlineto 0 640 rlineto -640 0 rlineto closepath stroke}def
/bx{80 0 rmoveto currentpoint dround newpath moveto
640 0 rlineto 0 640 rlineto -640 0 rlineto closepath fill}def
/ci{355 333 rmoveto currentpoint newpath 333 0 360 arc
50 setlinewidth stroke}def
/lt{20 -200 moveto 0 550 rlineto currx 800 2cx s4 add exch s4 a4p stroke}def
/lb{20 800 moveto 0 -550 rlineto currx -200 2cx s4 add exch s4 a4p stroke}def
/rt{20 -200 moveto 0 550 rlineto currx 800 2cx s4 sub exch s4 a4p stroke}def
/rb{20 800 moveto 0 -500 rlineto currx -200 2cx s4 sub exch s4 a4p stroke}def
/lk{20 800 moveto 20 300 -280 300 s4 arcto pop pop 1000 sub
currentpoint stroke moveto
20 300 4 2 roll s4 a4p 20 -200 lineto stroke}def
/rk{20 800 moveto 20 300 320 300 s4 arcto pop pop 1000 sub
currentpoint stroke moveto
20 300 4 2 roll s4 a4p 20 -200 lineto stroke}def
/lf{20 800 moveto 0 -1000 rlineto s4 0 rls}def
/rf{20 800 moveto 0 -1000 rlineto s4 neg 0 rls}def
/lc{20 -200 moveto 0 1000 rlineto s4 0 rls}def
/rc{20 -200 moveto 0 1000 rlineto s4 neg 0 rls}def
end
/Metrics 50 dict def Metrics begin
/.notdef 0 def
/space 500 def
/ru 500 def
/br 0 def
/lt 250 def
/lb 250 def
/rt 250 def
/rb 250 def
/lk 250 def
/rk 250 def
/rc 250 def
/lc 250 def
/rf 250 def
/lf 250 def
/bv 250 def
/ob 350 def
/bu 350 def
/ci 750 def
/bx 750 def
/sq 750 def
/rn 500 def
/ul 500 def
/vr 0 def
end
DITfd begin
/s2 500 def /s4 250 def /s3 333 def
/a4p{arcto pop pop pop pop}def
/2cx{2 copy exch}def
/rls{rlineto stroke}def
/currx{currentpoint pop}def
/dround{transform round exch round exch itransform} def
end
end
/DIThacks exch definefont pop
ditstart
(psc)xT
576 1 1 xr
1(Times-Roman)xf 1 f
2(Times-Italic)xf 2 f
3(Times-Bold)xf 3 f
4(Times-BoldItalic)xf 4 f
5(Helvetica)xf 5 f
6(Helvetica-Bold)xf 6 f
7(Courier)xf 7 f
8(Courier-Bold)xf 8 f
9(Symbol)xf 9 f
10(DIThacks)xf 10 f
10 s
1 f
xi
%%EndProlog
%%Page: 1 1
10 s 0 xH 0 xS 1 f
9 s
8 s
1008 396(MT\(1\))N
2208(\()X
2234(Essential)X
2481(Utilities)X
2693(\))X
3718(MT\(1\))X
1008 596(N)N
1010(NA)X
1058(AM)X
1106(ME)X
1165(E)X
9 s
1267 676(mt)N
9 f
1361(-)X
1 f
1419(magnetic)X
1701(tape)X
1839(control)X
8 s
1008 788(S)N
1010(SY)X
1048(YN)X
1096(NO)X
1144(OP)X
1192(PS)X
1230(SI)X
1268(IS)X
1291(S)X
3 f
9 s
1267 868(mt)N
1 f
1378([)X
3 f
9 f
1429(-)X
1431(-)X
3 f
1471(f)X
2 f
1522(tapename)X
1 f
1829(])X
2 f
1880(command)X
1 f
2187([)X
2 f
2238(count)X
1 f
2425(])X
8 s
1008 980(D)N
1010(DE)X
1058(ES)X
1099(SC)X
1137(CR)X
1182(RI)X
1227(IP)X
1250(PT)X
1288(TI)X
1329(IO)X
1352(ON)X
1400(N)X
9 s
1267 1060(The)N
3 f
1401(mt)X
1 f
1507(program)X
1773(sends)X
1955(commands)X
2289(to)X
2367(a)X
2421(magnetic)X
2707(tape)X
2849(drive.)X
3055(If)X
2 f
3125(tapename)X
1 f
3428(is)X
3499(not)X
3614(speci\256ed,)X
1267 1140(the)N
1392(environment)X
1793(variable)X
8 s
2060(TAPE)X
9 s
2257(is)X
2342(used;)X
2531(if)X
8 s
2610(TAPE)X
9 s
2807(does)X
2976(not)X
3105(exist,)X
3 f
3296(mt)X
1 f
3416(uses)X
3576(the)X
3700(device)X
3 f
1267 1220(/dev/rmt/ctape)N
1 f
1715(.)X
1772(Note:)X
2 f
1971(tapename)X
1 f
2272(must)X
2433(refer)X
2590(to)X
2667(a)X
2720(raw)X
2850(\(not)X
2988(block\))X
3194(tape)X
3336(device.)X
3582(By)X
3688(default)X
3 f
1267 1300(mt)N
1 f
1378(performs)X
1665(the)X
1780(requested)X
2082(operation)X
2380(once.)X
2578(Operations)X
2920(may)X
3070(be)X
3164(performed)X
3490(repeatedly)X
3816(by)X
1267 1380(specifying)N
1585(a)X
2 f
1635(count)X
1 f
1813(argument.)X
1267 1492(The)N
1408(available)X
1697(commands)X
2038(are)X
2155(listed)X
2340(below.)X
2581(Only)X
2754(as)X
2843(many)X
3032(characters)X
3354(as)X
3444(are)X
3562(required)X
3832(to)X
1267 1572(uniquely)N
1537(identify)X
1779(a)X
1829(command)X
2131(need)X
2285(be)X
2371(speci\256ed.)X
3 f
1267 1684(mt)N
1 f
1376(returns)X
1601(a)X
1658(0)X
1720(exit)X
1854(status)X
2044(when)X
2226(the)X
2340(operation\(s\))X
2714(were)X
2880(successful,)X
3220(1)X
3282(if)X
3352(the)X
3466(command)X
3776(was)X
1267 1764(unrecognized,)N
1691(and)X
1813(2)X
1867(if)X
1929(an)X
2015(operation)X
2305(failed.)X
8 s
1008 1876(O)N
1010(OP)X
1058(PT)X
1096(TI)X
1137(IO)X
1160(ON)X
1208(NS)X
1256(S)X
3 f
9 s
1267 1956(eof)N
1 f
1359(,)X
3 f
1395(weof)X
1 f
1627(Write)X
2 f
1809(count)X
1 f
8 s
1985(EOF)X
9 s
2124(marks)X
2318(at)X
2388(the)X
2494(current)X
2716(position)X
2966(on)X
3056(the)X
3162(tape.)X
3 f
1267 2068(fsf)N
1 f
1627(Forward)X
1889(space)X
2 f
2067(count)X
1 f
2245(\256les.)X
1267 2180(For)N
1385(the)X
1491(following)X
1789(commands,)X
2 f
2137(count)X
1 f
2315(is)X
2381(ignored:)X
3 f
1267 2292(rewind)N
1 f
1526(Rewind)X
1768(the)X
1874(tape.)X
3 f
1267 2404(retension)N
1 f
1526 2484(Wind)N
1711(the)X
1824(tape)X
1969(to)X
2050(the)X
2163(end)X
2292(of)X
2377(the)X
2490(reel)X
2623(and)X
2752(then)X
2901(rewind)X
3126(it,)X
3209(smoothing)X
3538(out)X
3655(the)X
3768(tape)X
1526 2564(tension.)N
1788(\()X
2 f
(count)S
1 f
1996(is)X
2062(ignored.\))X
3 f
1267 2676(erase)N
1 f
1526(Erase)X
1704(the)X
1810(entire)X
1992(tape.)X
8 s
1008 2788(F)N
1010(FI)X
1048(IL)X
1071(LE)X
1112(ES)X
1153(S)X
3 f
9 s
1267 2868(/dev/rmt/)N
9 f
1551(*)X
1553(*)X
1 f
1987(raw)X
2113(magnetic)X
2395(tape)X
2533(interface)X
8 s
1008 3060(S)N
1010(SE)X
1048(EE)X
1089(E)X
1146(A)X
1148(AL)X
1196(LS)X
1237(SO)X
1275(O)X
3 f
9 s
1267 3140(dd)N
1 f
1347(\(1\),)X
3 f
1467(environ)X
1 f
(\(5V\).)S
1008 4763(May)N
1158(1989)X
3 f
1 f
3694(Page)X
3852(1)X
1 p
%%Trailer
xt
xs