function invnormalv(ywert,muewert,sigmawert)
  { 	
       y=eval(ywert);
       mue=eval(muewert);
       sigma=eval(sigmawert);   
       if (eval(sigma)<=0) return "Error: Sigma<=0 !";
       if (eval(sigma)>0)
        {
        var   A0 =   2.50662823884;
	var   A1 = -18.61500062529;
	var   A2 =  41.39119773534;
        var   A3 = -25.44106049637;
        var   B1 =  -8.47351093090;
	var   B2 =  23.08336743743;
	var   B3 = -21.06224101826;
        var   B4 =   3.13082909833;
        var   C0 =  -2.78718931138;
        var   C1 =  -2.29796479134;
	var   C2 =   4.85014127135;
        var   C3 =   2.32121276858;
        var   D1 =   3.54388924762;
	var   D2 =   1.63706781897;
	var P;
        var Q;
        var R;
        var PPND;
        var DXN;				

		P = eval(y);
                if ((P<=0) || (P>=1)) return "Error F(x)!";
                if ((P>0) && (P<1)) 
                {
		Q = P - 0.5;
		if (Math.abs(Q) <= 0.42) 
			{
                        R = Q * Q;
			PPND = Q * (((A3*R + A2)*R + A1)*R + A0) / ((((B4*R + B3)*R + B2)*R + B1)*R + 1);
			DXN = PPND;
                        }
		if (Math.abs(Q)>0.42)
                        {
			R = eval(y);
			if (Q > 0)  R = 1 - eval(y);
			R = Math.pow(-Math.log(R),0.5);
			PPND = (((C3*R+C2)*R+C1)*R+C0) / ((D2*R+D1)*R+1);
			if (Q < 0) PPND = -PPND;
			DXN = PPND;
                        }
		return  (DXN *eval(sigma) + eval(mue));
                };
        }} 


   
 
function invNorm(){
  var applet = document.ggbApplet;
  var opp=eval(document.INV.opp.value);
  var M =eval(document.INV.M.value);
  var S =eval(document.INV.S.value);  
  var Z = 0.0;
  
  if (opp <0 || opp >1) return;
  Z  = invnormalv(opp,0,1);
  var strInput = "M = " + M;
  applet.evalCommand(strInput);
  strInput = "S = " + S;
  applet.evalCommand(strInput);
  strInput = "Z =  " + Z;
  applet.evalCommand(strInput);
  strInput = "O =  " + opp;
  applet.evalCommand(strInput);  
  
}

function normalcdf(){
  var applet = document.ggbApplet;
  var L = document.TABEL.L.value;
  var R = document.TABEL.R.value;
  var M =eval(document.TABEL.M.value);
  var S =eval(document.TABEL.S.value);  
  var zl = -8;
  var zr = 8;

 
  if (L == "-10^99" || L == "-10e99") L = -10000;
  if (R == "10^99" || R == "10e99") R = 10000;
  
   
  if (L > R) return;
  zl = (L-M)/S;
  if (zl<-8) zl = -8;
  zr = (R-M)/S;
  if (zr>8) zr = 8;
  
  var strInput = "L = " + L;
  applet.evalCommand(strInput);
  var strInput = "R = " + R;
  applet.evalCommand(strInput);
  var strInput = "M = " + M;
  applet.evalCommand(strInput);
  strInput = "S = " + S;
  applet.evalCommand(strInput);
  strInput = "z_L = " + zl;
  applet.evalCommand(strInput);
  strInput = "z_R = " + zr;
  applet.evalCommand(strInput);

  
  
}