Choisir la franchise :

300

1500

2500

Choisir la franchise :

0

300

600

Choisir votre classe d'âge :

Adulte

Enfant

Rappel : le choix de l'assureur ne dépend pas que de la prime payée !

Franchise

Franchise

Enfant

(sans acc)

(avec acc)

Franchise

Prime maximale (GE)

Prime minimale (GE)

Ma prime

Adulte

Coûts de santé

Coûts payés

Source : asdfkléasdf

concordia

Enfant

(sans acc)

(avec acc)

Franchise

Prime maximale (GE)

Prime minimale (GE)

Ma prime

Adulte

Source : asdfkléasdf

concordia

C10: 442.800000000001
C9: 493.300000000001
C8: 554.100000000001
B8 = 300
C5: 122.7
C4: 140.2
B4 = 300
D9: 417.2
B9 = 1500
D10: 362.9
B10 = 2500
D3: 114.1
B3 = 0
D5: 79.1000000000001
D4: 96.6000000000001
quotepart: 700
adulte = 1 (slider from -5 to 5, step 1)
enfant: 0
C3: 157.7
p_1: C8
p_2: C9
p_3: C10
f_1: B8
f_2: B9
c_1(x) = If[0 ≤ x ≤ f_1, (12 * p_1) + x, If[f_1 ≤ x ≤ f_1 + (10 * quotepart), (12 * p_1) + f_1 + (0.1 * (x - f_1)), If[f_1 + (10 * quotepart) ≤ x ≤ 10000, (12 * p_1) + f_1 + quotepart]]]
c_2(x) = If[0 ≤ x ≤ f_2, (12 * p_2) + x, If[f_2 ≤ x ≤ f_2 + (10 * quotepart), (12 * p_2) + f_2 + (0.1 * (x - f_2)), If[f_2 + (10 * quotepart) ≤ x ≤ 10000, (12 * p_2) + f_2 + quotepart]]]
c1 = 1
c2 = 1
c3 = 0
B3_1 = 0
B5 = 600
f_3: B10
c_3(x) = If[0 ≤ x ≤ f_3, (12 * p_3) + x, If[f_3 ≤ x ≤ f_3 + (10 * quotepart), (12 * p_3) + f_3 + (0.1 * (x - f_3)), If[f_3 + (10 * quotepart) ≤ x ≤ 10000, (12 * p_3) + f_3 + quotepart]]]
A = Intersect(c_1, c_2, 0, 10000)
B = Intersect(c_1, c_3, 0, 10000)
E3: 194
E4: 176.5
E5: 159
D8: 482.300000000001
E8: 718.900000000001
E9: 653.800000000001
E10: 599.600000000001
f(x) = (If[0 ≤ x ≤ f_2, (12 * p_2) + x, If[f_2 ≤ x ≤ f_2 + (10 * quotepart), (12 * p_2) + f_2 + (0.1 * (x - f_2)), If[f_2 + (10 * quotepart) ≤ x ≤ 10000, (12 * p_2) + f_2 + quotepart]]] * c_2(x))
p_1min: D8
p_2min: D9
c_{1-min}(x) = If[0 ≤ x ≤ f_1, (12 * p_1min) + x, If[f_1 ≤ x ≤ f_1 + (10 * quotepart), (12 * p_1min) + f_1 + (0.1 * (x - f_1)), If[f_1 + (10 * quotepart) ≤ x ≤ 10000, (12 * p_1min) + f_1 + quotepart]]]
c_{2-min}(x) = If[0 ≤ x ≤ f_2, (12 * p_2min) + x, If[f_2 ≤ x ≤ f_2 + (10 * quotepart), (12 * p_2min) + f_2 + (0.1 * (x - f_2)), If[f_2 + (10 * quotepart) ≤ x ≤ 10000, (12 * p_2min) + f_2 + quotepart]]]
p_3min: D10
p_1max: E8
p_2max: E9
p_3max: E10
c_{1-max}(x) = If[0 ≤ x ≤ f_1, (12 * p_1max) + x, If[f_1 ≤ x ≤ f_1 + (10 * quotepart), (12 * p_1max) + f_1 + (0.1 * (x - f_1)), If[f_1 + (10 * quotepart) ≤ x ≤ 10000, (12 * p_1max) + f_1 + quotepart]]]
c_{3-max}(x) = If[0 ≤ x ≤ f_3, (12 * p_3max) + x, If[f_3 ≤ x ≤ f_3 + (10 * quotepart), (12 * p_3max) + f_3 + (0.1 * (x - f_3)), If[f_3 + (10 * quotepart) ≤ x ≤ 10000, (12 * p_3max) + f_3 + quotepart]]]
c_{2-max}(x) = If[0 ≤ x ≤ f_2, (12 * p_2max) + x, If[f_2 ≤ x ≤ f_2 + (10 * quotepart), (12 * p_2max) + f_2 + (0.1 * (x - f_2)), If[f_2 + (10 * quotepart) ≤ x ≤ 10000, (12 * p_2max) + f_2 + quotepart]]]
c_{3-min}(x) = If[0 ≤ x ≤ f_3, (12 * p_3min) + x, If[f_3 ≤ x ≤ f_3 + (10 * quotepart), (12 * p_3min) + f_3 + (0.1 * (x - f_3)), If[f_3 + (10 * quotepart) ≤ x ≤ 10000, (12 * p_3min) + f_3 + quotepart]]]
C = Intersect(c_3, c_2, 0, 10000)
C' = Intersect(c_{2-min}, c_{3-min}, 0, 10000)
A' = Intersect(c_{1-min}, c_{2-min}, 0, 10000)
B' = Intersect(c_{1-min}, c_{3-min}, 0, 10000)
texte8: "A=" + A + ""
texte9: "A'=" + A' + ""
texte10: "B=" + B + ""
texte11: "B'=" + B' + ""
texte12: "C=" + C + ""
texte13: "C'=" + C' + ""
economie_2: c_2(0) - c_{2-min}(0)
economie_1: c_1(0) - c_{1-min}(0)
economie_3: c_3(0) - c_{3-min}(0)
texte14: "Economie_{300}(0) = " + economie_1 + ""
texte15: "Economie_{1500}(0) =  " + economie_2 + ""
texte16: "Economie_{2500}(0) =  " + economie_3 + ""