Log Message:
-----------
Fixed problem with recognizing MINF in NUM_CMP.
Modified Files:
--------------
pg/macros:
PGanswermacros.pl
Revision Data
-------------
Index: PGanswermacros.pl
===================================================================
RCS file: /webwork/cvs/system/pg/macros/PGanswermacros.pl,v
retrieving revision 1.36
retrieving revision 1.37
diff -Lmacros/PGanswermacros.pl -Lmacros/PGanswermacros.pl -u -r1.36 -r1.37
--- macros/PGanswermacros.pl
+++ macros/PGanswermacros.pl
@@ -1078,7 +1078,8 @@
#
if ($num_params{strings}) {
foreach my $string (@{$num_params{strings}}) {
- my %tex = ($string =~ m/(-?)inf(inity)?/i)? (TeX => "$1\\infty"): ();
+ my %tex = ($string =~ m/^(-?)inf(inity)?$/i)? (TeX => "$1\\infty"): ();
+ %tex = (TeX => "-\\infty") if uc($string) eq "MINF";
$context->strings->add(uc($string) => {%tex});
}
}
|
