systemdict begin

  /ArpaMap 100 dict def

end % systemdict

ArpaMap begin

  /ARADC 20 dict def
  ARADC begin
    /@ARADC: (ARADC IMP) def
    /LINC /replaceme def
    /UROCH /replaceme def
  end % ARADC

  /ARPA 20 dict def
  ARPA begin
    /@ARPA: (ARPA IMP) def
    /CSS /replaceme def
    /USC /replaceme def
    /DCEC /replaceme def
  end % ARPA

  /BBN63 20 dict def
  BBN63 begin
    /@BBN63: (BBN63 IMP) def
    /RCC5 /replaceme def
    /BRX25 /replaceme def
    /BBN82 /replaceme def
  end % BBN63

  /BBN82 20 dict def
  BBN82 begin
    /@BBN82: (BBN82 IMP) def
    /COLUM /replaceme def
    /BBN63 /replaceme def
    /RCC5 /replaceme def
    /HARV /replaceme def
  end % BBN82

  /BERK 20 dict def
  BERK begin
    /@BERK: (BERK IMP) def
    /WASH /replaceme def
    /LBL2 /replaceme def
    /XEROX /replaceme def
    /SRI2 /replaceme def
  end % BERK

  /BRAGG 20 dict def
  BRAGG begin
    /@BRAGG: (BRAGG IMP) def
    /TEXAS /replaceme def
    /DCEC /replaceme def
  end % BRAGG

  /BRX25 20 dict def
  BRX25 begin
    /@BRX25: (BRX25 IMP) def
    /BBN63 /replaceme def
  end % BRX25

  /CCA 20 dict def
  CCA begin
    /@CCA: (CCA IMP) def
    /UDEL /replaceme def
    /MIT6 /replaceme def
    /RCC5 /replaceme def
  end % CCA

  /CIT 20 dict def
  CIT begin
    /@CIT: (CIT IMP) def
    /USC /replaceme def
    /UCLA /replaceme def
  end % CIT

  /CMU 20 dict def
  CMU begin
    /@CMU: (CMU IMP) def
    /COLUM /replaceme def
    /PURDU /replaceme def
    /DCEC /replaceme def
  end % CMU

  /COLNS 20 dict def
  COLNS begin
    /@COLNS: (COLNS IMP) def
    /TEXAS /replaceme def
    /SRI2 /replaceme def
    /SAC /replaceme def
  end % COLNS

  /COLUM 20 dict def
  COLUM begin
    /@COLUM: (COLUM IMP) def
    /BBN82 /replaceme def
    /CMU /replaceme def
  end % COLUM

  /CSS 20 dict def
  CSS begin
    /@CSS: (CSS IMP) def
    /MTR2 /replaceme def
    /UDEL /replaceme def
    /ARPA /replaceme def
  end % CSS

  /DCEC 20 dict def
  DCEC begin
    /@DCEC: (DCEC IMP) def
    /ARPA /replaceme def
    /NSA2 /replaceme def
    /CMU /replaceme def
    /BRAGG /replaceme def
  end % DCEC

  /DEC 20 dict def
  DEC begin
    /@DEC: (DEC IMP) def
    /LINC /replaceme def
    /HARV /replaceme def
  end % DEC

  /HARV 20 dict def
  HARV begin
    /@HARV: (HARV IMP) def
    /BBN82 /replaceme def
    /DEC /replaceme def
  end % HARV

  /ISI22 20 dict def
  ISI22 begin
    /@ISI22: (ISI22 IMP) def
    /ISI27 /replaceme def
    /ISI52 /replaceme def
    /STAN /replaceme def
  end % ISI22

  /ISI27 20 dict def
  ISI27 begin
    /@ISI27: (ISI27 IMP) def
    /ISI52 /replaceme def
    /ISI22 /replaceme def
    /UCLA /replaceme def
  end % ISI27

  /ISI52 20 dict def
  ISI52 begin
    /@ISI52: (ISI52 IMP) def
    /ISI22 /replaceme def
    /ISI27 /replaceme def
    /RAND /replaceme def
  end % ISI52

  /LBL2 20 dict def
  LBL2 begin
    /@LBL2: (LBL2 IMP) def
    /UTAH /replaceme def
    /BERK /replaceme def
  end % LBL2

  /LINC 20 dict def
  LINC begin
    /@LINC: (LINC IMP) def
    /ARADC /replaceme def
    /MIT77 /replaceme def
    /DEC /replaceme def
    /MTR2 /replaceme def
  end % LINC

  /MIT44 20 dict def
  MIT44 begin
    /@MIT44: (MIT44 IMP) def
    /MIT6 /replaceme def
    /MIT77 /replaceme def
  end % MIT44

  /MIT6 20 dict def
  MIT6 begin
    /@MIT6: (MIT6 IMP) def
    /CCA /replaceme def
    /MIT44 /replaceme def
    /MIT77 /replaceme def
  end % MIT6

  /MIT77 20 dict def
  MIT77 begin
    /@MIT77: (MIT77 IMP) def
    /MIT44 /replaceme def
    /LINC /replaceme def
    /MIT6 /replaceme def
  end % MIT77

  /MTR2 20 dict def
  MTR2 begin
    /@MTR2: (MTR2 IMP) def
    /CSS /replaceme def
    /LINC /replaceme def
  end % MTR2

  /NSA2 20 dict def
  NSA2 begin
    /@NSA2: (NSA2 IMP) def
    /DCEC /replaceme def
  end % NSA2

  /PURDU 20 dict def
  PURDU begin
    /@PURDU: (PURDU IMP) def
    /CMU /replaceme def
  end % PURDU

  /RAND 20 dict def
  RAND begin
    /@RAND: (RAND IMP) def
    /ISI52 /replaceme def
    /USC /replaceme def
  end % RAND

  /RCC5 20 dict def
  RCC5 begin
    /@RCC5: (RCC5 IMP) def
    /UROCH /replaceme def
    /CCA /replaceme def
    /BBN82 /replaceme def
    /BBN63 /replaceme def
  end % RCC5

  /SAC 20 dict def
  SAC begin
    /@SAC: (SAC IMP) def
    /SAC2 /replaceme def
    /WISC /replaceme def
    /UTAH /replaceme def
    /COLNS /replaceme def
  end % SAC

  /SAC2 20 dict def
  SAC2 begin
    /@SAC2: (SAC2 IMP) def
    /SAC /replaceme def
  end % SAC2

  /SR107 20 dict def
  SR107 begin
    /@SR107: (SR107 IMP) def
    /SRI2 /replaceme def
    /SRI51 /replaceme def
    /SRI12 /replaceme def
  end % SR107

  /SRI12 20 dict def
  SRI12 begin
    /@SRI12: (SRI12 IMP) def
    /SR107 /replaceme def
  end % SRI12

  /SRI2 20 dict def
  SRI2 begin
    /@SRI2: (SRI2 IMP) def
    /XEROX /replaceme def
    /SRI51 /replaceme def
    /SR107 /replaceme def
    /COLNS /replaceme def
    /BERK /replaceme def
  end % SRI2

  /SRI51 20 dict def
  SRI51 begin
    /@SRI51: (SRI51 IMP) def
    /STAN /replaceme def
    /SR107 /replaceme def
    /SRI2 /replaceme def
  end % SRI51

  /STAN 20 dict def
  STAN begin
    /@STAN: (STAN IMP) def
    /ISI22 /replaceme def
    /SUMEX /replaceme def
    /SRI51 /replaceme def
  end % STAN

  /SUMEX 20 dict def
  SUMEX begin
    /@SUMEX: (SUMEX IMP) def
    /STAN /replaceme def
    /XEROX /replaceme def
  end % SUMEX

  /TEXAS 20 dict def
  TEXAS begin
    /@TEXAS: (TEXAS IMP) def
    /COLNS /replaceme def
    /BRAGG /replaceme def
    /UCLA /replaceme def
  end % TEXAS

  /UCLA 20 dict def
  UCLA begin
    /@UCLA: (UCLA IMP) def
    /CIT /replaceme def
    /TEXAS /replaceme def
    /XEROX /replaceme def
    /ISI27 /replaceme def
  end % UCLA

  /UDEL 20 dict def
  UDEL begin
    /@UDEL: (UDEL IMP) def
    /CSS /replaceme def
    /CCA /replaceme def
  end % UDEL

  /UROCH 20 dict def
  UROCH begin
    /@UROCH: (UROCH IMP) def
    /ARADC /replaceme def
    /WISC /replaceme def
    /RCC5 /replaceme def
  end % UROCH

  /US121 20 dict def
  US121 begin
    /@US121: (US121 IMP) def
    /USC /replaceme def
  end % US121

  /USC 20 dict def
  USC begin
    /@USC: (USC IMP) def
    /ARPA /replaceme def
    /RAND /replaceme def
    /CIT /replaceme def
    /US121 /replaceme def
  end % USC

  /UTAH 20 dict def
  UTAH begin
    /@UTAH: (UTAH IMP) def
    /LBL2 /replaceme def
    /SAC /replaceme def
    /WASH /replaceme def
  end % UTAH

  /WASH 20 dict def
  WASH begin
    /@WASH: (WASH IMP) def
    /BERK /replaceme def
    /UTAH /replaceme def
  end % WASH

  /WISC 20 dict def
  WISC begin
    /@WISC: (WISC IMP) def
    /SAC /replaceme def
    /UROCH /replaceme def
  end % WISC

  /XEROX 20 dict def
  XEROX begin
    /@XEROX: (XEROX IMP) def
    /SUMEX /replaceme def
    /SRI2 /replaceme def
    /BERK /replaceme def
    /UCLA /replaceme def
  end % XEROX

end % ArpaMap

ArpaMap {
  begin pop
  currentdict {
    /replaceme eq {
      ArpaMap 1 index get def
    } { pop } ifelse
  } forall
  end
} forall

ArpaMap