DOCUMENT();
loadMacros(
"PGstandard.pl",
"MathObjects.pl",
"PGML.pl",
"contextFraction.pl",
"contextLimitedRadical.pl",
"PGcourse.pl",
"parserRoot.pl",
);
######################################
TEXT(beginproblem());
Context("Numeric");
$b=4;
$c=-3;
$d = Compute("$b+$c");
Context("LimitedRadical");
$ans = Formula("$d*sqrt($a)");
##########################################
#####################################################
BEGIN_PGML
Simplify the radical.
[`` [$b]\sqrt{[$a]} + [$c]\sqrt{[$a]} = ``] [_____________]{$ans1}
END_PGML
############################################################
######################################
ENDDOCUMENT();