Solver Plot a graph of any function AND its DOMAIN

Source code of 'Plot a graph of any function AND its DOMAIN'

This Solver (Plot a graph of any function AND its DOMAIN) was created by by ichudov(507)

: View Source, Show, Put on YOUR site
About ichudov: I am not a paid tutor, I am the owner of this web site!

==section input

Plot a graph of a function: *[input function=3*sqrt(x-1)]. 
<A HREF=http://wiki.algebra.com/index.php/Formula_plotting-students TARGET=_blank>Click here to find out how to enter formulas</A> (opens in a separate window).
See the <A HREF=Basics-Of-Functions.lesson>basics of functions lesson</A> for explanation of the concept of the domain.

X from: *[input xmin=-10] to *[input xmax=10]
Y from: *[input ymin=-10] to *[input ymax=10]

==section solution
perl

unless( $xmin =~ /^(\+|-|)\d+(\.\d+)?$/ ) { print "bad format of xmin"; goto EXIT; }
unless( $xmax =~ /^(\+|-|)\d+(\.\d+)?$/ ) { print "bad format of xmax"; goto EXIT; }
unless( $ymin =~ /^(\+|-|)\d+(\.\d+)?$/ ) { print "bad format of ymin"; goto EXIT; }
unless( $ymax =~ /^(\+|-|)\d+(\.\d+)?$/ ) { print "bad format of ymax"; goto EXIT; }

print "
Here's a graph of function {{{$function}}} ($function).

The domain is shown on the x axis by a <FONT COLOR=GREEN SIZE=+1>green horizontal line</FONT>.

{{{graph( 500, 500, $xmin, $xmax, $ymin, $ymax, $function, domain( $function ) )}}}

$result = 1;

EXIT:
==section output
result

==section check
  function=1 xmin=1 xmax=1 ymin=1 ymax=1 result=1