View of /trunk/NationalProblemLibrary/Rochester/setVectors5Coordinates/urvc_3_7.pg

    1 ## DESCRIPTION
    2 ##   Cylindrical and Spherical Coordinates and Surfaces
    3 ## ENDDESCRIPTION
    4 
    5 ## KEYWORDS('Coordinate', 'Cylindrical', 'Spherical', 'Surface')
    6 ## Tagged by nhamblet
    7 
    8 ## DBsubject('Calculus')
    9 ## DBchapter('Vectors and the Geometry of Space')
   10 ## DBsection('Cylindrical and Spherical Coordinates')
   11 ## Date('5/30/2000')
   12 ## Author('Joseph Neisendorfer')
   13 ## Institution('Rochester')
   14 ## TitleText1('')
   15 ## EditionText1('')
   16 ## AuthorText1('')
   17 ## Section1('')
   18 ## Problem1('')
   19 
   20 DOCUMENT();        # This should be the first executable line in the problem.
   21 
   22 loadMacros(
   23 "PG.pl",
   24 "PGbasicmacros.pl",
   25 "PGchoicemacros.pl",
   26 "PGanswermacros.pl",
   27 "PGauxiliaryFunctions.pl"
   28 );
   29 
   30 TEXT(beginproblem());
   31 $showPartialCorrectAnswers = 0;
   32 
   33 $ml = new_match_list();
   34 $ml -> qa (
   35          "\( \phi = \frac{\pi}{3} \)",
   36    "Cone",
   37    "\( \theta = \frac{\pi}{3} \)",
   38    "Half plane",
   39    "\( \rho = 4 \)",
   40    "Sphere",
   41    "\( r =4 \)",
   42    "Circular Cylinder",
   43    "\( z = r^2 \)",
   44    "Elliptic or Circular Paraboloid",
   45    "\( \rho = 2\cos(\phi ) \)",
   46    "Sphere",
   47    "\( \rho \cos(\phi )= 4\)",
   48    "Plane",
   49    "\( r^2 + z^2 =16 \)",
   50    "Sphere",
   51    "\( r = 2\cos(\theta ) \)",
   52    "Circular Cylinder"
   53 );
   54 $ml ->choose(9);
   55 
   56 BEGIN_TEXT
   57 $PAR
   58 Match the given equation with the verbal description of the surface:
   59 $PAR
   60 \{ $ml -> print_a \}
   61 $PAR
   62 \{ $ml -> print_q \}
   63 
   64 
   65 END_TEXT
   66 
   67 ANS(str_cmp( $ml->ra_correct_ans )   ) ;
   68 
   69 
   70 ENDDOCUMENT();        # This should be the last executable line in the problem.