gf-core/lib/src/nepali/StructuralNep.gf

concrete StructuralNep of Structural = CatNep ** 
  open MorphoNep, ParadigmsNep, Prelude, NounNep in {

  flags 
    optimize = all ;
    coding = utf8;

  lin

    above_Prep = mkPrep "माथि" ; -- माथि
    after_Prep = mkPrep "पछि" ; -- पछि
    all_Predet = ss "सबै" ; -- सबै (adj)
    almost_AdA = mkAdA "झण्डै" ;
    almost_AdN = mkAdN "झण्डै" ; -- JNx:xE (Adv) झण्डै
    although_Subj = ss "तैपनि" ; -- तैपनि (conj)
    always_AdV = mkAdV "सधैँ" ; -- सधैँ
    and_Conj = sd2 [] "र" ** {n = Pl} ;
    because_Subj = ss "किनभने" ; -- किनभने
    before_Prep = mkPrep "अघि" ; -- अघि 
    behind_Prep = mkPrep "पछि" ; -- पछि
    between_Prep = mkPrep "बिच" ; -- बिच
    both7and_DConj = sd2 "दुबै" "र" ** {n = Pl} ; -- दुबै र
    but_PConj = ss "तर" ; -- तर
    by8agent_Prep = mkPrep "लाइ" ; -- 
    by8means_Prep = mkPrep "ले" ; 
    can8know_VV,can_VV = mkV "सक्नु" ** { isAux = True} ;
    during_Prep = mkPrep "पर्यान्त" ; -- पर्यान्त
    either7or_DConj = sd2 "की" "अथवा" ** {n = Sg} ; -- की,  अथवा 
    everybody_NP =  MassNP (UseN (regN "सवौ जाना" Living)) ; -- not a good way coz need to include Noun (सवौ जाना)
    every_Det = mkDet "सबै" "हरेक" Sg ; -- सबै, हरेक
    everything_NP = MassNP (UseN (regN "हारेक कुरा" NonLiving)) ; -- हारेक कुरा
    everywhere_Adv = mkAdv "जाता ततै" ; -- जाता ततै
    few_Det = mkDet "थोरै" "अलिकती" Pl ; -- थोरै, अलिकती
--  d    first_Ord = {s = "पेहला" ; n = Sg} ; --DEPRECATED
    for_Prep = mkPrep "लागि" ; -- लागि
    from_Prep = mkPrep "बाट" ; -- बाट
    
    i_Pron = mkPron "म" "मेरो" Sg Masc Pers1 ; -- म, मेरो
    we_Pron = mkPron "हामीहरु" "हामीहरुको" Pl Masc Pers1 ; -- हामीहरु, हामीहरुको    
    he_Pron = mkPron "उ" "उस्लाई" "उस्ले" "उस्लाई" "उसबाट" "उस्मा" "उस्को" Sg  Masc Pers3_L; --उ, उस्लाई, उस्ले, उस्लाई, उसवाट, उस्मा, उस्को
    she_Pron = mkPron "उनी" "उन्लाई" "उन्ले" "उन्लाई" "उनबाट" "उन्मा" "उन्को" Sg Fem Pers3_M ; -- उनी , उन्को
    youSg_Pron = mkPron "तिमी" "तिम्रो" Sg Masc Pers2_M ; -- तिमी, तिम्रो
    youPl_Pron = mkPron "तिमीहरु" "तिमीहरुको" Pl Masc Pers2_M ; -- तिमीहरु, तिमीहरुको
    youPol_Pron = mkPron "तपाई" "तपाईहरुको" Sg Masc Pers2_H  ; -- तपाई, तपाईहरुको
    they_Pron = mkPron "उनीहरु" "उनिहरुको" Pl Masc Pers3_L ; -- उनिहरु, उनिहरुको
    it_Pron  = mkPron "यो" "यसलाई" "येसले" "यसलाई" "यसबाट" "यसमा" "ुस्को" Sg Masc Pers3_L; -- यो, यसलाई, यसले, यसलाई, यसबाट, यसमा, उस्को
    
    here_Adv = mkAdv "यहाँ" ; -- यहाँ
    here7to_Adv = mkAdv ["यहाँ सम्म"] ; -- यहाँ सम्म
    here7from_Adv = mkAdv ["यहाँ बाट"] ; -- यहाँ बाट
    how_IAdv = ss "कसरी" ; -- कसरी
    how8much_IAdv  = ss "कती" ; -- कती
    how8many_IDet = mkIDetn "कती वटा" "कती वटी" Pl ;  -- काती वटा, कती वटी (incase of humans it becomes, 'kati jana') NEEDS FIX
    if_Subj = ss "यदि" ; -- यदि
    in8front_Prep = mkPrep "सामु" ; -- सामु      
    in_Prep = mkPrep "मा" ; -- मा    
    less_CAdv = {s = "कम" ; p = "भन्दा"} ; -- भन्दा कम
    many_Det = mkDet "धेरै" "थुप्रै" Pl ; -- धेरै, थुप्रै
    more_CAdv = {s = "बढी" ; p = "भन्दा" } ;
    most_Predet = ss "ज्यादै" ; -- ज्यादै
    much_Det = mkDet "निक्कै" "बेसरी" Sg  ; -- 
    must_VV = mkV "अवश्य" ** { isAux = True} ; -- अवश्य
--  must_VV = {
--    s = table {
--      VVF VInf => ["हावे तो"] ;
--      VVF VPres => "मुसत" ;
--      VVF VPPart => ["हाद तो"] ;
--      VVF VPresPart => ["हाविनग तो"] ;
--      VVF VPast => ["हाद तो"] ;      --# notpresent
--      VVPastNeg => ["हादn'त तो"] ;      --# notpresent
--      VVPresNeg => "मुसतn'त"
--      } ;
--    isAux = True
--    } ;
  
--  d    no_Phr = ss "हुन्न" ; -- हुन्न
    no_Utt = ss "होईन" ; -- होईन
    on_Prep = mkPrep "मा" ; -- मा
--  d    one_Quant = mkQuant "एक" "एक" ; -- DEPRECATED
    only_Predet = ss "मात्र" ; -- मात्र
    or_Conj = sd2 [] "अथवा" ** {n = Sg} ; -- अथवा
    otherwise_PConj = ss "अन्यथा" ; -- अन्यथा
    part_Prep = mkPrep "भाग" ; -- भाग
    please_Voc = ss "कृपया" ; -- कृपया
    possess_Prep = mkPrep "धारणा गर्नु" ; -- धारणा गर्नु
    quite_Adv = ss "एकदम" ; -- एकदम    
    so_AdA = mkAdA "यस कारण" ; -- यस कारण ???? NEED TO CHECK
    somebody_NP = MassNP (UseN (regN "कोही" Living)); -- कोही
    someSg_Det = mkDet "कोही" "केही" Sg ;
    somePl_Det = mkDet "कोही" "केही" Pl ;
    something_NP = MassNP (UseN (regN "केही  कुरा" NonLiving)) ;
    somewhere_Adv = mkAdv "कहीं" ; -- कहीं
    that_Quant = mkQuant "त्ये" "यिनीहरु" ;
    that_Subj = ss "त्यो"; -- त्यो
    there_Adv = mkAdv "त्यहाँ" ; -- त्यहाँ
    there7to_Adv = mkAdv "त्यहाँ सम्म" ; -- त्यहाँ सम्म
    there7from_Adv = mkAdv "त्यहाँ बाट" ; -- त्यहाँ बाट
    therefore_PConj = ss "अतः" ; -- अतः    
    this_Quant = mkQuant "यो" "यी" ; -- यो,  यी
    through_Prep = mkPrep "मार्फत" ; -- मार्फत
    too_AdA = mkAdA "पनि" ; -- पनि
    to_Prep = ss "सम्म" ; -- सम्म
    under_Prep = mkPrep "अन्तर्गत" ; -- अन्तर्गत
    very_AdA = mkAdA "धेरै" ; -- धेरै
    want_VV = mkV "चाहनु" ** { isAux = False} ;    
    whatSg_IP = mkIP "के" "के" "के" "" Sg ;
    whatPl_IP = mkIP "के" "के" "के" "" Pl ;
    when_IAdv = ss "कहिले" ; -- कहिले
    when_Subj = ss "कहिले" ;
    where_IAdv = ss "कहाँ" ; -- कहाँ
    which_IQuant = {s = table {Sg => "कुन" ; Pl => "कुन" } }; -- कुन
--  d    whichPl_IDet = {s = "कुन" ; n = Sg} ;
--  d    whichSg_IDet = {s = "कुन" ; n = Pl} ;
    whoSg_IP = mkIP "को" "कासलाई" "कसको" "" Sg ; 
    whoPl_IP = mkIP "को" "कासलाई" "कसको" "" Pl ;
    why_IAdv = ss "किन" ; -- किन
    without_Prep = mkPrep "विना" ; -- विना
    with_Prep = mkPrep "सँग" ; -- सँग
--  d    yes_Phr = ss "हजुर" ; -- हजुर
    yes_Utt = ss "हजुर" ;  
    no_Quant =  mkQuant "हैन" "हैनै" ;
    not_Predet = {s="हैन"} ; -- हैन
    if_then_Conj = sd2 "यदि" "भने" ** {n = Sg} ; -- यदि भने
    at_least_AdN = mkAdN "कमसेकम" ; -- कमसेकम
    at_most_AdN = mkAdN "बढीमा" ; -- बढीमा
    nothing_NP = MassNP (UseN (regN "केही पनी")) ; -- केही पनी
    nobody_NP = MassNP (UseN (regN "केही पनी" living)) ; --कोही पनी
    except_Prep = mkPrep "बाहेक" ; -- बाहेक
    as_CAdv = {s = "जत्तीकै" ; p = ""} ;  -- जत्तीकै
    have_V2 = mkV2 (mkV "हुनु") "" ; -- हुनु
    language_title_Utt = ss "नेपाली" ; -- नेपाली
}