TIB: re: maths


[Prev][Next][Index][Thread]

TIB: re: maths




here's a skeleton for it

disp "Original function?"
InpSt fun
St->Eq(fun, y1
disp"Derivitive function?"
InpSt der
St->Eq(der, y1
Input "Test value?", tst
If abs(der1(y1,x,tst)-y2(tst))>.001   	;substitute a different
tolerance for variation 				due to
calculator's method, etc.  here--.001 is
				just a guess
then
Disp "Your derivative is incorrect"
else
disp"Your derivative is correct."
end
stop


I really never thought of doing this...I always plotted graphs to check. 
This should be quicker than that.

-Ben Kalafut

___________________________________________________________________
You don't need to buy Internet access to use free Internet e-mail.
Get completely free e-mail from Juno at http://www.juno.com/getjuno.html
or call Juno at (800) 654-JUNO [654-5866]