## Names of sources
BEGIN{ 
  t["13ch3oh"] = 11;
  t["ch2doh"] = 2;
  t["ch3oh"] = 26;
  # 11 13ch3oh
  #  2 ch2doh
  # 26 ch3oh

  S["I00117-MM2"]="00117B"
  S["AFGL5142-EC"]="AFGLA_HMSC"
  S["05358-mm3"]="05358A_HMSC"
  S["G034-G2"]="G034C_HMSC"
  S["G034-F2"]="G034B_HMSC"
  S["G034-F1"]="G034A_HMSC"
  S["G028-C1"]="G028A_HMSC"
  S["G028-C3"]="G028B_HMSC"
  S["I20293-WC"]="20293A_HMSC"
  S["I22134-G"]="22134A_HMSC"
  S["I22134-B"]="22134B_HMSC"
  S["I00117-MM1"]="00117A"
  S["I04579-VLA1"]="04579_UCHII"
  S["AFGL5142-MM"]="AFGLB_HMPO"
  S["05358-mm1"]="05358B_HMPO"
  S["18089-1732"]="18089_HCHII"
  S["18517+0437"]="18517_HMPO"
  S["G75-core"]="G75_HCHII"
  S["G75-HCHII"]="G75_HCHII"
  S["I20293-MM1"]="20293B_HMPO"
  S["I21307"]="21307_HMPO"
  S["I23385"]="23385_HMPO"
  S["G5.89-0.39"]="17574_UCHII"
  S["I19035-VLA1"]="19035_UCHII"
  S["19410+2336"]="19410_UCHII"
  S["ON1"]="20081_UCHII"
  S["I22134-VLA1"]="22134_UCHII"
  S["23033+5951"]="23033_UCHII"
  S["23033-UCHII"]="23033_UCHII"
  S["NGC7538-IRS9"]="NGC7538_UC"
  # Images
  f["13ch3oh_05358a_hmsc"]="bzplot_13ch3oh_05358a_HMSC.eps"
  f["13ch3oh_17574_uchii"]="bzplot_13ch3oh_17574_UCHII.eps"
  f["13ch3oh_18089_hchii"]="bzplot_13ch3oh_18089_HCHII.eps"
  f["13ch3oh_18517_hmpo"]="bzplot_13ch3oh_18517_HMPO.eps"
  f["13ch3oh_19035_uchii"]="bzplot_13ch3oh_19035_UCHII.eps"
  f["13ch3oh_19410_uchii"]="bzplot_13ch3oh_19410_UCHII.eps"
  f["13ch3oh_20081_uchii"]="bzplot_13ch3oh_20081_UCHII.eps"
  f["13ch3oh_23033_uchii"]="bzplot_13ch3oh_23033_UCHII.eps"
  f["13ch3oh_afgla_hmsc"]="bzplot_13ch3oh_AFGLa_HMSC.eps"
  f["13ch3oh_afglb_hmpo"]="bzplot_13ch3oh_AFGLb_HMPO.eps"
  f["13ch3oh_g028a_hmsc"]="bzplot_13ch3oh_G028a_HMSC.eps"
  f["ch2doh_18089_hchii"]="bzplot_ch2doh_18089_HCHII.eps"
  f["ch2doh_afglb_hmpo"]="bzplot_ch2doh_AFGLb_HMPO.eps"
  f["ch3oh_00117a"]="bzplot_ch3oh_00117a.eps"
  f["ch3oh_00117b"]="bzplot_ch3oh_00117b.eps"
  f["ch3oh_05358a_hmsc"]="bzplot_ch3oh_05358a_HMSC.eps"
  f["ch3oh_05358b_hmpo"]="bzplot_ch3oh_05358b_HMPO.eps"
  f["ch3oh_18089_hchii"]="bzplot_ch3oh_18089_HCHII.eps"
  f["ch3oh_18517_hmpo"]="bzplot_ch3oh_18517_HMPO.eps"
  f["ch3oh_19035_uchii"]="bzplot_ch3oh_19035_UCHII.eps"
  f["ch3oh_19410_uchii"]="bzplot_ch3oh_19410_UCHII.eps"
  f["ch3oh_20081_uchii"]="bzplot_ch3oh_20081_UCHII.eps"
  f["ch3oh_20293a_hmsc"]="bzplot_ch3oh_20293a_HMSC.eps"
  f["ch3oh_20293b_hmpo"]="bzplot_ch3oh_20293b_HMPO.eps"
  f["ch3oh_21307_hmpo"]="bzplot_ch3oh_21307_HMPO.eps"
  f["ch3oh_22134_uchii"]="bzplot_ch3oh_22134_UCHII.eps"
  f["ch3oh_22134a_hmsc"]="bzplot_ch3oh_22134a_HMSC.eps"
  f["ch3oh_22134b_hmsc"]="bzplot_ch3oh_22134b_HMSC.eps"
  f["ch3oh_23033_uchii"]="bzplot_ch3oh_23033_UCHII.eps"
  f["ch3oh_23385_hmpo"]="bzplot_ch3oh_23385_HMPO.eps"
  f["ch3oh_afgla_hmsc"]="bzplot_ch3oh_AFGLa_HMSC.eps"
  f["ch3oh_afglb_hmpo"]="bzplot_ch3oh_AFGLb_HMPO.eps"
  f["ch3oh_g028a_hmsc"]="bzplot_ch3oh_G028a_HMSC.eps"
  f["ch3oh_g034a_hmsc"]="bzplot_ch3oh_G034a_HMSC.eps"
  f["ch3oh_g034b_hmsc"]="bzplot_ch3oh_G034b_HMSC.eps"
  f["ch3oh_g034c_hmsc"]="bzplot_ch3oh_G034c_HMSC.eps"
  f["ch3oh_g75_hchii"]="bzplot_ch3oh_G75_HCHII.eps"
  f["ch3oh_ngc7538_uc"]="bzplot_ch3oh_NGC7538_UC.eps"
  #f["ich3oh_18089_hchii"]="bzplot_ich3oh_18089_HCHII.eps"
  f["ch3oh_18089_hchii"]="bzplot_ch3oh_18089_HCHII.eps"
}
{
  name = substr($0,9,13); sub(/  *$/, "", name)
  split(substr($0,33,30),a); tran=tolower(a[1]); gsub(/[_^]/, "", tran);
  #print "# tran=" tran
  file = ""
  if (tran in t) { 
    src = S[name]
    #if (substr(src,1,1) == "I") src = substr(src, 2);
    i = tran "_" tolower(src);
    if (i in f) file = f[i];
    else file = "no " i
  }
  printf "%-112s%-11s %s\n", $0, S[name], file
}