# r_morph_adjective.gra - AGFL grammar defining morphology.
#
#  This file is a module of the Russian Parser for Information Retrieval (RuForIR) AGFL grammar,
#  version 2.1, 25.10.2002.
#  It can be processed using the AGFL parser generator to generate the RuForIR parser.
#
#  The grammar is based on the Affix Grammar for Basic Russian.
#    Original version 1997
#    Updated by I. Azarova, 2002
#
#  Copyright 1997-2002 Saint-Petersburg University 


# f u l l    f o r m s
#!!!!!!!!!!!!!!!!! possessive forms are not included
# adjst - joint stem;  adjst_no - full forms only; adjst_ful - stem for full forms; 
# adjst_oth - stem with a different form for a short masculine singular
# nominative
adjf (GENDER, ANIM, NUMBER, nom, LEMMA): 
  adjst (ADTYPE, LEMMA),  inflsa (GENDER, ADTYPE, NUMBER, nom);
  adjst_no (ADTYPE, LEMMA),  inflsa (GENDER, ADTYPE, NUMBER, nom);
  adjst_ful (ADTYPE, LEMMA),  inflsa (GENDER, ADTYPE, NUMBER, nom);
  adjst_oth (ADTYPE, LEMMA),  inflsa (GENDER, ADTYPE, NUMBER, nom).

# genitive | dative | ablative | locative
adjf (GENDER, ANIM, NUMBER, CASE_O, LEMMA): 
  adjst (ADTYPE, LEMMA),  inflsa (GENDER, ADTYPE, NUMBER, CASE_O);
  adjst_no (ADTYPE, LEMMA),  inflsa (GENDER, ADTYPE, NUMBER, CASE_O);
  adjst_ful (ADTYPE, LEMMA),  inflsa (GENDER, ADTYPE, NUMBER, CASE_O);
  adjst_oth (ADTYPE, LEMMA),  inflsa (GENDER, ADTYPE, NUMBER, CASE_O).

# special accusative for feminine forms
adjf (fem, ANIM, sg, acc, LEMMA): 
  adjst (ADTYPE, LEMMA),  inflsa (fem, ADTYPE, sg, acc);
  adjst_no (ADTYPE, LEMMA),  inflsa (fem, ADTYPE, sg, acc);
  adjst_ful (ADTYPE, LEMMA),  inflsa (fem, ADTYPE, sg, acc);
  adjst_oth (ADTYPE, LEMMA),  inflsa (fem, ADTYPE, sg, acc).


adjf (GENDER, ANIM, sg, nom, LEMMA): adjst_pr (DECLTYPE, LEMMA), inflsn (GENDER, DECLTYPE, sg, nom).	# ваш/наш 
adjf (fem, ANIM, sg, acc, LEMMA): adjst_pr (DECLTYPE, LEMMA), inflsn (fem, DECLTYPE, sg, acc).		# вашу/нашу
adjf (GENDER, ANIM, pl, nom, LEMMA): adjst_pr (DECLTYPE, LEMMA), inflsn (masc, DECLTYPE, pl, nom).	# ваши/наши 
adjf (GENDER, ANIM, NUMBER, CASE_O, LEMMA): adjst_pr (ADTYPE, LEMMA), inflsa (GENDER, ADTYPE, NUMBER, CASE_O).

adjf (masc, ANIM, sg, nom, LEMMA): adjst_nm (DECLTYPE, LEMMA), inflsn (masc, DECLTYPE, sg, nom).	# чей/божий/третий
adjf (fem, ANIM, sg, acc, LEMMA): adjst_rst (DECLTYPE, LEMMA), inflsn (fem, DECLTYPE, sg, acc).		# чью/божью/третью
adjf (GENFN, ANIM, sg, nom, LEMMA): adjst_rst (DECLTYPE, LEMMA), inflsn (GENFN, DECLTYPE, sg, nom).	# чья/божья/третья
adjf (GENDER, ANIM, pl, nom, LEMMA): adjst_rst (DECLTYPE, LEMMA), inflsn (masc, DECLTYPE, pl, nom).	# чьи/божьи/третьи
adjf (GENDER, ANIM, NUMBER, CASE_O, LEMMA): adjst_rst (ADTYPE, LEMMA), inflsa (GENDER, ADTYPE, NUMBER, CASE_O).

adjf (GENDER, ANIM, pl, nom, LEMMA): adjst_pl (pal, LEMMA), inflsn (masc, pal, pl, nom).		# эти/одни
adjf (GENDER, ANIM, pl, nom, LEMMA): adjst_pl (irreg, LEMMA), inflsa (GENDER, irreg, pl, nom).	# все/те

adjf (GENFN, ANIM, sg, nom, LEMMA): adjst_ost (DECLTYPE, LEMMA), inflsn (GENFN, DECLTYPE, sg, nom).	# вся/та/все/то/одна/эта/одно/это
adjf (fem, ANIM, sg, acc, LEMMA): adjst_ost (DECLTYPE, LEMMA), inflsn (fem, DECLTYPE, sg, acc).		# всю/ту/одну/эту
adjf (fem, ANIM, sg, abl, LEMMA): adjst_ost (ADTYPE, LEMMA), inflsa (fem, ADTYPE, sg, abl).		# той/всей/одной/этой
adjf (GENMN, ANIM, sg, abl, LEMMA): adjst_pl (irreg, LEMMA), inflsa (GENMN, irreg, sg, abl);	# тем/всем
				    adjst_pl (pal, LEMMA), inflsa (masc, pal, sg, abl).		# одним/этим
adjf (GENDER, ANIM, sg, FCASE, LEMMA): adjst_ost (ADTYPE, LEMMA), inflsa (GENDER, ADTYPE, sg, FCASE).
adjf (GENDER, ANIM, pl, CASE_O, LEMMA): adjst_pl (irreg, LEMMA), inflsa (GENDER, irreg, pl, CASE_O);	# тех/всех... 
				        adjst_pl (pal, LEMMA), inflsa (GENDER, pal, pl, CASE_O).	# одних/этих... 

# zero forms
adjf (GENMN, ANIM, sg, CASE, LEMMA): adjst_masc (zero, LEMMA).
adjf (fem, ANIM, sg, CASE, LEMMA): adjst_fem (zero, LEMMA).
adjf (GENDER, ANIM, pl, CASE, LEMMA): adjst_plur (zero, LEMMA).

# accusative forms
adjf (masc, anm, sg, acc, LEMMA): adjf (masc, anm, sg, gen, LEMMA).
adjf (masc, inanm, sg, acc, LEMMA): adjf (masc, inanm, sg, nom, LEMMA).
adjf (neut, ANIM, sg, acc, LEMMA): adjf (neut, ANIM, sg, nom, LEMMA).

adjf (GENDER, anm, pl, acc, LEMMA): adjf (GENDER, anm, pl, gen, LEMMA).
adjf (GENDER, inanm, pl, acc, LEMMA): adjf (GENDER, inanm, pl, nom, LEMMA).

# short forms 
adjf_pred (masc, sg, LEMMA): 
 adjst (ADTYPE, LEMMA),  inflpa (masc, ADTYPE, sg);
 adjst_sht (ADTYPE, LEMMA),  inflpa (masc, ADTYPE, sg);
 adjst_ms (ADTYPE, LEMMA),  inflpa (masc, ADTYPE, sg).

adjf_pred (GENFN, sg, LEMMA): 
 adjst (ADTYPE, LEMMA),  inflpa (GENFN, ADTYPE, sg);
 adjst_sht (ADTYPE, LEMMA),  inflpa (GENFN, ADTYPE, sg);
 adjst_oth (ADTYPE, LEMMA),  inflpa (GENFN, ADTYPE, sg).

adjf_pred (GENDER, pl, LEMMA): 
 adjst (ADTYPE, LEMMA),  inflpa (GENDER, ADTYPE, pl);
 adjst_sht (ADTYPE, LEMMA),  inflpa (GENDER, ADTYPE, pl);
 adjst_oth (ADTYPE, LEMMA),  inflpa (GENDER, ADTYPE, pl).