aboutsummaryrefslogtreecommitdiff
path: root/Tests
diff options
context:
space:
mode:
authorIan Hinder <ian.hinder@aei.mpg.de>2013-09-09 14:50:21 +0200
committerIan Hinder <ian.hinder@aei.mpg.de>2013-09-09 14:50:21 +0200
commitcf53696a692a0033e802070ad64128824720be79 (patch)
tree6b240eb9e141ae6865391a26fc7e5c7bd50d0142 /Tests
parent4b87d4a37151e0fcdb978a520909b4d2ad154ea9 (diff)
Add ClearAllTensors to all tests
Diffstat (limited to 'Tests')
-rw-r--r--Tests/Kranc.mt4
-rw-r--r--Tests/McLachlan.mt5
2 files changed, 9 insertions, 0 deletions
diff --git a/Tests/Kranc.mt b/Tests/Kranc.mt
index c867e67..3736b62 100644
--- a/Tests/Kranc.mt
+++ b/Tests/Kranc.mt
@@ -36,6 +36,7 @@ $evolveCalc = {
(****************************************************************)
Test[
+ ClearAllTensors[];
CreateKrancThornTT[{}, "TestThorns", "CreateThorn", Calculations -> {}]
,
Null
@@ -78,6 +79,7 @@ Test[
dot[pi] -> IfThen[alpha>0, Euc[ui,uj] PD[phi,li,lj], 2 Euc[ui,uj] PD[phi,li,lj]]
}}},
+ ClearAllTensors[];
(* PD = PDstandard2nd *)
CreateKrancThornTT[
@@ -103,6 +105,7 @@ Test[
(****************************************************************)
Test[
+ ClearAllTensors[];
CreateKrancThornTT[
$groups, "TestThorns", "SimpleWave",
PartialDerivatives -> $derivatives,
@@ -118,6 +121,7 @@ Test[
Module[
{eulerCons, evolvedGroups, nonevolvedGroups, declaredGroups, declaredGroupNames, groups},
+ ClearAllTensors[];
Map[DefineTensor, {Den, S, En, rho, v, p}];
evolvedGroups = Map[CreateGroupFromTensor, {Den, S[uj], En}];
diff --git a/Tests/McLachlan.mt b/Tests/McLachlan.mt
index 55da4b1..2a7864b 100644
--- a/Tests/McLachlan.mt
+++ b/Tests/McLachlan.mt
@@ -1445,6 +1445,7 @@ CreateKrancThornTT [groups, "TestThorns", thorn,
*)
Test[
+ ClearAllTensors[];
createCode[4, False, True , 3, 1, "BSSN", True, False];
,
Null
@@ -1453,6 +1454,7 @@ Test[
]
Test[
+ ClearAllTensors[];
createCode[4, False, True , 3, 1, "BSSN", False, False];
,
Null
@@ -1461,6 +1463,7 @@ Test[
]
Test[
+ ClearAllTensors[];
createCode[4, False, True , 3, 1, "BSSN", True, True];
,
Null
@@ -1469,6 +1472,7 @@ Test[
]
Test[
+ ClearAllTensors[];
createCode[4, False, True , 3, 1, "BSSN", True, False, DGFE -> True];
,
Null
@@ -1477,6 +1481,7 @@ Test[
]
Test[
+ ClearAllTensors[];
createCode[4, False, True , 3, 1, "BSSN", True, False, CaKernel -> True];
,
Null