function girardin(){
var totalpay = 0;
var habit = 0;
var terra = 0;
var defbase = 0;
var ecoannulist = '';

var girardinArray = xmldata( 0, core + 'extend/ext_wsquery.php?swtype=object&objectName=girardinArray' );
girardinArray = girardinArray.split(",")

surcalc = girardinArray[0];
terraMax = girardinArray[1];
coefcal1 = girardinArray[2];
coefcal2 = girardinArray[3];
coefcal3 = girardinArray[4];

totalpay = eval(document.devis.vala.value);
statusmar = eval(document.devis.statype.value);
perchargnb = eval(document.devis.pernb.value);
timp = TotalImpotCalc((totalpay * 0.9),statusmar,perchargnb);

if(totalpay > 0){
	document.getElementById("realcost").innerHTML = "Déduction 10% : " + FormatNumber(totalpay * 0.1) + " \u20AC";
	document.getElementById("baseimpots").innerHTML = "Impots avant défiscalisation : " + timp + " \u20AC";
}

habit = eval(document.devis.surh.value);
terra = eval(document.devis.surt.value);

if(habit > 0){
	defbase = habit * surcalc;
	if(terra > 0){
		if(terra > terraMax)
			terra = terraMax;
		defbase = defbase + (terra * surcalc);
	}
}

probtype = eval(document.devis.habtyp.value);
if(probtype == 1){
	coefcal = coefcal1;
	totaltime = 5;
}	
if(probtype == 2){
	coefcal = coefcal2;
	totaltime = 5;
}
if(probtype == 3){
	coefcal = coefcal3;
	totaltime = 10;
}

deftotal = defbase * coefcal;
	
if(deftotal > timp)
	eco = timp;
else
	eco = deftotal;

if((deftotal > 0) && (timp > 0)){

	for(ynb=0 ; ynb<totaltime ; ynb++){
		ecoannulist = ecoannulist + "- Année N°" + (ynb + 1) + " : " + (eco / totaltime)  + " \u20AC<br />";
	}
	
	document.getElementById("ecoannu").innerHTML = ecoannulist;
	document.getElementById("ecoreal").innerHTML = "Economie total : " + eco + " \u20AC sur " + totaltime + " ans.";
	if(deftotal > eco)
		document.getElementById("ecomax").innerHTML = "Economie maximum possible : " + deftotal + " \u20AC sur " + totaltime + " ans.";
}

}