function floor(number)
{
  return Math.floor(number*Math.pow(10,2))/Math.pow(10,2);
}

function dosum()
{
  var mi = document.temps.IR.value / 1200;
  var base = 1;
  var mbase = 1 + mi;
  for (i=0; i<document.temps.YR.value * 12; i++)
  {
	base = base * mbase
  }
  
  var PI = floor(document.temps.LA.value * mi / ( 1 - (1/base)))
  var MT = floor(document.temps.AT.value / 12)
  var MI = floor(document.temps.AI.value / 12)
  
  document.temps.PI.value = isNaN(PI)?0:PI
  document.temps.MT.value = isNaN(MT)?0:MT
  document.temps.MI.value = isNaN(MI)?0:MI
  var dasum = document.temps.LA.value * mi / ( 1 - (1/base)) +
	document.temps.AT.value / 12 + 
	document.temps.AI.value / 12;
  dasum = floor(dasum);
  document.temps.MP.value = isNaN(dasum)?0:dasum
}

function clearMort(form) {
	form.YR.value = "";
	form.AT.value = "";
	form.LA.value = "";
	form.IR.value = "";
	form.AI.value = "";
	
	form.PI.value = "";
	form.MT.value = "";
	form.MI.value = "";
	form.MP.value = "";
}