Bug fix in evaluate

phil-ramsden · phil-ramsden · commit dac30dc8a12e · 2026-01-13T15:49:19.000Z
diff --git a/evaluate.m b/evaluate.m
@@ -162,7 +162,7 @@
 
 equalQStructure[answer_String, response_String, params_Association] := Module[{namedVariables,correctQ},
   Print["Evaluating Structure"];
-	namedVariables = FullForm[ToExpression[Lookup[params,"named_variables",{}],TraditionalForm]];
+	namedVariables = ToExpression[Lookup[params,"named_variables",{}],TraditionalForm];
 	correctQ = StructureMatchQ[
 		ToString[ToExpression[StandardizeEquation[answer],TraditionalForm],InputForm],
 		response,
