DOCUMENT();

loadMacros('PGstandard.pl', 'PGML.pl', 'parserSolutionFor.pl', 'PGcourse.pl');

Context('Vector')->variables->are(x => 'Real', y => 'Real');

$f = SolutionFor("x^2 = cos(y)", "(1, 0)");
#$f = SolutionFor("x^2 - y = 0", [ 2, 4 ]);
#$f = SolutionFor("x^2 - y = 0", Point(4, 2), vars => [ 'y', 'x' ]);

BEGIN_PGML
A solution to [`[@ $f->{f} @]`] is [`(x, y) =`] [___]{$f}
END_PGML

BEGIN_PGML_SOLUTION
Solution explanation goes here.
END_PGML_SOLUTION

ENDDOCUMENT();