// asAtDate must be a string of type yyyymmdd
	// function returns price, or -1 if out of range
	function getHistoricalIAGPAPrice(asAtDate)
	{
		var count = wlIAGPADateArr.length;
		var date = parseInt(asAtDate);
		if (date > wlIAGPADateArr[count-1] || date < wlIAGPADateArr[0])
			return -1;
		
		var lower = 0;
		var upper = count-1;
		var index = parseInt(upper/2);
		var curDate;

		// binary search for date
		while(upper - lower > 1)
		{
			curDate = wlIAGPADateArr[index];
			if (curDate == date)
				return wlIAGPAPriceArr[index];
			if (curDate > date)
				upper = index;
			else
				lower = index;
			index = parseInt((upper+lower)/2);
		}
		// Make sure that what we've found is actually the right day.
		if (wlIAGPADateArr[lower] == date) {
			return wlIAGPAPriceArr[lower];
		} 
		else if(wlIAGPADateArr[count-1] == date)
		{
		    return wlIAGPAPriceArr[count-1];
		}
		else {
			return -1;
		}
	}
	
    function showHistoricalIAGPAPrice() {
		var f = document.forms.HistoricalIAGPADataForm;
		var d = ("00" + f.day.value).slice(-2);
		var m = ("00" + f.month.value).slice(-2);
		var y = ("0000" + f.year.value).slice(-4);

		if (isNaN(parseInt(d))
			|| isNaN(parseInt(m))
			|| isNaN(parseInt(y))) {

			alert("Please enter a date in dd/mm/yyyy format");
			return;
		}

		var price = parseFloat(getHistoricalIAGPAPrice(y + m + d))
		if (price.toFixed != null) { price = price.toFixed(2); }
		var msg = "On " + d + "/" + m + "/" + y + " the price was $" + price;

		if (price > -1) {
			alert(msg);
		} else {
			alert("No price information on that date");
		}
	}