Evaluated proc ti83 {eq x0 x1 {incr 1}} { magic:graph [eqn $eq $x0 $x1] $incr }