Introduction
This program plots the slope field for the differential equation in the
form .
If you have not used one of the programs posted on this website before,
you should read through
the information in the Intro to Programming
section first.
The Program
:ClDrw | {ClDrw is in GRAPH under Draw} |
:FnOff | {FnOff is in GRAPH under Vars} |
:7*(xMax-xMin)/83![]() |
{xMax, xMin are in GRAPH under Range} {The arrow is STO} |
:7*(yMax-yMin)/55![]() |
{yMax, yMin are in GRAPH under Range} |
:1/(0.4*H)^2![]() |
|
:1/(0.4*K)^2![]() |
|
:xMin+0.5*H![]() |
{x is x-VAR} |
:yMin+0.5*K![]() |
|
:1![]() |
{The 1 is a one} |
:Lbl P | {Lbl is in PRGM under CTL} |
:1![]() |
|
:Z![]() |
{y is in GRAPH under Vars} |
:Lbl Q | |
:y1![]() |
{y1 is in VARS under EQU} |
:1/![]() ![]() |
![]() |
:T*C![]() |
|
:Line(x-C,y-S,x+C,y+S) | {Line is in GRAPH under Draw} |
:Z+J*K![]() |
|
:IS>(J,8) | {IS> if in PRGM under CTL} |
:Goto Q | {Goto is in PRGM under CTL} |
:x+H![]() |
|
:IS>(L,12) | |
:Goto P |
Running the Program
You will need to enter a function f(x,y) into y1 and adjust the RANGE accordingly
before running the program. You can use the x and y shown in the
GRAPH menu.