refactor:Minor refactoring to prepare for using templates for differe…

…nt programming languages.

Misc/ComputationalSpecCompletion.m

@@ -95,7 +95,7 @@ Mathematica is (C) Copyright 1988-2021 Wolfram Research, Inc.
 (* Stencils                                                *)
 (***********************************************************)
 
-aTemplates = <|
+aWLTemplates = <|
   "QuantileRegression" ->
       StringTemplate[
         "Module[{qrData,aQRFuncs,aQRPlotData},
@@ -107,7 +107,7 @@ Mathematica is (C) Copyright 1988-2021 Wolfram Research, Inc.
 Echo[ListPlot[Values[aQRPlotData], Joined -> Prepend[Table[True, Length[aQRPlotData]-1], False], PlotLegends -> Keys[aQRPlotData], PlotTheme -> \"Detailed\", FrameLabel -> {\"Regressor\", \"Value\"}, ImageSize -> Medium],\"regression quantiles:\"];
 Echo[Map[Function[{qFunc},
   DateListPlot[
-    Map[{#[[1]], (qFunc[#[[1]]] - #[[2]])/#[[2]]} &, qrData], Joined -> False, PlotRange -> All, Filling -> Axis, PlotTheme -> \"Detailed\", ImageSize -> Large]], aQRFuncs],\"errors:\"];
+    Map[{#[[1]], (qFunc[#[[1]]] - #[[2]])/#[[2]]} &, qrData], Joined -> False, PlotRange -> All, Filling -> Axis, PlotTheme -> \"Detailed\", ImageSize -> Medium]], aQRFuncs],\"errors:\"];
     ]"],
 
   "QRMon" ->
@@ -526,7 +526,7 @@ Mathematica is (C) Copyright 1988-2021 Wolfram Research, Inc.
 
 ComputationalSpecCompletion["Data"] :=
     <|
-      "Templates" -> aTemplates,
+      "Templates" -> aWLTemplates,
       "Questions" -> aQuestions,
       "Defaults" -> aDefaults,
       "Shortcuts" -> aShortcuts
@@ -577,7 +577,7 @@ Mathematica is (C) Copyright 1988-2021 Wolfram Research, Inc.
         Return[$Failed]
       ];
 
-      ToExpression["Hold[" <> aTemplates[workflowType][Join[aDefaults[workflowType], aRes]] <> "]"]
+      ToExpression["Hold[" <> aWLTemplates[workflowType][Join[aDefaults[workflowType], aRes]] <> "]"]
     ];