1# © 2016 and later: Unicode, Inc. and others. 2# License & terms of use: http://www.unicode.org/copyright.html#License 3# 4# File: Thai_ThaiLogical.txt 5# Generated from CLDR 6# 7 8# This reverses the Thai LogicalOrderException vowels, and does (part of) spaces 9# The rules that convert space into semicolon are in another file; 10# since they have to come BEFORE the break iterator 11$thai = [[:thai:] ก-\u0E3Aเ-๛] ; 12# First convert the semicolon back 13' ' ← $thai { '; ' } $thai; 14# Remove any other spaces between thai letters 15← $thai { ' ' } $thai; 16# Now vowels 17$thai_reversing = [[:Logical_Order_Exception:] & $thai]; 18$thai_non_reversing = [$thai - $thai_reversing ]; 19( $thai_reversing ) ( $thai_non_reversing ) → $2 $1; 20# other direction 21$2 $1 ← ( $thai_non_reversing ) ( $thai_reversing ) ; 22 23