##DESCRIPTION
##  Algebra problem: true or false for inequality
##ENDDESCRIPTION

##KEYWORDS('algebra', 'inequality', 'fraction')

## DBsubject('Algebra')
## DBchapter('Fundamentals')
## DBsection('Real Numbers')
## Date('6/3/2002')
## Author('')
## Institution('')
## TitleText1('Precalculus')
## EditionText1('3')
## AuthorText1('Stewart, Redlin, Watson')
## Section1('1.1')
## Problem1('22')

########################################################################

DOCUMENT();

loadMacros(
"PGstandard.pl",
"MathObjects.pl",
"unionTables.pl",
"AppletObjects.pl",
"parserNumberWithUnits.pl",
"PGcourse.pl",
);

# Print problem number and point value (weight) for the problem
TEXT(beginproblem());

# Show which answers are correct and which ones are incorrect
$showPartialCorrectAnswers = 1;

##############################################################
#
#  Setup
#
#
Context("Numeric")->variables->are(t=>"Real");

$a = random(3,6,1);
$b = random(1,$a-1,1);



$appletName = "ggbApplet";

$applet =  JavaApplet(
code                  => "geogebra.GeoGebraApplet",
archive               => "geogebra.jar",
codebase              => findAppletCodebase("geogebra.jar"),
appletName            => $appletName,
appletId              => $appletName,
submitActionAlias     => 'getXML',  # default getXML
initializeActionAlias => 'setXML',  # default setXML
setStateAlias         => 'setXML',
getStateAlias         => 'getXML',
setConfigAlias        => '',
getConfigAlias        => '',
returnFieldName       => '',
width                 => 504,
height                => 471,
mayscript             => "true",
# 0 = no debug, 1 = xml visible, 2 = add alerts thru applet
debugMode             => 0,
onInit                => 'ggbOnInit',
type                  => 'geogebra',
# paste parameters in section at the bottom
parameter_string      => GEOGEBRA_PARAMS(),
);

$im = image( "graph-a".$a."-b".$b.".png",
width=>486, height=>306, tex_size=>900 );

HEADER_TEXT(
qq!
<script language="javascript">
  function ggbOnInit(param) {
    if (param == "$appletName") {
      applet_loaded(param,1);  // report that applet is ready.
      ww_applet_list[param].safe_applet_initialize(2);
    }
}
</script>
<noscript>For this question to work properly,
you must enable JavaScript, or use another browser
(or computer) on which JavaScript works.</noscript>
!);
##############################################################
#
TEXT( MODES(TeX=>'', HTML=><<END_SCRIPT ) );
<script language="javascript">
function setAppletCoefficients() {
   var applet=getApplet("$appletName"); // alert("Updating coefficients");
   if (typeof(applet)!="undefined") {
     if (typeof(applet.setValue)!="undefined") {

     ////////////////////////////////////////////////////////////////
     //  List the values of the parameters to be set in the applet here

     // Set variables "a" and "b" in GeoGebra to values $c and $d from WebWork
     applet.setValue("a", $a);
     applet.setValue("b", $b);
     applet.setCoordSystem(-2*$a,-$a,2*$a,$a);

     } else {
          setTimeout("setAppletCoefficients()", 1000);
     }
   } else {
      setTimeout("setAppletCoefficients()",1000);
   }
}
ww_applet_list["$appletName"].setConfig = function() {setAppletCoefficients()};
</script>
END_SCRIPT

Context()->texStrings;
BEGIN_TEXT
Van Schooten invented the following device for drawing an ellipse.
\{
$BCENTER.
MODES(HTML=>$applet->insertAll(debug=>0, reinitialize_button=>0,
includeAnswerBox=>0,), TeX=>$im).
$PAR.
"Van Schooten's Ellipse Drawer".
$ECENTER
\}
END_TEXT

Context()->normalStrings;

##############################################################
#
#  Answers
#
#

sub GEOGEBRA_PARAMS {
$result = qq{

# For persistence of applet state when answers are submitted
<param name="ggbOnInitParam" value="$appletName"/>


# The GeoGebra "source code" from GeoGebra ->
# File -> Export -> Dynamic worksheet as Webpage (html)
<param name="ggbBase64" 
value="UEsDBBQACAAIAKp+P0AAAAAAAAAAAAAAAAAWAAAAZ2VvZ2VicmFfamF2YXNjcmlwdC5qc0srzUsuyczPU0hPT/LP88zLLNHQVKjmisrPz/XMi1bQNdJK1IGSIBSrwFXLBQBQSwcIYfi5Si4AAAA0AAAAUEsDBBQACAAIAKp+P0AAAAAAAAAAAAAAAAAMAAAAZ2VvZ2VicmEueG1s1VhZb9w2EH5OfgWhp6TYQ6SOlYLdBD7Q1oCdBLVbpCjyQEm0lrGuitQeQX58h6Sk1Xqd+EgeUsBrXkMOZ+b7Zrg7f7PJM7RiteBlsbDwxLYQK+Iy4UW6sBp5PQ6sN6+fz1NWpiyqKbou65zKheUqSZ4srMALybWd4LHLaAz/ongcOSEex4nnBJGbRImXWAhtBH9VlG9pzkRFY3YZL1lOz8uYSq14KWX1ajpdr9eTTtWkrNNpmkaTjYAD4JqFWFht5xUct7dp7WhxYtt4+uHi3Bw/5oWQtIiZhZQJDX/9/Nl8zYukXKM1T+RyYXmYWGjJeLoEmzw/sNBUCVXgkIrFkq+YgK2DobZZ5pWlxWih1p+ZHsp6cyyU8BVPWL2w7AkJ3ZDgYOZZqKw5K2QrhFtl0+6Y+YqztTlP9bQq10KyLLOIqqPQly+I2MRGI9Vg0xBofN8s2WbOdkxDTOOaxjMyrtnuGlHXyLhGxnUstOKCRxlbWNc0E+A6XlzXELZ+LOQ2Y/o+7cTObDwCmwT/DMKODfgwvoZ52x6pjw8fVy1M943E/neqJZ1agr2d2pkXjvxw5NnuyMPBodaBUlk3j9TZaYTTH24o+S47nU4n9vChTuLdrdP5llJj906nGd9hJvYG8QRN+k9/DhT67iMUft2x92mcTzu6zFuGILFUsm0sJcuF4owTIi9EX5Db7eNF1cg92ThPuq4sq/5SIA3k3HHfkHUvNTybZzRiGWTLS2USQiuaqTBrRddlIVEHTNvMpTWtljwWl0xK2CXQJ7qi51Syza8gLTrdWjYuC/G+LuVJmTV5IRCKy8zu71xmeNAn/a1h4AwW3OGCN1jwB/3ZnXpLWEGNYKC/rEUnTpPkTEnsEAuefFdk2+Oa0Zuq5PtmzKc68c5ZE2c84bT4C6KmtCi/oD4PKxZ1edgJne4iZZ1cbgWEEm0uOKBjTCiUgAu6AY9Cb2smdU/NUbOPrXr30g3rb57WCp7trdXgTByXWR96ffUTWsmm1tUP6FarCx0VacZ0eDU6obTEN1G5uTQodcxRV9sKRm2Qo1S7DAG+iQcJKW3byLRaRl2sl7K1jK0leqDwpF/HIdESuo1Mq6UAeeZqraG4sxLbnRouNCttaw/yGraqUDUFl+fdQPL4Zmepkn/b5BHbBV8JnHJTVcGYyW0t+Edo6e2HKirkh/ZZovp/D/pXSyapqq8ecbwwmM08+E/CIDCou4W3+Q2rC5a18AZsNGUjDFsHyE9YzHMY7tGYqvj/CQaY2YSlNWvlaaafKiYCetUeIvdgWh/1a13mZ8XqCsB16wLzaXfLuYhrXikIowhy4w3bARdsp5Bak+E+xUdwXaxSKLhXKtcCUxu5LAE9v9EI3h0ZRX9M0CVEbskFHAM5B4T05jynRYIKnaDPCgmRgARn7XIlhayzOdqobRSSzlZ3tUFlIzuBI2NBe5pifMZyeO0gqamh2dUj4kifrkKPyugTaLuFmEFMYL3ngSotqWki09CsWmoUtB7O6JbVez7XJ16UyR0BEmhjtqItZBHd+WwQZl6B6sqK5manM5y9FVrAm7H2wO6iyVnN494yqi2HnU273+vU7Xmjq4vfdMd+2tj5Aj/QF7hDJYBeQwcybWVIWTFm6CzbxIYqOE7nxQFcH2p0dNto8tMZrQ54vNn73HmvMb7PmxNexxn752iE6McDzhw/hjPH93BmlzuH7sLEFCDdtgXoyax5AFLwwGW7G+3o5kwcOwhdxyPYmdlh4Lqafc5k5gauR2zPxr4zmxH/yVwEbVDE1SX13GlNU3RxT+QuWarmb8XuyOS744O4xd+Om2hP6yITPy3bfQ3pT05147u8vL07Jp+HmvpXhoS36w18WxX6u0xPEtX5nScJK3p+sX8Ls0WYSs/zKuMxl70vM4WRvtpAuA7L8Q1jlXpYvSuualoI9duDkemAtZeBNlUNF1Nxb916YiGYXFgvCPoFbV4cvxwh+6W1z63pPaQ7+XkKlT/x8SwIZvCdfebi0A917H5U1XoIH44NH04O+JA8jg/JT8KHx9FhTNxJYPuBQ4jnYBw44ex/RI+HvfLaanU8QtFHE+zkINinZuExpev0SaVL/cqhKpfnfG/IZU1jtu+bIQ7cie8QgEFIwhCHzizQMCAT4ob2DBPHBhAQ33F/CNGmw8e6/n7c/uD5+j9QSwcI2X0uwl8GAACNFQAAUEsBAhQAFAAIAAgAqn4/QGH4uUouAAAANAAAABYAAAAAAAAAAAAAAAAAAAAAAGdlb2dlYnJhX2phdmFzY3JpcHQuanNQSwECFAAUAAgACACqfj9A2X0uwl8GAACNFQAADAAAAAAAAAAAAAAAAAByAAAAZ2VvZ2VicmEueG1sUEsFBgAAAAACAAIAfgAAAAsHAAAAAA==" 
/>
	<param name="image" value="http://www.geogebra.org/webstart/loading.gif" />
	<param name="boxborder" value="false" />
	<param name="centerimage" value="true" />
	<param name="java_arguments" value="-Xmx512m -Djnlp.packEnabled=true" />
	<param name="cache_archive" value="geogebra.jar, geogebra_main.jar, geogebra_gui.jar, geogebra_cas.jar, geogebra_algos.jar, geogebra_export.jar, 
geogebra_javascript.jar, jlatexmath.jar, jlm_greek.jar, jlm_cyrillic.jar, geogebra_properties.jar" />
	<param name="cache_version" value="4.0.20.0, 4.0.20.0, 4.0.20.0, 4.0.20.0, 4.0.20.0, 4.0.20.0, 4.0.20.0, 4.0.20.0, 4.0.20.0, 4.0.20.0, 4.0.20.0" />
	<param name="showResetIcon" value="false" />
        <param name="framePossible" value="true">
	<param name="showAnimationButton" value="true" />
	<param name="enableRightClick" value="false" />
	<param name="errorDialogsActive" value="true" />
	<param name="enableLabelDrags" value="false" />
	<param name="showMenuBar" value="true" />
	<param name="showToolBar" value="true" />
        <param name=customToolBar value="0 | 40">
	<param name="showToolBarHelp" value="false" />
	<param name="showAlgebraInput" value="true" />
	<param name="useBrowserForJS" value="true" />
	<param name="allowRescaling" value="true" />
};
}


COMMENT('MathObject version.  Uses GeoGebra applet.');

ENDDOCUMENT();