function check(ad)
{
	var ch=ad.value;
	if(isNaN(ch))
	{
		var df=ch.substring(0,(ch.length-1));
		ad.value=df;
	}	
}

function cal(N,n,k,x)
{
	
	var j=((N-k)-(n-x));
	
	//(N-k)!
	var c=N-k;
	var a=1;
	for(g=c;g>=1;g--)
	{
		a=a*g;
	}
	//[(N-k)-(n-x)]!	
	var e=1;
	for(s=j;s>=1;s--)
	{
		e=e*s;
	}
	//(n-x)!
	var d=n-x;
	var m=1;
	for(p=d;p>=1;p--)
	{
		m=m*p;
	}
	var per=e*m;
	var gg=a/per;


	//k!	
	var f=1;
	for(y=k;y>=1;y--)
	{	
		f=f*y;
	}
	//(k-x)!	
	var b=1;
	for(z=k-x;z>=1;z--)
	{
		b=b*z;	
	}
	//x!
	var t=1;
	for(r=x;r>=1;r--)
	{	
		t=t*r;
	}
	var com=b*t;
	var hh=f/com
	var gem=hh*gg;
	
	//N!
	var w=1;
	for(u=N;u>=1;u--)
	{
		w=w*u;
	}
	//(N-n)!
	var i=N-n;
	var cc=1;
	for(ss=i;ss>=1;ss--)
	{
		cc=cc*ss;
	}
	//n!
	var ff=1;
	for(q=n;q>=1;q--)
	{
		ff=ff*q;
	}
	var opr=cc*ff;
	var pp=w/opr;
	var res=Math.round((gem/pp)*1000)/1000;
return res;
}

function cml()
{
	var p=parseInt(document.hyp.ps.value);
	var n=parseInt(document.hyp.ss.value);
	var k=parseInt(document.hyp.np.value);
	var x=parseInt(document.hyp.ns.value);

	if(p>n && k>x)
	{
	var hh=cal(p,n,k,x);
	document.hyp.hd.value=hh;

	var rr=0;
	for(yy=x;yy>=0;yy--)
	{
		rr=rr+cal(p,n,k,yy);
	}
	
	document.hyp.cd.value=Math.round((rr)*1000)/1000;
	}
	else if(n>p)
	{
	alert("Sample size should be less than population size");
	}
	else if(x>k)
	{
	alert("Number of success in sample should be less than number of success in population");
	}
}