.#! 1°+ _debug_info& / ISO_Latin_Chars+ý* áéíóúÁÉÍÓÚ* àèìòùÀÈÌÒÙ* âêîôûÂÊÎÔÛ* äëïöüÄËÏÖÜ( ¡¿çÇñÑæÆ% øØåÅßþ & strcat°/ ISO_Latin_Chars& - ISO_TeX_Chars+ýV \\'a,\\'e,\\'{\\i},\\'o,\\'u,\\'A,\\'E,\\'I,\\'O,\\'U, V \\`a,\\`e,\\`{\\i},\\`o,\\`u,\\`A,\\`E,\\`I,\\`O,\\`U,V \\^a,\\^e,\\^{\\i},\\^o,\\^u,\\^A,\\^E,\\^I,\\^O,\\^U,V \\"a,\\"e,\\"{\\i},\\"o,\\"u,\\"A,\\"E,\\"I,\\"O,\\"U,L !`,?`,\\c{c},\\c{C},\\~n,\\~N,{\\ae},{\\AE},@ {\\o},{\\O},{\\aa},{\\AA},{\\ss}þ & strcat°- ISO_TeX_Chars,* ! i ' str_old ' str_new+* 0 save_case_search+ + CASE_SEARCH°0 save_case_search! 1°+ CASE_SEARCH ) push_spot # bob! 0ý / ISO_Latin_Charsþ & strlen! 1:! 1.°! iý - ISO_TeX_Chars ! i" 44þ / extract_element°' str_newýý ! i / ISO_Latin_Chars!þ $ char°' str_oldý ' str_old ' str_newþ ' replace/h ( pop_spot 0 save_case_search°+ CASE_SEARCHy' iso2tex,* ! i ' str_old ' str_new+* 0 save_case_search+ + CASE_SEARCH°0 save_case_search! 1°+ CASE_SEARCH ) push_spot! 0ý / ISO_Latin_Charsþ & strlen! 1:! 1.°! iý - ISO_TeX_Chars ! i" 44þ / extract_element°' str_oldýý ! i / ISO_Latin_Chars!þ $ char°' str_new # bobý ' str_old ' str_newþ ' replace/h ( pop_spot 0 save_case_search°+ CASE_SEARCHy' tex2iso