[WWcvs] pg: Fix up comments

[dpvc v. a. <we...@ma...>]

Log Message:
-----------
Fix up comments

Modified Files:
--------------
    pg/macros:
        parserFormulaUpToConstant.pl

Revision Data
-------------
Index: parserFormulaUpToConstant.pl
===================================================================
RCS file: /webwork/cvs/system/pg/macros/parserFormulaUpToConstant.pl,v
retrieving revision 1.22
retrieving revision 1.23
diff -Lmacros/parserFormulaUpToConstant.pl -Lmacros/parserFormulaUpToConstant.pl -u -r1.22 -r1.23
--- macros/parserFormulaUpToConstant.pl
+++ macros/parserFormulaUpToConstant.pl
@@ -139,10 +139,10 @@
     unless $n->isConstant;
   #
   #  Make a version with adaptive parameters for use in the
-  #  comparison later on.  We could like n0*C, but already have $n
-  #  copies of C, so remove them.  That way, n0 will be 0 when there
+  #  comparison later on.  We could like n00*C, but already have $n
+  #  copies of C, so remove them.  That way, n00 will be 0 when there
   #  are no C's in the student answer during the adaptive comparison.
-  #  (Again, should really check that n0 is not in use already)
+  #  (Again, should really check that n00 is not in use already)
   #
   my $n00 = $context->variables->get("n00");
   $context->variables->add(n00=>'Parameter') unless $n00 and $n00->{parameter};
@@ -175,7 +175,7 @@
   $r = $r->substitute($r->{constant}=>$l->{constant}) unless $r->{constant} eq $l->{constant};
 
   #
-  #  Compare with adaptive parameters to see if $l + n0 C = $r for some n0.
+  #  Compare with adaptive parameters to see if $l + n00 C = $r for some n0.
   #
   my $adapt = $l->adapt;
   my $equal = Parser::Eval(sub {$adapt == $r});
@@ -185,7 +185,7 @@
   $_[1]->{test_values} = $r->{test_values};            # save these in student answer for diagnostics
   return -1 unless $equal;
   #
-  #  Check that n0 is non-zero (i.e., there is a multiple of C in the student answer)
+  #  Check that n00 is non-zero (i.e., there is a multiple of C in the student answer)
   #  (remember: return value of 0 is equal, and non-zero is unequal)
   #
   return abs($context->variables->get("n00")->{value}) < $context->flag("zeroLevelTol");