val epsilon             =  0.0000000001;   (* = 1E~10 *)

fun fehler(x,w)         =  ;

fun verbesserung(x,w)   =  ;

fun iterationswert(x,w) =  ;

fun wurzel(x)           =  iterationswert(x, 1.0);