Aspekte der morphologischen Analyse des Deutschen - Universität ...

* Commented out because of the danger of loops
syn_head_features([]) := top.
syn_head_features([syn:head:H|Rest]) :=
syn:head:H & syn_head_features(Rest).
Anhang C: Programmcode
morph_head_features([]) := top.
morph_head_features([morph:mhead:H|Rest]) :=
morph:mhead:H & morph_head_features(Rest).
*/
/***************************************************************************************************************
morph_subcat_principle(Affix,Stem):
checks whether Stem is morphologically subcategorised by Affix and
returns the semantics and argument structure of the affix
****************************************************************************************************************/
morph_subcat_principle( morph:msubcat:needs:Stem & syn:argstr:AffixSC & sem:Sem,
Stem) :=
syn:argstr:AffixSC &
morph:msubcat:needs:[] &
sem:Sem.
/***************************************************************************************************************
selector functions
****************************************************************************************************************/
syn_head(syn:head:Head) :=
Head.
roles_of_event(event:roles:Roles) :=
Roles.
semantics(sem:Sem) :=
sem:Sem.
infl_semantics(sem:Sem,_) :=
sem:Sem.
type_concept(simple_type & Simple_type & type:Type) :=
Simple_type &
type: concept(Type).
type_concept(dotted_type & types:TypeList) :=
member(Simple_type & type:Type, TypeList) &
Simple_type & type: concept(Type).
/***************************************************************************************************************
****************************************************************************************************************/
% for derivation with -ung:
subjectivus(sem:SubjSem, _DO, _Defargs) :=
argstr_relarg(Rel & sem:SubjSem) &
argstr_order([Rel]) &
defargs([]).
% Realisation of default arguments sounds odd:
% "die Überprüfung der Beamten mit dem Meßgerät ..."
% with the intended reading "die Beamten prüfen ...
239