function calcule() {
	var s = document.frm.n.value
	s = s.replace(/^\s+/,"")
	s = s.replace(/\s+$/,"")
	s = s.replace(/[^0-9]/g,"")
	s = s.replace(/^0+/,"")
	if(s!="") {
		n = parseInt(s)
		prpr(n)
	}
}
function prpr(n) {
	var a = [], t=[];
	a[0] = t[0] = n
	document.HAR.harm(n)
	var quotient = 1.0
	for(z=2; z<=n; z++) {
		quotient += 1.0/z
	}
	var squot = quotient+""
	squot= squot.substr(0,14);
	// var q = document.HAR.getQuot()+""
	a[1] = document.HAR.getNum()+""
	a[2] = document.HAR.getDen()+""
	//a[3] = " "+document.HAR.getQuot()
	var efin="&thinsp;";  //"&#8201;" "&ensp;"
	for(var i=1; i<=2; i++) {
		var l= a[i].length 
		var ls = l % 3
		t[i]=""
		if(ls>0) {
			t[i] = ((ls==1)?"&nbsp;&nbsp;":(ls==2)?"&nbsp;":"")+a[i].substr(0,ls)+efin
		}
		for(var j=ls; j< l; j+=3) {
			t[i] += a[i].substr(j,3) + efin
		}
	}
	var st = "Le nombre harmonique H<sub><code>"+t[0]+"</code></sub> a pour numérateur et dénominateur"+
		"<br />"+
		"<strong>Numérateur de H<sub><code>"+t[0]+"</code></sub> :</strong><br />" + 
		"<code>"+t[1]+"</code>"+
		"<br /><br />"+
		"<strong>Dénominateur de H<sub><code>"+a[0]+"</code></sub> :</strong>" +
		"<br />"+
		"<code>"+t[2]+"</code>"+	
		"<br /><br />" +
		"Le nombre de chiffres du numérateur est <code>"+a[1].length+"</code>, celui du dénominateur est <code>"+a[2].length+"</code>." +
		"<br />" +
	 	" H<sub><code>"+t[0]+"</code></sub> a une valeur proche de <code>"+ squot +"</code>" +
		"<br />"
	var lim = 120
	if(a[0]<=lim) st = st+"<br><br>$\\displaymath H_{"+a[0]+"} = \\frac{"+a[1]+"}{"+a[2]+"}="+squot+"\\ldots$"
	document.getElementById("nbHarm").innerHTML =st
	if(a[0]<=lim) replaceMath( document.body );
}

function suit(k) {
	var s = document.frm.n.value
        s = s.replace(/^\s+/,"")
        s = s.replace(/\s+$/,"")
        s = s.replace(/[^0-9]/g,"")
        s = s.replace(/^0+/,"")
	var n = parseInt(s)+k
	if(n<1) {
		n=1
	}
	document.frm.n.value = n
	prpr(n)
}
function hasard() {
	efface()
	var n = 1+Math.floor(5000*Math.random());
	document.frm.n.value = n
	prpr(n)
}

function efface() {
	document.frm.n.value = 1
	document.getElementById("nbHarm").innerHTML = ""
}