function Lcalc(p){
	if(p<0){
		parent.frames.simFrame1.L.innerHTML = "*";
		parent.frames.simFrame1.M.innerHTML = "-";
		parent.frames.simFrame1.N.innerHTML = "-";
	return;
	}else if(p==0){
		parent.frames.simFrame1.L.innerHTML = 1;
		parent.frames.simFrame1.M.innerHTML = 0;
		parent.frames.simFrame1.N.innerHTML = 2;
	return;
	}
	var L = 0;
	var Lp = 0;
	var m;
	var n;
	while(Lp<=p){
		L++;
		if(L<100)
			Lp = (L+2)*(L-1)/2;
		if(100<=L)
			Lp = (L-100)*100 + 5049;
	}
	L--;
	if(L<100)
		Lp = (L+2)*(L-1)/2;
	if(100<=L)
		Lp = (L-100)*100 + 5049;
	m = p - Lp;
	if(L>=100)n=100;else n=L+1;
	parent.frames.simFrame1.L.innerHTML = L;
	parent.frames.simFrame1.M.innerHTML = m;
	parent.frames.simFrame1.N.innerHTML = n;
	return;
}
