From 8f08e620afdee163a5de007e882abdd72e2b39f9 Mon Sep 17 00:00:00 2001
From: Danny Glin <dlglin@ucalgary.ca>
Date: Fri, 9 Dec 2022 13:34:21 -0700
Subject: [PATCH] Convert problem to MathObjects and PGML

---
 .../set6_pr3.pg                               | 24 +++++++------------
 1 file changed, 8 insertions(+), 16 deletions(-)

diff --git a/OpenProblemLibrary/Utah/Calculus_II/set6_Indeterminate_Forms_and_Improper_Integrals/set6_pr3.pg b/OpenProblemLibrary/Utah/Calculus_II/set6_Indeterminate_Forms_and_Improper_Integrals/set6_pr3.pg
index ce64b59b91..90abade164 100644
--- a/OpenProblemLibrary/Utah/Calculus_II/set6_Indeterminate_Forms_and_Improper_Integrals/set6_pr3.pg
+++ b/OpenProblemLibrary/Utah/Calculus_II/set6_Indeterminate_Forms_and_Improper_Integrals/set6_pr3.pg
@@ -18,30 +18,22 @@ DOCUMENT();        # This should be the first executable line in the problem.
 
 loadMacros(
   "PGstandard.pl",
-  "PGchoicemacros.pl",
+  "MathObjects.pl",
+  "PGML.pl",
+  "AnswerFormatHelp.pl",
   "PGcourse.pl"
 );
 
 TEXT(beginproblem());
 $showPartialCorrectAnswers = 1;
-$pi = 3.141592654;
 
-TEXT(EV2(<<EOT));
+Context("Numeric");
+$ans = Compute("infinity");
 
+BEGIN_PGML
 Find the following limit using l'Hopital's Rule:
 
-\[ \lim_{x \rightarrow 0^{+}} \dfrac{\int_{0}^{x} \sqrt{t}\,\cos t\; dt}{x^{2}} \]
-
-$PAR
-
-Answer: \{ans_rule(80)\}.
-
-$PAR Enter the word "infinity" if the answer is \(\infty\).
-
-EOT
-
-$ans = "infinity";
-ANS(str_cmp($ans));
-#ANS(fun_cmp($ans, mode=>"antider", vars=>"t"));
+[`` \lim_{x \rightarrow 0^{+}} \dfrac{\int_{0}^{x} \sqrt{t}\,\cos t\; dt}{x^{2}} = ``][_]{$ans} [@ AnswerFormatHelp('limits')@]*
+END_PGML
 
 ENDDOCUMENT();        # This should be the last executable line in the problem.