CodeGen.mt: Update tests

ianhinder · Mar 19, 2014 · 0f059e0 · 0f059e0
1 parent e0c1d54
commit 0f059e0
Showing 1 changed file with 10 additions and 2 deletions.
diff --git a/Tests/CodeGen.mt b/Tests/CodeGen.mt
@@ -80,7 +80,7 @@ Test[
 ]
 
 Test[
-  VectoriseExpression[1./1024/dx]
+  VectoriseExpression[1./1024 pow[dx,-1]]
   ,
   kdiv[ToReal[Evaluate[1./1024]],dx]
   ,
@@ -123,10 +123,18 @@ Test[
   TestID->"ProcessExpression-GFLocal-vec"
 ]
 
+Test[
+  withVectorisation@ProcessExpression[(Parameter[width])^2, True]
+  ,
+  ToReal[pow[width, 2]]
+  ,
+  TestID->"ProcessExpression-torealpow"
+]
+
 Test[
   withVectorisation@ProcessExpression[Parameter[amplitude] Exp[-(1/2) (r/Parameter[width])^2], True]
   ,
-  kmul[kexp[kmul[ToReal[pow[width^2, -1]], kmul[ToReal[-0.5`30.], kmul[r, r]]]], ToReal[amplitude]]
+  kmul[kexp[kmul[ToReal[pow[width, -2]], kmul[ToReal[-0.5`30.], kmul[r, r]]]], ToReal[amplitude]]
   ,
   TestID->"ProcessExpression-ExpPow"
 ]