stable precision
- To: mathgroup at smc.vnet.net
- Subject: [mg24246] stable precision
- From: pecar at masfak.masfak.ni.ac.yu (Predrag Rajkovic)
- Date: Mon, 3 Jul 2000 20:39:26 -0400 (EDT)
- Organization: The Math Forum
- Sender: owner-wri-mathgroup at wolfram.com
Hello! How can I founded chosen precision through whole programm? I do not want to use every time N[]? In FORTRAN, it can be done by REAL*8, COMPLEX*16. Does such statement exist in Mathematica? For example, I want 10^-32 in next programm. ( f[z_]:=Sin[z]*Log[z+2]-1; x=-1.9;Print[x," ",f[x]]; y=-1.1;Print[y," ",f[y]]; Label[Start]; z=y-(y-x)/(f[y]-f[x])*f[y]; Print[z," ",f[z]]; x=y;y=z; If[Abs[x-y]>10^ -5, Goto[Start] ] )