*** empty log message ***
[m17n/m17n-db.git] / FLT / THAI-TIS620.flt
index 37ee3b6..3744368 100644 (file)
@@ -1,34 +1,15 @@
 ;; THAI-TIS620.flt -- Font Layout Table for Thai (TIS620 font)
-;; Copyright (C) 2003, 2004, 2007
-;;   National Institute of Advanced Industrial Science and Technology (AIST)
-;;   Registration Number H15PRO112
+;; Copyright (C) 2003, 2004, 2007  AIST (H15PRO112)
+;; See the end for copying conditions.
 
-;; This file is part of the m17n database; a sub-part of the m17n
-;; library.
-
-;; The m17n library is free software; you can redistribute it and/or
-;; modify it under the terms of the GNU Lesser General Public License
-;; as published by the Free Software Foundation; either version 2.1 of
-;; the License, or (at your option) any later version.
-
-;; The m17n library is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-;; Lesser General Public License for more details.
-
-;; You should have received a copy of the GNU Lesser General Public
-;; License along with the m17n library; if not, write to the Free
-;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
-;; Boston, MA 02110-1301, USA.
+(font layouter thai-tis620 nil
+      (font (tis620.2529-1)
+           (tis620.2533-0)))
 
 ;;; <li> THAI-TIS620.flt
 ;;;
 ;;; For fixed width fonts of TIS620 encoding to draw Thai script.
 
-(font layouter thai-tis620 nil
-      (font (tis620.2529-1)
-           (tis620.2533-0)))
-
 (category
  ;; C: CONSONANT
  ;; V: VOWEL UPPER
  (0
   (cond
    ("C([vV])?T?"
-    independent dependent * )
+    = dependent * )
    ("[^C]*"
-    independent *))
+    = *))
   *)
 
- (independent
-  ((range 0x0E00 0x0E5F) 0xA0))
-
  (dependent
   (cond
-   ((0x0E31)   tc+bc 0xD1)
-   ((0x0E34)   tc+bc 0xD4)
-   ((0x0E35)   tc+bc 0xD5)
-   ((0x0E36)   tc+bc 0xD6)
-   ((0x0E37)   tc+bc 0xD7)
-   ((0x0E38)   bc-tc 0xD8)
-   ((0x0E39)   bc-tc 0xD9)
-   ((0x0E3A)   bc-tc 0xDA)
-   ((0x0E47)   tc+bc 0xE7)
-   ((0x0E48)   tc+bc 0xE8)
-   ((0x0E49)   tc+bc 0xE9)
-   ((0x0E4A)   tc+bc 0xEA)
-   ((0x0E4B)   tc+bc 0xEB)
-   ((0x0E4C)   tc+bc 0xEC)
-   ((0x0E4D)   tc+bc 0xED)
-   ((0x0E4E)   tc+bc 0xEE))))
+   ((0x0E31)   tc+bc =)
+   ((0x0E34)   tc+bc =)
+   ((0x0E35)   tc+bc =)
+   ((0x0E36)   tc+bc =)
+   ((0x0E37)   tc+bc =)
+   ((0x0E38)   bc-tc =)
+   ((0x0E39)   bc-tc =)
+   ((0x0E3A)   bc-tc =)
+   ((0x0E47)   tc+bc =)
+   ((0x0E48)   tc+bc =)
+   ((0x0E49)   tc+bc =)
+   ((0x0E4A)   tc+bc =)
+   ((0x0E4B)   tc+bc =)
+   ((0x0E4C)   tc+bc =)
+   ((0x0E4D)   tc+bc =)
+   ((0x0E4E)   tc+bc =))))
+
+;; Copyright (C) 2003, 2004, 2007
+;;   National Institute of Advanced Industrial Science and Technology (AIST)
+;;   Registration Number H15PRO112
+
+;; This file is part of the m17n database; a sub-part of the m17n
+;; library.
+
+;; The m17n library is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU Lesser General Public License
+;; as published by the Free Software Foundation; either version 2.1 of
+;; the License, or (at your option) any later version.
+
+;; The m17n library is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; Lesser General Public License for more details.
+
+;; You should have received a copy of the GNU Lesser General Public
+;; License along with the m17n library; if not, write to the Free
+;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
 
 ;; Local Variables:
 ;; mode: lisp