gen/letter.template

   1 %!PS-Adobe-1.0
   2 %%Creator: Toto:mar (Mark A. Rosenstein,,E40-338M,31530,7822001)
   3 %%Title: stdin (ditroff)
   4 %%CreationDate: Tue Jun 16 22:15:23 1992
   5 %%EndComments
   6 % Start of psdit.pro -- prolog for ditroff translator
   7 % Copyright (c) 1985,1987 Adobe Systems Incorporated. All Rights Reserved.
   8 % GOVERNMENT END USERS: See Notice file in TranScript library directory
   9 % -- probably /usr/lib/ps/Notice
  10 % RCS: $Header$
  11 /$DITroff 140 dict def $DITroff begin
  12 /fontnum 1 def /fontsize 10 def /fontheight 10 def /fontslant 0 def
  13 /xi {0 72 11 mul translate 72 resolution div dup neg scale 0 0 moveto
  14   /fontnum 1 def /fontsize 10 def /fontheight 10 def /fontslant 0 def F
  15   /pagesave save def}def
  16 /PB{save /psv exch def currentpoint translate
  17   resolution 72 div dup neg scale 0 0 moveto}def
  18 /PE{psv restore}def
  19 /m1 matrix def /m2 matrix def /m3 matrix def /oldmat matrix def
  20 /tan{dup sin exch cos div}bind def
  21 /point{resolution 72 div mul}bind def
  22 /dround {transform round exch round exch itransform}bind def
  23 /xT{/devname exch def}def
  24 /xr{/mh exch def /my exch def /resolution exch def}def
  25 /xp{}def
  26 /xs{docsave restore end}def
  27 /xt{}def
  28 /xf{/fontname exch def /slotno exch def fontnames slotno get fontname eq not
  29  {fonts slotno fontname findfont put fontnames slotno fontname put}if}def
  30 /xH{/fontheight exch def F}bind def
  31 /xS{/fontslant exch def F}bind def
  32 /s{/fontsize exch def /fontheight fontsize def F}bind def
  33 /f{/fontnum exch def F}bind def
  34 /F{fontheight 0 le {/fontheight fontsize def}if
  35    fonts fontnum get fontsize point 0 0 fontheight point neg 0 0 m1 astore
  36    fontslant 0 ne{1 0 fontslant tan 1 0 0 m2 astore m3 concatmatrix}if
  37    makefont setfont .04 fontsize point mul 0 dround pop setlinewidth}bind def
  38 /X{exch currentpoint exch pop moveto show}bind def
  39 /N{3 1 roll moveto show}bind def
  40 /Y{exch currentpoint pop exch moveto show}bind def
  41 /S /show load def
  42 /ditpush{}def/ditpop{}def
  43 /AX{3 -1 roll currentpoint exch pop moveto 0 exch ashow}bind def
  44 /AN{4 2 roll moveto 0 exch ashow}bind def
  45 /AY{3 -1 roll currentpoint pop exch moveto 0 exch ashow}bind def
  46 /AS{0 exch ashow}bind def
  47 /MX{currentpoint exch pop moveto}bind def
  48 /MY{currentpoint pop exch moveto}bind def
  49 /MXY /moveto load def
  50 /cb{pop}def     % action on unknown char -- nothing for now
  51 /n{}def/w{}def
  52 /p{pop showpage pagesave restore /pagesave save def}def
  53 /abspoint{currentpoint exch pop add exch currentpoint pop add exch}def
  54 /dstroke{currentpoint stroke moveto}bind def
  55 /Dl{2 copy gsave rlineto stroke grestore rmoveto}bind def
  56 /arcellipse{oldmat currentmatrix pop
  57  currentpoint translate 1 diamv diamh div scale /rad diamh 2 div def
  58  rad 0 rad -180 180 arc oldmat setmatrix}def
  59 /Dc{gsave dup /diamv exch def /diamh exch def arcellipse dstroke
  60     grestore diamh 0 rmoveto}def
  61 /De{gsave /diamv exch def /diamh exch def arcellipse dstroke
  62     grestore diamh 0 rmoveto}def
  63 /Da{currentpoint /by exch def /bx exch def /fy exch def /fx exch def
  64    /cy exch def /cx exch def /rad cx cx mul cy cy mul add sqrt def
  65    /ang1 cy neg cx neg atan def /ang2 fy fx atan def cx bx add cy by add
  66    2 copy rad ang1 ang2 arcn stroke exch fx add exch fy add moveto}def
  67 /Barray 200 array def % 200 values in a wiggle
  68 /D~{mark}def
  69 /D~~{counttomark Barray exch 0 exch getinterval astore /Bcontrol exch def pop
  70  /Blen Bcontrol length def Blen 4 ge Blen 2 mod 0 eq and
  71  {Bcontrol 0 get Bcontrol 1 get abspoint /Ycont exch def /Xcont exch def
  72   Bcontrol 0 2 copy get 2 mul put Bcontrol 1 2 copy get 2 mul put
  73   Bcontrol Blen 2 sub 2 copy get 2 mul put
  74   Bcontrol Blen 1 sub 2 copy get 2 mul put
  75   /Ybi /Xbi currentpoint 3 1 roll def def 0 2 Blen 4 sub
  76   {/i exch def
  77    Bcontrol i get 3 div Bcontrol i 1 add get 3 div
  78    Bcontrol i get 3 mul Bcontrol i 2 add get add 6 div
  79    Bcontrol i 1 add get 3 mul Bcontrol i 3 add get add 6 div
  80    /Xbi Xcont Bcontrol i 2 add get 2 div add def
  81    /Ybi Ycont Bcontrol i 3 add get 2 div add def
  82    /Xcont Xcont Bcontrol i 2 add get add def
  83    /Ycont Ycont Bcontrol i 3 add get add def
  84    Xbi currentpoint pop sub Ybi currentpoint exch pop sub rcurveto
  85   }for dstroke}if}def
  86 end
  87 /ditstart{$DITroff begin
  88  /nfonts 60 def                 % NFONTS makedev/ditroff dependent!
  89  /fonts[nfonts{0}repeat]def
  90  /fontnames[nfonts{()}repeat]def
  91 /docsave save def
  92 }def
  93
  94 ditstart
  95 (psc)xT
  96 576 1 1 xr
  97 1(Times-Roman)xf 1 f
  98 2(Times-Italic)xf 2 f
  99 3(Times-Bold)xf 3 f
 100 4(Times-BoldItalic)xf 4 f
 101 5(Helvetica)xf 5 f
 102 6(Helvetica-Bold)xf 6 f
 103 7(Courier)xf 7 f
 104 8(Courier-Bold)xf 8 f
 105 9(Symbol)xf 9 f
 106 10 s
 107 1 f
 108 % switch to color papertray
 109 1 statusdict /setpapertray get exec
 110 xi
 111 %%EndProlog
 112
 113 %%Page: 1 1
 114 10 s 0 xH 0 xS 1 f
 115 720 672(Athena)N
 116 972(User)X
 117 1144(Accounts)X
 118 720 768(MIT)N
 119 907(Room)X
 120 1122(11-124H)X
 121 720 864(77)N
 122 820(Massachusetts)X
 123 1303(Ave)X
 124 720 960(Cambridge,)N
 125 1116(MA)X
 126 1305(02139)X
 127 12 s
 128 1248 1464(%n)N
 129 1248 1576(%a1)N
 130 1248 1688(%a2)N
 131
 132 showpage pagesave restore
 133 % switch back to white paper
 134 3 statusdict /setpapertray get exec
 135 xi
 136 %%Page: 2 2
 137
 138 12 s 0 xH 0 xS 1 f
 139 720 912(From:)N
 140 979(Information)X
 141 1463(Systems)X
 142 864 1024(Athena)N
 143 1166(User)X
 144 1371(Accounts)X
 145 720 1248(To:)N
 146 926(%n)X
 147 2992(%d)X
 148 1008 1696(This)N
 149 1203(letter)X
 150 1426(is)X
 151 1514(to)X
 152 1613(con\256rm)X
 153 1936(that)X
 154 2105(`%l' registered for a second Athena password)X
 155 %2562(registered)X
 156 %2966(for)X
 157 %3102(a)X
 158 %3169(second)X
 159 %3460(Athena)X
 160 %3762(password)X
 161 720 1808(using the reg_extra program.)N
 162 1008 2032(If)N
 163 1096(you)X
 164 1264(did)X
 165 1411(not)X
 166 1558(do)X
 167 1678(this,)X
 168 1865(then)X
 169 2055(there)X
 170 2272(is)X
 171 2360(reason)X
 172 2635(to)X
 173 2734(believe)X
 174 3037(your)X
 175 3237(account)X
 176 3561(has)X
 177 3713(been)X
 178 720 2144(compromised,)N
 179 1292(so)X
 180 1401(contact)X
 181 1704(Athena)X
 182 2006(User)X
 183 2211(Accounts)X
 184 2598(immediately)X
 185 3105(by)X
 186 3225(calling)X
 187 3512(x3-1325,)X
 188 720 2256(sending)N
 189 1043(mail)X
 190 1239(to)X
 191 1338(<accounts@mit.edu>,)X
 192 2211(or)X
 193 2315(stopping)X
 194 2670(by)X
 195 2790(11-124H)X
 196 3155(between)X
 197 3500(the)X
 198 3642(hours)X
 199 3879(of)X
 200 3983(2)X
 201 4055(to)X
 202 720 2368(5.)N
 203 1008 2592(The)N
 204 1182(password)X
 205 1568(will)X
 206 1742(not)X
 207 1889(take)X
 208 2074(effect)X
 209 2318(for)X
 210 2454(two)X
 211 2622(weeks)X
 212 2886(from)X
 213 3097(the)X
 214 3239(date)X
 215 3424(above.)X
 216 3702(Remember,)X
 217 720 2704(the)N
 218 862(second)X
 219 1153(Athena)X
 220 1455(password)X
 221 1841(\("extra")X
 222 2168(instance\))X
 223 2540(will)X
 224 2714(allow)X
 225 2952(access)X
 226 3222(to)X
 227 3321(your)X
 228 3521(grades)X
 229 3796(and,)X
 230 720 2816(potentially,)N
 231 1181(other)X
 232 1403(sensitive)X
 233 1764(information.)X
 234 2267(It)X
 235 2350(is)X
 236 2438(important)X
 237 2837(that)X
 238 3006(you)X
 239 3174(keep)X
 240 3380(all)X
 241 3501(passwords)X
 242 720 2928(private,)N
 243 1036(since)X
 244 1258(they)X
 245 1448(will)X
 246 1622(be)X
 247 1737(used)X
 248 1937(to)X
 249 2036(give)X
 250 2226(you access to more and more critical functions.)X
 251 %2640(to)X
 252 %2739(more)X
 253 %2961(and)X
 254 %3124(more)X
 255 %3346(critical)X
 256 %3639(functions.)X
 257 1008 3152(If)N
 258 1096(you)X
 259 1264(have)X
 260 1470(any)X
 261 1633(question)X
 262 1983(please)X
 263 2248(contact)X
 264 2551(Athena)X
 265 2853(User)X
 266 3058(Accounts.)X
 267
 268 2 p
 269 %%Trailer
 270 xt
 271
 272 xs