home *** CD-ROM | disk | FTP | other *** search
/ Mega Top 1 / os2_top1.zip / os2_top1 / APPS / TEKST / GRECODE / LTEXLAT1.L < prev    next >
Text File  |  1993-12-10  |  5KB  |  135 lines
  1. /* Conversion of files between different charsets and usages.
  2.    Copyright (C) 1990, 1993 Free Software Foundation, Inc.
  3.    Francois Pinard <pinard@iro.umontreal.ca>, 1988.
  4.  
  5.    This program is free software; you can redistribute it and/or modify
  6.    it under the terms of the GNU General Public License as published by
  7.    the Free Software Foundation; either version 2, or (at your option)
  8.    any later version.
  9.  
  10.    This program is distributed in the hope that it will be useful, but
  11.    WITHOUT ANY WARRANTY; without even the implied warranty of
  12.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13.    General Public License for more details.
  14.  
  15.    You should have received a copy of the GNU General Public License
  16.    along with this program; if not, write to the Free Software
  17.    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18. */
  19.  
  20. /* Step name: latex_latin1.  */
  21.  
  22. After            [ \t]*(\{\})?
  23.  
  24. %%
  25.  
  26. "\\#"            { if (diacritics_only) ECHO; else output ('#'); }
  27. "\\$"            { if (diacritics_only) ECHO; else output ('$'); }
  28. "\\%"            { if (diacritics_only) ECHO; else output ('%'); }
  29. "\\&"            { if (diacritics_only) ECHO; else output ('&'); }
  30. "\\_"            { if (diacritics_only) ECHO; else output ('_'); }
  31. "\\{"            { if (diacritics_only) ECHO; else output ('{'); }
  32. "\\}"            { if (diacritics_only) ECHO; else output ('}'); }
  33.  
  34. "\\backslash"{After}    { if (diacritics_only) ECHO; else output ('\\'); }
  35. "\\ "            { if (diacritics_only) ECHO; else output (160); }
  36. "!'"            { if (diacritics_only) ECHO; else output (161); }
  37.  
  38. "\\S"{After}        { if (diacritics_only) ECHO; else output (167); }
  39. "\\\""{After}        { if (diacritics_only) ECHO; else output (168); }
  40.  
  41. "``"            { if (diacritics_only) ECHO; else output (171); }
  42. "\\neg"{After}        { if (diacritics_only) ECHO; else output (172); }
  43. "\\-"            { if (diacritics_only) ECHO; else output (173); }
  44.  
  45. "\\mbox{$^\\circ$}"    { if (diacritics_only) ECHO; else output (176); }
  46. "\\mbox{$\\pm$}"    { if (diacritics_only) ECHO; else output (177); }
  47. "\\mbox{$^2$}"        { if (diacritics_only) ECHO; else output (178); }
  48. "\\mbox{$^3$}"        { if (diacritics_only) ECHO; else output (179); }
  49. "\\'"{After}        { if (diacritics_only) ECHO; else output (180); }
  50. "\\mbox{$\\mu$}"    { if (diacritics_only) ECHO; else output (181); }
  51.  
  52. "\\cdotp"        { if (diacritics_only) ECHO; else output (183); }
  53. "\\,"{After}        { if (diacritics_only) ECHO; else output (184); }
  54. "\\mbox{$^1$}"        { if (diacritics_only) ECHO; else output (185); }
  55.  
  56. "''"            { if (diacritics_only) ECHO; else output (187); }
  57. "\\frac1/4"{After}    { if (diacritics_only) ECHO; else output (188); }
  58. "\\frac1/2"{After}    { if (diacritics_only) ECHO; else output (189); }
  59. "\\frac3/4"{After}    { if (diacritics_only) ECHO; else output (190); }
  60. "?'"            { if (diacritics_only) ECHO; else output (191); }
  61.  
  62. "\\`A"|"\\`{A}"        { output (192); }
  63. "\\'A"|"\\'{A}"        { output (193); }
  64. "\\^A"|"\\^{A}"        { output (194); }
  65. "\\~A"|"\\~{A}"        { output (195); }
  66. "\\\"A"|"\\\"{A}"    { output (196); }
  67. "\\AA"{After}        { output (197); }
  68. "\\AE"{After}        { output (198); }
  69. "\\c +C"|"\\c{C}"    { output (199); }
  70. "\\`E"|"\\`{E}"        { output (200); }
  71. "\\'E"|"\\'{E}"        { output (201); }
  72. "\\^E"|"\\^{E}"        { output (202); }
  73. "\\\"E"|"\\\"{E}"    { output (203); }
  74. "\\`I"|"\\`{I}"        { output (204); }
  75. "\\'I"|"\\'{I}"        { output (205); }
  76. "\\^I"|"\\^{I}"        { output (206); }
  77. "\\\"I"|"\\\"{I}"    { output (207); }
  78.  
  79. "\\~N"|"\\~{N}"        { output (209); }
  80. "\\`O"|"\\`{O}"        { output (210); }
  81. "\\'O"|"\\'{O}"        { output (211); }
  82. "\\^O"|"\\^{O}"        { output (212); }
  83. "\\~O"|"\\~{O}"        { output (213); }
  84. "\\\"O"|"\\\"{O}"    { output (214); }
  85.  
  86. "\\O"{After}        { output (216); }
  87. "\\`U"|"\\`{U}"        { output (217); }
  88. "\\'U"|"\\'{U}"        { output (218); }
  89. "\\^U"|"\\^{U}"        { output (219); }
  90. "\\\"U"|"\\\"{U}"    { output (220); }
  91. "\\'Y"|"\\'{Y}"        { output (221); }
  92.  
  93. "\\ss"{After}        { output (223); }
  94. "\\`a"|"\\`{a}"        { output (224); }
  95. "\\'a"|"\\'{a}"        { output (225); }
  96. "\\^a"|"\\^{a}"        { output (226); }
  97. "\\~a"|"\\~{a}"        { output (227); }
  98. "\\\"a"|"\\\"{a}"    { output (228); }
  99. "\\aa"{After}        { output (229); }
  100. "\\ae"{After}        { output (230); }
  101. "\\c c"|"\\c{c}"    { output (231); }
  102. "\\`e"|"\\`{e}"        { output (232); }
  103. "\\'e"|"\\'{e}"        { output (233); }
  104. "\\^e"|"\\^{e}"        { output (234); }
  105. "\\\"e"|"\\\"{e}"    { output (235); }
  106. "\\`\\i"{After}|"\\`{\\i}"    { output (236); }
  107. "\\'\\i"{After}|"\\'{\\i}"    { output (237); }
  108. "\\^\\i"{After}|"\\^{\\i}"    { output (238); }
  109. "\\\"\\i"{After}|"\\\"{\\i}"    { output (239); }
  110.  
  111. "\\~n"|"\\~{n}"        { output (241); }
  112. "\\`o"|"\\`{o}"        { output (242); }
  113. "\\'o"|"\\'{o}"        { output (243); }
  114. "\\^o"|"\\^{o}"        { output (244); }
  115. "\\~o"|"\\~{o}"        { output (245); }
  116. "\\\"o"|"\\\"{o}"    { output (246); }
  117.  
  118. "\\o"{After}        { output (248); }
  119. "\\`u"|"\\`{u}"        { output (249); }
  120. "\\'u"|"\\'{u}"        { output (250); }
  121. "\\^u"|"\\^{u}"        { output (251); }
  122. "\\\"u"|"\\\"{u}"    { output (252); }
  123. "\\'y"|"\\'{y}"        { output (253); }
  124.  
  125. "\\\"y"|"\\\"{y}"    { output (255); }
  126.  
  127. %%
  128.  
  129. void
  130. module_latex_latin1 (void)
  131. {
  132.   declare_alias ("ltex", "latex");
  133.   declare_step ("latex", "latin1", MANY_TO_ONE, NULL, file_latex_latin1);
  134. }
  135.