#! /usr/bin/gawk -f

# Converts the ISO Latin-1 characters above \177 to their TeX equivalents.
# Converts mostly the accented letters for now. Must complete it sometime...

// {
  gsub(/\241/,  "{!`}");
  gsub(/\247/,  "{\\S}");
  gsub(/\251/,  "{\\copyright}");
  gsub(/\261/,  "{$\\pm$}");
  gsub(/\265/,  "{$\\mu$}");
  gsub(/\266/,  "{\\P}");
  gsub(/\277/,  "{?`}");
  gsub(/\300/,  "{\\`A}");           
  gsub(/\301/,  "{\\'A}");           
  gsub(/\302/,  "{\\^A}");           
  gsub(/\303/,  "{\\~A}");           
  gsub(/\304/,  "{\\\"A}");           
  gsub(/\305/,  "{\\AA}");
  gsub(/\306/,  "{\\AE}");
  gsub(/\307/,  "{\\c{C}}");
  gsub(/\310/,  "{\\`E}");           
  gsub(/\311/,  "{\\'E}");           
  gsub(/\312/,  "{\\^E}");           
  gsub(/\313/,  "{\\\"E}");           
  gsub(/\314/,  "{\\`I}");           
  gsub(/\315/,  "{\\'I}");           
  gsub(/\316/,  "{\\^I}");           
  gsub(/\317/,  "{\\\"I}");           
  gsub(/\321/,  "{\\~N}");           
  gsub(/\322/,  "{\\`O}");           
  gsub(/\323/,  "{\\'O}");           
  gsub(/\324/,  "{\\^O}");           
  gsub(/\325/,  "{\\~O}");           
  gsub(/\326/,  "{\\\"O}");           
  gsub(/\327/,  "{$\\times$}");
  gsub(/\330/,  "{\\O}");
  gsub(/\331/,  "{\\`U}");           
  gsub(/\332/,  "{\\'U}");           
  gsub(/\333/,  "{\\^U}");           
  gsub(/\334/,  "{\\\"U}");           
  gsub(/\335/,  "{\\'Y}");
  gsub(/\337/,  "{\\ss}");
  gsub(/\340/,  "{\\`a}");           
  gsub(/\341/,  "{\\'a}");           
  gsub(/\342/,  "{\\^a}");           
  gsub(/\343/,  "{\\~a}");           
  gsub(/\344/,  "{\\\"a}");           
  gsub(/\345/,  "{\\aa}");
  gsub(/\346/,  "{\\ae}");
  gsub(/\347/,  "{\\c{c}}");
  gsub(/\350/,  "{\\`e}");           
  gsub(/\351/,  "{\\'e}");           
  gsub(/\352/,  "{\\^e}");           
  gsub(/\353/,  "{\\\"e}");           
  gsub(/\354/,  "{\\`\\i}");           
  gsub(/\355/,  "{\\'\\i}");           
  gsub(/\356/,  "{\\^\\i}");           
  gsub(/\357/,  "{\\\"\\i}");           
  gsub(/\361/,  "{\\~n}");           
  gsub(/\362/,  "{\\`o}");           
  gsub(/\363/,  "{\\'o}");           
  gsub(/\364/,  "{\\^o}");           
  gsub(/\365/,  "{\\~o}");           
  gsub(/\366/,  "{\\\"o}");           
  gsub(/\367/,  "{$\\div$}");
  gsub(/\370/,  "{\\o}");
  gsub(/\371/,  "{\\`u}");           
  gsub(/\372/,  "{\\'u}");           
  gsub(/\373/,  "{\\^u}");           
  gsub(/\374/,  "{\\\"u}"); 
  gsub(/\375/,  "{\\'y}");           
  gsub(/\377/,  "{\\\"y}");
  print;
}