;;; -*- Mode: TDL; Coding: utf-8 -*- ;;; Authors: ;;; 2005-2006 Berthold Crysmann ;;; 2007 Nicolai Kilian ;;; Copyright: DFKI GmbH ; File for spell-changing lexical rules, i.e., instances ; of (subtypes of) infl-ltol-rule and infl-ltow-rule. ; Every rule in this file should have a %suffix line. Those ; that don't belong in lrules.tdl. ; This is a generic file containing letter class definitions only. ; Digits %(letter-set (!0 0123456789)) ; Vowels %(letter-set (!v aeiouäöüéà)) %(letter-set (!u aou)) %(letter-set (!i aouiäöüéà)) ; Consonants & non-e vowels %(letter-set (!h bcdfghjklmnpqrstvwxzßaouiäöüéà)) ; Consonants %(letter-set (!c bcdfghjklmnpqrstvwxzß)) ; Consonants w/o n,m,r,l,h ("Dehnungs-h") %(letter-set (!l bcdfgjkpqstvwxzß)) ; Consonants w/o t,d,s,z,x,m,n %(letter-set (!t bcfghjklpqrvw)) ; Consonants w/o t,d,m,n %(letter-set (!e bcfghjklpqrsvwxzß)) ; w/o .,!?;: %(letter-set (!. abcdefghijklmnopqrstuvwxyzßäöüéà0123456789_]+\)"')) ; w/o .,!?;:) %(letter-set (!b abcdefghijklmnopqrstuvwxyzßäöüéà0123456789_]+"')) ; w/o ,!?;: %(letter-set (!, abcdefghijklmnopqrstuvwxyzßäöüéà0123456789._–]+"')) ;Alphanum %(letter-set (!a abcdefghijklmnopqrstuvwxyzßäöüéà0123456789_+)) ;-) %(letter-set (!g \)-–)) ; Alphanum + . + '")] %(letter-set (!o abcdefghijklmnopqrstuvwxyzßäöüéà0123456789_]\)"'.)) ; Alphanum + .,!? + '")] %(letter-set (!p abcdefghijklmnopqrstuvwxyzßäöüéà0123456789,.?!]\)+"')) ; Alphanum + .,!? + ] %(letter-set (!q abcdefghijklmnopqrstuvwxyzßäöüéà0123456789_,.?!]+)) %(letter-set (!f abcdefghijklmnopqrstuvwxyzßäöüé0123456789"'\()) ; !? %(letter-set (!x ?!)) ; Alphanum + ["'#= %(letter-set (!j abcdefghijklmnopqrstuvwxyzßäöüéà0123456789_["'#=+)) %(letter-set (!d dt)) %(letter-set (!m nm)) %(letter-set (!s szxß)) ;Consonants w/o szxß %(letter-set (!y bcdfghjklmnpqrtvw)) %(letter-set (!r lr)) %(letter-set (!z bcdfghjklmnpqrtvw)) do_no_apply_infl_rule := %suffix (_do_not_apply_this_rule_ _do_not_apply_this_rule_) spell-lrule & [NEEDS-AFFIX +].