' - - File: III_Zero1.txt

' Given the plot of a function, find the zeros of the function.

' STEP 1: First plot the function with the Zero['s commented out.
to = 0.00001                           ' Tolerance to try.
Fc{t} = t^2 - 2^t
H<t> = <t, Fc, 0>     
' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
' STEP 2: From the plot, locate where the curve crosses the x-axis. Write down two values
'                that are about each crossing. (This has been done below.)
' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

' STEP 3:  Insert your estimates and uncomment the Zero[ commands. (Aready done here.)
a = -1  :  b = 0
'Leave z1, z2, & z3 undefined. Zero command will place results in these const. ID.!
Zero[Fc, {a, b, z1}to]            '@1st  zero at @z1!
Zero[Fc,{1, 2.5, z2} to]        '@2nd zero at @z2 !
Zero[Fc,{3.5, 4.2, z3} to]     '@3rd zero at @z3,  Last value!

<t = 1>                                  ' IMPORTANT: any value required to display the zeros.!
' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
' Step 4:   ' Plot[ command last statement on worksheet.!
Plot[H, {t, -6,6,200}]

' On Plot, key 3D --2D; key Display Data --> "Display Select Values"!



