;;; Hey, emacs (1), this is -*- mode:tdl; Coding: utf-8; -*-
;;; 
;;;  Montserrat Marimon
;;;  IULA - UPF
;;;
;;;  srules.tdl: structure rules for the SRG
 

hdpunct := head-punct-rule & 
  [ RULE-NAME "hdpunct" ].

puncthd := punct-head-rule & 
  [ RULE-NAME "puncthd" ].


subjhd := subj-head-decl-rule & 
  [ RULE-NAME "subjhd" ].

hdsubj := head-subj-decl-rule & 
  [ RULE-NAME "hdsubj" ].

hdsubj_coord := head-coord_subj-decl-rule & 
  [ RULE-NAME "hdsubj" ].

hdsubj_relc := head-subj-rel-rule & 
  [ RULE-NAME "hdsubj" ].

hdsubj_cpa := head-subj-cpa-rule & 
  [ RULE-NAME "hdsubj" ].

hdsubj_vpinf := head-subj-vp-inf-rule & 
  [ RULE-NAME "hdsubj" ].

optsubj := opt-subj-decl-rule &
  [ RULE-NAME "optsubj" ].


comphd := comp-head-rule &
  [ RULE-NAME "comphd" ].

hdcomp := head-comp-rule &
  [ RULE-NAME "hdcomp" ].

hdcomp_vcomp := nv_head-v_comp-rule &
  [ RULE-NAME "hdcomp" ].

hdcomp_vhdvcomp := v_head-v_comp-rule &
  [ RULE-NAME "hdcomp" ].

hdcomp_vhdvcompslash := v_head-v_comp_slash-rule &
  [ RULE-NAME "hdcomp" ].

hdcomp_vauxhdvcomp := vaux_head-v_comp-rule &
  [ RULE-NAME "hdcomp" ].

optcomp_a := adj-opt-comp-rule &
  [ RULE-NAME "optcomp" ].

optcomp_n := nom-opt-comp-rule &
  [ RULE-NAME "optcomp" ].

optcomp_v := verb-opt-comp-rule &
  [ RULE-NAME "optcomp" ].


hdmark := head-mark-rule &
  [ RULE-NAME "hdmark" ].


hdspec := head-spec-rule &
  [ RULE-NAME "hdspec" ].

spechd := spec-head-rule &
  [ RULE-NAME "spechd" ].

spechd_relhd := spec-head-rule_relhd &
  [ RULE-NAME "spechd" ].

spechd_dethd := spec-head-rule_dethd &
  [ RULE-NAME "spechd" ].

spechd_relspec := spec-head-rule_relspec &
  [ RULE-NAME "spechd" ].

spechd_degspec:= spec-head-rule_degspec &
  [ RULE-NAME "spechd" ].

optspec := opt-spec-rule &
  [ RULE-NAME "optspec" ].


bare_np := bare-np-rule &
  [ RULE-NAME "bare_np" ].

bare_np_coord := bare-np-rule_coord &
  [ RULE-NAME "bare_np" ].

bare_np_rel := bare-np-rule_rel &
  [ RULE-NAME "bare_np" ].

adjpart := adj-part-rule &
  [ RULE-NAME "adjpart" ].

adjhd-s := adj-head-s-rule &
  [ RULE-NAME "adjhd-s" ].

adjhd-i := adj-nonverb_head-i-rule &
  [ RULE-NAME "adjhd-i" ].

adjhd-i_ppadj := pp_adj-v_head-i-rule &
  [ RULE-NAME "adjhd-i" ].

adjhd-i_advadj := adv_adj-v_head-i-rule &
  [ RULE-NAME "adjhd-i" ].

adjhd-i_modnpadj := modnp_adj-v_head-i-rule &
  [ RULE-NAME "adjhd-i" ].

adjhd-i_tempnpadj := tmpnp_adj-v_head-i-rule &
  [ RULE-NAME "adjhd-i" ].

adjhd-i_freereladj := freerel_adj-v_head-i-rule &
  [ RULE-NAME "adjhd-i" ].

adjhd-i_freerelppadj := freerelpp_adj-v_head-i-rule &
  [ RULE-NAME "adjhd-i" ].

hdadj-s_verbadj := hd-vp_adj-s-rule &
  [ RULE-NAME "hadj-s" ].

hdadj-s_ppadj := hd-pp_adj-s-rule &
  [ RULE-NAME "hadj-s" ].

hdadj-s_advadj := hd-adv_adj-s-rule &
  [ RULE-NAME "hadj-s" ].

hdadj-s_apadj := hd-ap_adj-s-rule &
  [ RULE-NAME "hadj-s" ].

hdadj-i_adjhd := adj_hd-adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_pphd := pp_hd-adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_advhd := adv_hd-adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

;hdadj-i_vphd-vpadj := v_hd-v_adj-i-rule &
;  [ RULE-NAME "hdadj-i" ].

hdadj-i_vphd-ppadj := v_hd-pp_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_vphd-advadj := v_hd-adv_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_vphd-modnpadj := v_hd-modnp_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_vphd-tempnpadj := v_hd-tmpnp_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_vphd-freereladj := v_hd-freerel_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

#|
hdadj-i_nchd-vpassadj := ncommon_hd-ppart_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nphd-vpassadj := nproper_hd-ppart_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nchd-apadj := ncommon_hd-ap_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nphd-apadj := nproper_hd-ap_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nhd-advadj := n_hd-adv_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nchd-ppadj := ncommon_hd-pp_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nphd-ppadj := nproper_hd-pp_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nchd-nadj := ncommon_hd-n_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nphd-nadj := nproper_hd-n_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].
|#

hdadj-i_nchd := ncommon_hd-adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nphd := nproper_hd-adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nchd-rcadj := ncommon_hd-rc_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nphd-rcadj := nproper_hd-rc_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nchd-rcppadj := ncommon_hd-rcpp_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nphd-rcppadj := nproper_hd-rcpp_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].

hdadj-i_nhd-nonrestrictrcadj := n_hd-nonrestrictrc_adj-i-rule &
  [ RULE-NAME "hdadj-i" ].


appos := appos-np-rule &
  [ RULE-NAME "appos" ].

pn_appos := pn_appos-np-rule &
  [ RULE-NAME "appos" ].


cpa := cpa-rule &
  [ RULE-NAME "cpa" ].


advnp := np_adv-mod-rule &
  [ RULE-NAME "npadv" ].


extsubj := ext-vfin-subj-rule & 
  [ RULE-NAME "extsubj" ].

extcomp_a := ext-adj-comp-rule & 
  [ RULE-NAME "extcomp" ].

extcomp_v := ext-verb-comp-rule & 
  [ RULE-NAME "extcomp" ].

extadj_v := ext-verb-adj-rule & 
  [ RULE-NAME "extadj" ].

extcomp_n := undef-ext-noun-comp-rule & 
  [ RULE-NAME "extcomp" ].

extcomp_n_def := def-ext-noun-comp-rule & 
  [ RULE-NAME "extcomp" ].

extadj_n := ext-noun-adj-rule & 
  [ RULE-NAME "extadj" ].


fillhd_npfill := n_head-np_filler-rel-rule-fin &
  [ RULE-NAME "fillhd" ].

fillhd_inf_npfill := n_head-np_filler-rel-rule-inf &
  [ RULE-NAME "fillhd" ].

fillhd_ppfill := n_head-pp_filler-rel-rule-fin &
  [ RULE-NAME "fillhd" ].

fillhd_inf_ppfill := n_head-pp_filler-rel-rule-inf & 
  [ RULE-NAME "fillhd" ].

fillhd_mrkdnpfill := n_head-mrkdn_filler-rel-rule-fin &
  [ RULE-NAME "fillhd" ].

fillhd_inf_mrkdnpfill := n_head-mrkdn_filler-rel-rule-inf & 
  [ RULE-NAME "fillhd" ].

fillhd_advfill := n_head-padv_filler-rel-rule-fin &
  [ RULE-NAME "fillhd" ].

fillhd_inf_advfill := n_head-padv_filler-rel-rule-inf & 
  [ RULE-NAME "fillhd" ].

fillhd_modnpfill := n_head-modnp_filler-rel-rule-fin &
  [ RULE-NAME "fillhd" ].

fillhd_inf_modnpfill := n_head-modnp_filler-rel-rule-inf & 
  [ RULE-NAME "fillhd" ].

fillhd_temphdnp-fill := tmp-n_head-np_filler-rel-rule-fin &
  [ RULE-NAME "fillhd" ].

fillhd_inf_temphd-npfill := tmp-n_head-np_filler-rel-rule-inf & 
  [ RULE-NAME "fillhd" ].

fillhd_temphd-modnpfill := tmp-n_head-modnp_filler-rel-rule-fin &
  [ RULE-NAME "fillhd" ].

fillhd_inf_temphd-modnpfill := tmp-n_head-modnp_filler-rel-rule-inf & 
  [ RULE-NAME "fillhd" ].

fillhd_pphd-npfill := p_head-np_filler-rel-rule-fin &
  [ RULE-NAME "fillhd" ].

fillhd_inf_pphd-npfill := p_head-np_filler-rel-rule-inf &
  [ RULE-NAME "fillhd" ].

fillhd_pphd-ppfill := p_head-pp_filler-rel-rule-fin &
  [ RULE-NAME "fillhd" ].

fillhd_inf_pphd-ppfill := p_head-pp_filler-rel-rule-inf & 
  [ RULE-NAME "fillhd" ].

fillhd_advhd-ppfill := av_head-pp_filler-rel-rule-fin & 
  [ RULE-NAME "fillhd" ].

fillhd_non-restrict_nhd-nfill := n_hd-n_fil-non_restrict-rel-rule & 
  [ RULE-NAME "fillhd" ].

fillhd_non-restrict_nhdnpfill := n_hd-np_fil-non_restrict-rel-rule & 
  [ RULE-NAME "fillhd" ].

;fillhd_non-restrict_nphd-nfill := np_hd-n_fil-non_restrict-rel-rule & 
;  [ RULE-NAME "fillhd" ].

;fillhd_non-restrict_nphd-npfill := np_hd-np_fil-non_restrict-rel-rule & 
;  [ RULE-NAME "fillhd" ].

fillhd_non-restrict_nhh-ppfill := n_hd-p_fil-non_restrict-rel-rule & 
  [ RULE-NAME "fillhd" ].

fillhd_non-restrict_nhd-mrkdnpfill := n_hd-mrkdn_fil-non_restrict-rel-rule & 
  [ RULE-NAME "fillhd" ].

fillhd_non-restrict_nhd-advfill := n_hd-av_fil-non_restrict-rel-rule & 
  [ RULE-NAME "fillhd" ].

fillhd_non-restrict_pphd-advfill := p_hd-av_fil-non_restrict-rel-rule & 
  [ RULE-NAME "fillhd" ].

fillhd_non-restrict_advhd-advfill := av_hd-av_fil-non_restrict-rel-rule & 
  [ RULE-NAME "fillhd" ].

freerel_arg := arg-free-rel-fin-rule & 
  [ RULE-NAME "freerel" ].

freerel_arg_inf := arg-free-rel-inf-rule & 
  [ RULE-NAME "freerel" ].

freerel_mod := mod-free-rel-fin-rule & 
  [ RULE-NAME "freerel" ].

freerel_mod_inf := mod-free-rel-inf-rule & 
  [ RULE-NAME "freerel" ].

freerel_parg := parg_np-free-rel-fin-rule & 
  [ RULE-NAME "freerel" ].

freerel_parg_inf  := parg_np-free-rel-inf-rule & 
  [ RULE-NAME "freerel" ].

freerel_pmod := pmod_np-free-rel-fin-rule & 
  [ RULE-NAME "freerel" ].

freerel_pmod_inf := pmod_np-free-rel-inf-rule & 
  [ RULE-NAME "freerel" ].


fillhd_wh := filler-head-wh-fin-rule &
  [ RULE-NAME "fillhd_wh" ].

fillhd_wh_inf := filler-head-wh-inf-rule &
  [ RULE-NAME "fillhd_wh" ].

;fillhd_topic := filler-head-non_wh-fin-rule &
;  [ RULE-NAME "fillhd_topic" ].


clthd := head-clit-rule & 
  [ RULE-NAME "clthd" ].


n_ellip := n_ellipsis-rule  & 
  [ RULE-NAME "ellipis" ].

semi_free_rel := semi_free_rel-rule  & 
  [ RULE-NAME "ellipis" ].


n_coord_advers := n-mono-top-advers-coord-rule & 
  [ RULE-NAME "n_coord" ].

n_coord_top_mono := n-mono-top-coord-rule & 
  [ RULE-NAME "n_coord" ].

n_coord_mid_mono := n-mono-mid-coord-rule & 
  [ RULE-NAME "n_coord" ].

n_coord_bot_mono := n-mono-bot-coord-rule & 
  [ RULE-NAME "n_coord" ].

np_coord_advers := np-mono-top-advers-coord-rule & 
  [ RULE-NAME "np_coord" ].

1np_coord_top_mono := 1per_np-mono-top-coord-rule & 
  [ RULE-NAME "np_coord" ].

2rnp_coord_top_mono := 2per_right_np-mono-top-coord-rule & 
  [ RULE-NAME "np_coord" ].

2lnp_coord_top_mono := 2per_left_np-mono-top-coord-rule & 
  [ RULE-NAME "np_coord" ].

3np_coord_top_mono := 3per_np-mono-top-coord-rule & 
  [ RULE-NAME "np_coord" ].

1np_coord_mid_mono := 1per_np-mono-mid-coord-rule & 
  [ RULE-NAME "np_coord" ].

2rnp_coord_mid_mono := 2per_right_np-mono-mid-coord-rule & 
  [ RULE-NAME "np_coord" ].

2lnp_coord_mid_mono := 2per_left_np-mono-mid-coord-rule & 
  [ RULE-NAME "np_coord" ].

3np_coord_mid_mono := 3per_np-mono-mid-coord-rule & 
  [ RULE-NAME "np_coord" ].

np_coord_bot_mono := np-mono-bot-coord-rule & 
  [ RULE-NAME "np_coord" ].

np_coord_top_omni := np-omni-top-coord-rule & 
  [ RULE-NAME "np_coord" ].

np_coord_mid_omni := np-omni-mid-coord-rule & 
  [ RULE-NAME "np_coord" ].

np_coord_bot_omni := np-omni-bot-coord-rule & 
  [ RULE-NAME "np_coord" ].

np_coord_left_omni := np-omni-left-coord-rule & 
  [ RULE-NAME "np_coord" ].

s_coord_advers := s-mono-top-advers-coord-rule & 
  [ RULE-NAME "s_coord" ].

scomp_coord_top_mono := scomp-mono-top-coord-rule & 
  [ RULE-NAME "s_coord" ].

s_coord_top_mono := s-mono-top-coord-rule & 
  [ RULE-NAME "s_coord" ].

s_coord_mid_mono := s-mono-mid-coord-rule & 
  [ RULE-NAME "s_coord" ].

s_coord_bot_mono := s-mono-bot-coord-rule & 
  [ RULE-NAME "s_coord" ].

s_coord_top_omni := s-omni-top-coord-rule & 
  [ RULE-NAME "s_coord" ].

s_coord_mid_omni := s-omni-mid-coord-rule & 
  [ RULE-NAME "s_coord" ].

s_coord_bot_omni := s-omni-bot-coord-rule & 
  [ RULE-NAME "s_coord" ].

s_coord_left_omni := s-omni-left-coord-rule & 
  [ RULE-NAME "s_coord" ].

vp_coord_advers := vp-mono-top-advers-coord-rule & 
  [ RULE-NAME "vp_coord" ].

vp_coord_top_mono := vp-mono-top-coord-rule & 
  [ RULE-NAME "vp_coord" ].

vp_coord_mid_mono := vp-mono-mid-coord-rule & 
  [ RULE-NAME "vp_coord" ].

vp_coord_bot_mono := vp-mono-bot-coord-rule & 
  [ RULE-NAME "vp_coord" ].

vp_coord_top_omni := vp-omni-top-coord-rule & 
  [ RULE-NAME "vp_coord" ].

vp_coord_bot_omni := vp-omni-bot-coord-rule & 
  [ RULE-NAME "vp_coord" ].

vp_coord_mid_omni := vp-omni-mid-coord-rule & 
  [ RULE-NAME "vp_coord" ].

vp_coord_left_omni := vp-omni-left-coord-rule & 
  [ RULE-NAME "vp_coord" ].

v_coord_advers := v-mono-top-advers-coord-rule & 
  [ RULE-NAME "v_coord" ].

v_coord_top_mono := v-mono-top-coord-rule & 
  [ RULE-NAME "v_coord" ].

v_coord_mid_mono := v-mono-mid-coord-rule & 
  [ RULE-NAME "v_coord" ].

v_coord_bot_mono := v-mono-bot-coord-rule & 
  [ RULE-NAME "v_coord" ].

v_coord_top_omni := v-omni-top-coord-rule & 
  [ RULE-NAME "v_coord" ].

v_coord_bot_omni := v-omni-bot-coord-rule & 
  [ RULE-NAME "v_coord" ].

v_coord_mid_omni := v-omni-mid-coord-rule & 
  [ RULE-NAME "v_coord" ].

v_coord_left_omni := v-omni-left-coord-rule & 
  [ RULE-NAME "v_coord" ].

a_coord_advers := a-mono-top-advers-coord-rule & 
  [ RULE-NAME "a_coord" ].

a_coord_top_mono := a-mono-top-coord-rule & 
  [ RULE-NAME "a_coord" ].

a_coord_mid_mono := a-mono-mid-coord-rule & 
  [ RULE-NAME "a_coord" ].

a_coord_bot_mono := a-mono-bot-coord-rule & 
  [ RULE-NAME "a_coord" ].

a_coord_top_omni := a-omni-top-coord-rule & 
  [ RULE-NAME "a_coord" ].

a_coord_mid_omni := a-omni-mid-coord-rule & 
  [ RULE-NAME "a_coord" ].

a_coord_bot_omni := a-omni-bot-coord-rule & 
  [ RULE-NAME "a_coord" ].

a_coord_left_omni := a-omni-left-coord-rule &
  [ RULE-NAME "a_coord" ].

mrkd-np_coord_top := mrkp-mono-top-coord-rule & 
  [ RULE-NAME "mrkdnp_coord" ].

mrkd-np_coord_mid := mrkp-mono-mid-coord-rule & 
  [ RULE-NAME "mrkdnp_coord" ].

mrkd-np_coord_advers := mrkp-mono-top-advers-coord-rule & 
  [ RULE-NAME "mrkdnp_coord" ].

pp_coord_advers := p-mono-top-advers-coord-rule & 
  [ RULE-NAME "pp_coord" ].

pp_coord_top_mono := p-mono-top-coord-rule & 
  [ RULE-NAME "pp_coord" ].

pp_coord_mid_mono := p-mono-mid-coord-rule & 
  [ RULE-NAME "pp_coord" ].

pp_coord_bot_mono := p-mono-bot-coord-rule & 
  [ RULE-NAME "pp_coord" ].

pp_coord_top_omni := p-omni-top-coord-rule & 
  [ RULE-NAME "pp_coord" ].

pp_coord_mid_omni := p-omni-mid-coord-rule & 
  [ RULE-NAME "pp_coord" ].

pp_coord_bot_omni := p-omni-bot-coord-rule & 
  [ RULE-NAME "pp_coord" ].

pp_coord_left_omni := p-omni-left-coord-rule & 
  [ RULE-NAME "pp_coord" ].

adv_coord_advers := av-mono-top-advers-coord-rule & 
  [ RULE-NAME "adv_coord" ].

adv_coord_top_mono := av-mono-top-coord-rule & 
  [ RULE-NAME "adv_coord" ].

adv_coord_mid_mono := av-mono-mid-coord-rule & 
  [ RULE-NAME "adv_coord" ].

adv_coord_bot_mono := av-mono-bot-coord-rule & 
  [ RULE-NAME "adv_coord" ].

adv_coord_top_omni := av-omni-top-coord-rule & 
  [ RULE-NAME "adv_coord" ].

adv_coord_mid_omni := av-omni-mid-coord-rule & 
  [ RULE-NAME "adv_coord" ].

adv_coord_bot_omni := av-omni-bot-coord-rule & 
  [ RULE-NAME "adv_coord" ].

adv_coord_left_omni := av-omni-left-coord-rule & 
  [ RULE-NAME "adv_coord" ].

adj-adv_coord-top := a_av-mono-top-coord-rule & 
  [ RULE-NAME "adj-adv_coord" ].

adj-adv_coord_mid := a_av-mono-mid-coord-rule & 
  [ RULE-NAME "adj-adv_coord" ].

adv-pp_coord_top := av_p-mono-top-coord-rule & 
  [ RULE-NAME "adv-pp_coord" ].

adv-pp_coord_mid := av_p-mono-mid-coord-rule & 
  [ RULE-NAME "adv-pp_coord" ].