def _rev_cat_rvcm(marpac, deficit_rcm, f2ch, f2dc, f2ts, f2ca, f2fu, f2go, f2gr, f2tr, _P):
    ''' REVENUS DES VALEURS ET CAPITAUX MOBILIERS '''
    P = _P.ir.rvcm
    if _P.datesim.year > 2004: f2gr = 0

    ## Calcul du revenu catégoriel
    #1.2 Revenus des valeurs et capitaux mobiliers
    b12 = min_(f2ch, P.abat_assvie*(1 + marpac))
    TOT1 = f2ch-b12
    # Part des frais s'imputant sur les revenus déclarés case DC
    den = ((f2dc + f2ts)!=0)*(f2dc + f2ts) + ((f2dc + f2ts)==0)
    F1 =  f2ca/den*f2dc
    
    # Revenus de capitaux mobiliers nets de frais, ouvrant droit à abattement
    # partie négative (à déduire des autres revenus nets de frais d'abattements
    g12a = - min_(f2dc*P.abatmob_taux - F1,0)
    # partie positive
    g12b = max_(f2dc*P.abatmob_taux - F1,0)
    
    rev = g12b + f2gr + f2fu*P.abatmob_taux

    # Abattements, limité au revenu
    h12 = P.abatmob*(1 + marpac)
    TOT2 = max_(0,rev - h12)
    i121= -min_(0,rev - h12)
    
    # Pars des frais s'imputant sur les revenus déclarés ligne TS
    F2 = f2ca - F1
    TOT3 = (f2ts - F2) + f2go*P.majGO + f2tr - g12a

    DEF = deficit_rcm

    return max_(TOT1 + TOT2 + TOT3 - DEF, 0)

def _spfcpi(marpac, f7gq, f7fq, f7fm, f7fl, _P):
    '''
    Souscription de parts de fonds communs de placement dans l'innovation,
    de fonds d'investissement de proximité
    2002-
    '''
    P = _P.ir.reductions_impots.spfcpi
    max1 = P.max * (marpac + 1)

    if _P.datesim.year <= 2002:
        return P.taux1 * min_(f7gq, max1)
    elif _P.datesim.year <= 2006:
        return (P.taux1 * min_(f7gq, max1) +
                P.taux1 * min_(f7fq, max1))
    elif _P.datesim.year <= 2010:
        return (P.taux1 * min_(f7gq, max1) +
                P.taux1 * min_(f7fq, max1) +
                P.taux2 * min_(f7fm, max1))

    elif _P.datesim.year <= 2011:
        return (P.taux1 * min_(f7gq, max1) +
                P.taux1 * min_(f7fq, max1) +
                P.taux2 * min_(f7fm, max1) +
                P.taux3 * min_(f7fl, max1))
    else:
        return f7gq * 0  # TODO:

def _locmeu(f7ij, f7il, f7im, f7ik, f7is, _P):
    '''
    Investissement en vue de la location meublée non professionnelle dans certains établissements ou résidences (case 7IJ)
    2009-
    '''
    P = _P.ir.reductions_impots.locmeu
    return ((max_(min_(P.max, f7ij), min_(P.max, f7il)) + min_(P.max, f7im)) / 9 + f7ik) * P.taux + f7is

    def function(self, simulation, period):
        '''
        Épargne retraite - PERP, PRÉFON, COREM et CGOS
        2004-
        '''
        period = period.start.offset('first-of', 'month').period('year')
        f6ps_holder = simulation.compute('f6ps', period)
        f6rs_holder = simulation.compute('f6rs', period)
        f6ss_holder = simulation.compute('f6ss', period)

        f6ps = self.filter_role(f6ps_holder, role = VOUS)
        f6pt = self.filter_role(f6ps_holder, role = CONJ)
        f6pu = self.filter_role(f6ps_holder, role = PAC1)

        f6rs = self.filter_role(f6rs_holder, role = VOUS)
        f6rt = self.filter_role(f6rs_holder, role = CONJ)
        f6ru = self.filter_role(f6rs_holder, role = PAC1)

        f6ss = self.filter_role(f6ss_holder, role = VOUS)
        f6st = self.filter_role(f6ss_holder, role = CONJ)
        f6su = self.filter_role(f6ss_holder, role = PAC1)

        # TODO: En théorie, les plafonds de déductions (ps, pt, pu) sont calculés sur
        # le formulaire 2041 GX
        return period, ((f6ps == 0) * (f6rs + f6ss) +
                (f6ps != 0) * min_(f6rs + f6ss, f6ps) +
                (f6pt == 0) * (f6rt + f6st) +
                (f6pt != 0) * min_(f6rt + f6st, f6pt) +
                (f6pu == 0) * (f6ru + f6su) +
                (f6pu != 0) * min_(f6ru + f6su, f6pu))

    def function(self, simulation, period):
        period = period.this_year
        f6ps_holder = simulation.compute('f6ps', period)
        f6rs_holder = simulation.compute('f6rs', period)
        f6ss_holder = simulation.compute('f6ss', period)

        f6ps = self.filter_role(f6ps_holder, role = VOUS)
        f6pt = self.filter_role(f6ps_holder, role = CONJ)
        f6pu = self.filter_role(f6ps_holder, role = PAC1)

        f6rs = self.filter_role(f6rs_holder, role = VOUS)
        f6rt = self.filter_role(f6rs_holder, role = CONJ)
        f6ru = self.filter_role(f6rs_holder, role = PAC1)

        f6ss = self.filter_role(f6ss_holder, role = VOUS)
        f6st = self.filter_role(f6ss_holder, role = CONJ)
        f6su = self.filter_role(f6ss_holder, role = PAC1)

        # TODO: En théorie, les plafonds de déductions (ps, pt, pu) sont calculés sur
        # le formulaire 2041 GX
        return period, ((f6ps == 0) * (f6rs + f6ss) +
                (f6ps != 0) * min_(f6rs + f6ss, f6ps) +
                (f6pt == 0) * (f6rt + f6st) +
                (f6pt != 0) * min_(f6rt + f6st, f6pt) +
                (f6pu == 0) * (f6ru + f6su) +
                (f6pu != 0) * min_(f6ru + f6su, f6pu))

def _ecodev(f7uh, rbg_int, _P):
    '''
    Sommes versées sur un compte épargne codéveloppement (case 7UH)
    2009
    '''
    P = _P.ir.reductions_impots.ecodev
    return min_(f7uh, min_(P.base * rbg_int, P.max))  # page3 ligne 18

def _cappme(marpac, f7cf, f7cl, f7cm, f7cn, f7cu, _P):
    """
    Souscriptions au capital des PME
    2002-
    """
    P = _P.ir.reductions_impots.cappme
    base = f7cf
    if _P.datesim.year >= 2003:
        base += f7cl
    if _P.datesim.year >= 2004:
        base += f7cm
    if _P.datesim.year >= 2005:
        base += f7cn
    seuil = P.seuil * (marpac + 1)

    if _P.datesim.year <= 2008:
        return P.taux * min_(base, seuil)
    elif _P.datesim.year <= 2010:
        seuil_tpe = P.seuil_tpe * (marpac + 1)
        return P.taux * (min_(base, seuil) + min_(f7cu, seuil_tpe))
    elif _P.datesim.year <= 2011:
        seuil_tpe = P.seuil_tpe * (marpac + 1)
        return P.taux * (min_(base, seuil) + min_(f7cu, seuil_tpe))  # TODO: Modify and add f7cq, check taux
    else:
        return f7cu * 0

    def function(self, simulation, period):
        """
        Pensions alimentaires
        """
        period = period.start.offset("first-of", "year").period("year")
        f6gi = simulation.calculate("f6gi", period)
        f6gj = simulation.calculate("f6gj", period)
        f6gp = simulation.calculate("f6gp", period)
        f6el = simulation.calculate("f6el", period)
        f6em = simulation.calculate("f6em", period)
        f6gu = simulation.calculate("f6gu", period)
        penalim = simulation.legislation_at(period.start).ir.charges_deductibles.penalim

        max1 = penalim.max
        taux_jgt_2006 = penalim.taux_jgt_2006
        # TODO: si vous subvenez seul(e) à l'entretien d'un enfant marié ou
        # pacsé ou chargé de famille, quel que soit le nmbre d'enfants du jeune
        # foyer, la déduction est limitée à 2*max
        # S'il habite chez ses parents, max 3359, sinon 5698
        return (
            period,
            (
                min_(f6gi * (1 + taux_jgt_2006), max1)
                + min_(f6gj * (1 + taux_jgt_2006), max1)
                + min_(f6el, max1)
                + min_(f6em, max1)
                + f6gp * (1 + taux_jgt_2006)
                + f6gu
            ),
        )

def _cd_eparet(self, f6ps_holder, f6rs_holder, f6ss_holder):
    '''
    Épargne retraite - PERP, PRÉFON, COREM et CGOS
    2004-
    '''
    f6ps = self.filter_role(f6ps_holder, role = VOUS)
    f6pt = self.filter_role(f6ps_holder, role = CONJ)
    f6pu = self.filter_role(f6ps_holder, role = PAC1)

    f6rs = self.filter_role(f6rs_holder, role = VOUS)
    f6rt = self.filter_role(f6rs_holder, role = CONJ)
    f6ru = self.filter_role(f6rs_holder, role = PAC1)

    f6ss = self.filter_role(f6ss_holder, role = VOUS)
    f6st = self.filter_role(f6ss_holder, role = CONJ)
    f6su = self.filter_role(f6ss_holder, role = PAC1)

    # TODO: En théorie, les plafonds de déductions (ps, pt, pu) sont calculés sur
    # le formulaire 2041 GX
    return ((f6ps == 0) * (f6rs + f6ss) +
            (f6ps != 0) * min_(f6rs + f6ss, f6ps) +
            (f6pt == 0) * (f6rt + f6st) +
            (f6pt != 0) * min_(f6rt + f6st, f6pt) +
            (f6pu == 0) * (f6ru + f6su) +
            (f6pu != 0) * min_(f6ru + f6su, f6pu))

def _plus_value_nette(period, plus_value_brute, dur_det_immo, pv_immo = law.ir.pv_immo):
    """
    Calcul de la plus value immobilière nette
    """
    # 40. ABATTEMENT POUR DUREE DE DETENTION
    # 41. NOMBRE D’ANNEES DE DETENTION AU-DELA DE LA 5EME ANNEE
    if period.start:  # TODO:
        taux_reduc = max_(dur_det_immo - pv_immo.ann_det1, 0) * pv_immo.taux1
    else:
        taux_reduc = (max_(dur_det_immo - pv_immo.ann_det3, 0) * pv_immo.taux3
            + max_(min_(dur_det_immo, pv_immo.ann_det3) - pv_immo.ann_det2, 0) * pv_immo.taux2
            + max_(min_(dur_det_immo, pv_immo.ann_det2) - pv_immo.ann_det1, 0) * pv_immo.taux1)

    taux_reduc = min_(taux_reduc, 1.0)
    pv_impos = (1 - taux_reduc) * plus_value_brute

    # 45. MONTANT DE LA PLUS-VALUE BENEFICIANT, SOUS CONDITIONS, DE L’EXONERATION AU TITRE DE LA
    # PREMIERE CESSION D’UN LOGEMENT EN VUE DE L’ACQUISITION DE LA RESIDENCE PRINCIPALE
    # (CGI, 1° BIS DU II DE L’ARTICLE 150 U) TODO:
    exo = 0

    pv_net_impos = max_(pv_impos - exo, 0)  # 46. PLUS-VALUE NETTE IMPOSABLE [LIGNE 44 OU (LIGNE 44 – LIGNE 45)] = €
    # 50. PLUS-VALUE NETTE IMPOSABLE GLOBALE =
    # (LIGNE 46 OU TOTAL DES LIGNES 46 SI PLUSIEURS 2048-IMM-SD PAGE 2)

    # Lorsqu’une même cession porte sur des biens pour lesquels sont prévues des règles différentes (acquisitions
    # successives de fractions divises ou indivises notamment), il convient de remplir les lignes 10 à 46 pour chacune
    # des fractions (utiliser plusieurs 2048-IMM-SD page 2).
    return pv_net_impos

def _saldom2(nb_pac2, f7db, f7dg, f7dl, f7dq, _P):
    '''
    Crédit d’impôt emploi d’un salarié à domicile (cases 7DB, 7DG)
    2007-
    '''
    P = _P.ir.reductions_impots.saldom

    isinvalid = f7dg

    if _P.datesim.year in (2007, 2008):
        nbpacmin = nb_pac2 + f7dl
        maxBase = P.max1
        maxDuMaxNonInv = P.max2
        maxNonInv = min_(maxBase + P.pac * nbpacmin, maxDuMaxNonInv)
        maxEffectif = maxNonInv * not_(isinvalid) + P.max3 * isinvalid

    elif _P.datesim.year in (2009, 2010):
        annee1 = f7dq
        nbpacmin = nb_pac2 + f7dl
        maxBase = P.max1 * not_(annee1) + P.max1_1ereAnnee * annee1
        maxDuMaxNonInv = P.max2 * not_(annee1) + P.max2_1ereAnnee * annee1
        maxNonInv = min_(maxBase + P.pac * nbpacmin, maxDuMaxNonInv)
        maxEffectif = maxNonInv * not_(isinvalid) + P.max3 * isinvalid

    elif _P.datesim.year >= 2011:
        # TODO:
        maxEffectif = 0

    return P.taux * min_(f7db, maxEffectif)

def _sofica(f7gn, f7fn, rng, P = law.ir.reductions_impots.sofica):
    '''
    Souscriptions au capital de SOFICA
    2006-
    '''
    max0 = min_(P.taux1 * max_(rng, 0), P.max)
    max1 = min_(0, max0 - f7gn)
    return P.taux2 * min_(f7gn, max0) + P.taux3 * min_(f7fn, max1)

def _sofipe(marpac, rbg_int, f7gs, _P):
    '''
    Souscription au capital d’une SOFIPECHE (case 7GS)
    2009-
    '''
    P = _P.ir.reductions_impots.sofipe
    max1 = min_(P.max*(marpac+1), P.base*rbg_int) # page3 ligne 18
    return P.taux*min_(f7gs, max1)

def _cd_ecodev(f6eh, rbg_int, ecodev = law.ir.charges_deductibles.ecodev):
    '''
    Versements sur un compte épargne codéveloppement (case EH de la déclaration
    complémentaire)
    2007-2008
    '''
    max1 = min_(ecodev.taux * rbg_int, ecodev.max)
    return min_(f6eh, max1)

def _cd_cinema(f6aa, rbg_int, cinema = law.ir.charges_deductibles.cinema):
    '''
    Souscriptions en faveur du cinéma ou de l’audiovisuel (case AA de la
    déclaration n° 2042 complémentaire)
    2002-2005
    '''
    max1 = min_(cinema.taux * rbg_int, cinema.max)
    return min_(f6aa, max1)

def _cd_sofipe(f6cc, rbg_int, marpac, sofipe = law.ir.charges_deductibles.sofipe):
    '''
    Souscriptions au capital des SOFIPÊCHE (case CC de la déclaration
    complémentaire)
    2002-2006
    '''
    max1 = min_(sofipe.taux * rbg_int, sofipe.max * (1 + marpac))
    return min_(f6cc, max1)

def _sofipe(marpac, rbg_int, f7gs, _P, P = law.ir.reductions_impots.sofipe):
    """
    Souscription au capital d’une SOFIPECHE (case 7GS)
    2009-2011
    """
    if _P.datesim.year >= 2011:
        return rbg_int * 0
    max1 = min_(P.max * (marpac + 1), P.base * rbg_int)  # page3 ligne 18
    return P.taux * min_(f7gs, max1)

def _preetu_2008_(f7uk, f7vo, f7td, _P):
    '''
    Crédit d’impôt pour souscription de prêts étudiants (cases 7UK, 7VO et 7TD)
    2008-
    '''
    P = _P.ir.credits_impot.preetu

    max1 = P.max * f7vo
    return P.taux * min_(f7uk, P.max) + P.taux * min_(f7td, max1)

def _cd_percap_2003_2006(f6cb, f6da, marpac, _P, percap = law.ir.charges_deductibles.percap):
    '''
    Pertes en capital consécutives à la souscription au capital de sociétés
    nouvelles ou de sociétés en difficulté (cases CB et DA de la déclaration
    complémentaire)
    '''
    max_cb = percap.max_cb * (1 + marpac)
    max_da = percap.max_da * (1 + marpac)
    return min_(min_(f6cb, max_cb) + min_(f6da, max_da), max_da)

def _resimm(f7ra, f7rb, P = law.ir.reductions_impots.resimm):
    '''
    Travaux de restauration immobilière (cases 7RA et 7RB)
    2009-
    '''
    # TODO: add f7rc, f7rd, f7re, f7rf, f7sx, f7sy ... param inserted DONE
    max1 = P.max
    max2 = max_(max1 - f7rb, 0)
    return P.taux_rb * min_(f7rb, max1) + P.taux_ra * min_(f7ra, max2)