## DESCRIPTION
## Multivariable differential calculus: answer is an equation for a plane
## ENDDESCRIPTION

## KEYWORDS('multivariable differential calculus', 'answer is an equation for a plane')

## DBsubject('WeBWorK')
## DBchapter('WeBWorK Tutorial')
## DBsection('Fort Lewis Tutorial 2011')
## Date('01/30/2011')
## Author('Paul Pearson')
## Institution('Fort Lewis College')
## TitleText1('')
## EditionText1('')
## AuthorText1('')
## Section1('')
## Problem1('')


####################################
#  Initialization

DOCUMENT();   

loadMacros(
"PGstandard.pl",
"MathObjects.pl",
"parserImplicitPlane.pl",
"parserVectorUtils.pl",
"AnswerFormatHelp.pl",
);     

TEXT(beginproblem());


##################################
#  Set-up

Context("ImplicitPlane");

$A = non_zero_point3D(-5,5,1);
$N = non_zero_vector3D(-5,5,1);

$answer1 = ImplicitPlane($A,$N);

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

$answer2 = ImplicitPlane("4x+3y=12");

$answer3 = ImplicitPlane("x=3");

####################################
#  Main text

Context()->texStrings;
BEGIN_TEXT
(a) Enter an equation for the plane through
the point \( $A \) and perpendicular to
\( $N \).
$BR 
\{ ans_rule(20) \}
\{ AnswerFormatHelp("equations") \}
$BR
$BR
(b) Enter an equation for the line in the
xy-plane with x-intercept \( 3 \) and 
y-intercept \( 4 \).
$BR
\{ ans_rule(20) \}
\{ AnswerFormatHelp("equations") \}
$BR
$BR
(c) Enter an equation for the vertical line 
in the xy-plane through the point \( (3,1) \).
$BR
\{ ans_rule(20) \}
\{ AnswerFormatHelp("equations") \}
END_TEXT
Context()->normalStrings;


#####################################
#  Answer evaluation

$showPartialCorrectAnswers = 1;

ANS( $answer1->cmp() );
ANS( $answer2->cmp() );
ANS( $answer3->cmp() );


#####################################
#  Solution

Context()->texStrings;
BEGIN_SOLUTION
${PAR}SOLUTION:${PAR}
Solution explanation goes here.
END_SOLUTION
Context()->normalStrings;

COMMENT("MathObject version.");

ENDDOCUMENT();