function myreplace ( s )
s = unicode.utf8.gsub ( s, "E", "Ẹ" )
s = unicode.utf8.gsub ( s, "e", "ẹ" )
s = unicode.utf8.gsub ( s , "(\\[ẹẸ%a]+)" ,
function ( x )
x = unicode.utf8.gsub ( x , "ẹ" , "e" )
x = unicode.utf8.gsub ( x , "Ẹ" , "E" )
return ( x )
end )
tex.sprint ( s )
end