sigdig - Erel = abs(Eabs/p); E for i= 1:m+1 if( Erel < 5...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
function [t,Eabs,Erel] = sigdig(p,ph) % % sigdig % m=0; x=1; x while(x+1>x) x=10*x; m=m+1; end; e m=m-1; Eabs = abs(p-ph);
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: Erel = abs(Eabs/p); E for i= 1:m+1 if( Erel < 5 * 10^-i) t=i; end; end;...
View Full Document

This note was uploaded on 09/19/2009 for the course MATH numerical taught by Professor Ford during the Spring '09 term at FAU.

Ask a homework question - tutors are online