sub InThaiCons {
    return <<END;
+Thai::InThaiHcons
+Thai::InThaiMCons
+Thai::InThaiLCons
END
}