;;; -*- Coding: utf-8 -*-

;;; Authors:
;;; 2007 Nicolai Kilian

;;; Copyright: DFKI GmbH

punct_period_orule :=
%suffix (!. !..) 
punctuation_period_rule.

init_punct_excl_orule :=
%suffix (!o !o\!)
init_punctuation_excl_rule.

recurs_punct_excl_orule :=
%suffix (!x !x\!)
recursive_punctuation_excl_rule.

init_punct_qmark_orule :=
%suffix (!o !o\?)
init_punctuation_qmark_rule.

recurs_punct_qmark_orule :=
%suffix (!x !x\?)
recursive_punctuation_qmark_rule.

punct_comma_orule :=
%suffix (!, !,,) (_colon_ :) (_colon2_ _colon_,)
punctuation_comma_rule.

punct_rparen_comma_orule :=
%suffix (- -,)
punctuation_rparen_comma_rule.

punct_right_hyphen_no-s_orule :=
%suffix (!, !,-)
punct_right_hyphen_rule.

punct_right_hyphen_s_orule :=
%suffix (!y !ys-)
punct_right_hyphen_rule.

punct_left_hyphen_orule :=
%prefix (!, -!,)
punct_left_hyphen_rule.

punct_semicol_orule :=
%suffix (!, !,\;)
punctuation_semicol_rule.

punct_lparen_orule :=
%prefix (!f (!f)
punctuation_lparen_rule.

punct_rparen_orule :=
%suffix (!b !b\))
punctuation_rparen_rule.

word_dot_to_period_punct_orule :=  
%suffix (. .) (_generic_ord_ _generic_ord_.) (… …)
word_dot_to_period_punct_rule.

cnt-n-bare-inf-ext-lrule := count-noun-bare-inf-to-extended-inf-lrule.



;[ ARGS < [ MORPH <! [ HEAD.INFL.UNIAGR.PNG 3-p-g ] !> ] > ].