aboutsummaryrefslogtreecommitdiff
path: root/Tools/CodeGen/Schedule.m
diff options
context:
space:
mode:
authorIan Hinder <ian.hinder@aei.mpg.de>2010-09-29 00:57:38 +0100
committerIan Hinder <ian.hinder@aei.mpg.de>2010-09-29 00:57:38 +0100
commitbec5a47835d3164ae9a466e6935be2ab6f3d2b6a (patch)
tree08b46116c972b43c9b88b66dc9e4968740aad947 /Tools/CodeGen/Schedule.m
parent3be364278d0a5b3fa501a3015fef3acd3d5357cd (diff)
Add calculation option ApplyBCs
This option forces Kranc to put the calculation in a group and select and schedule boundary conditions directly after the calculation is called.
Diffstat (limited to 'Tools/CodeGen/Schedule.m')
-rw-r--r--Tools/CodeGen/Schedule.m7
1 files changed, 5 insertions, 2 deletions
diff --git a/Tools/CodeGen/Schedule.m b/Tools/CodeGen/Schedule.m
index a2d5027..c805a07 100644
--- a/Tools/CodeGen/Schedule.m
+++ b/Tools/CodeGen/Schedule.m
@@ -93,8 +93,11 @@ scheduleCalc[calc_, groups_] :=
groupsSetInCalc[calc, groups],
{}];
+ applyBCs = lookupDefault[calc, ApplyBCs, False];
+ Print["applyBCs = ", applyBCs];
userSchedule = lookupDefault[calc, Schedule, Automatic];
- If[userSchedule =!= Automatic,
+
+ If[userSchedule =!= Automatic && !applyBCs,
Return[Map[
Join[
{
@@ -131,7 +134,7 @@ scheduleCalc[calc_, groups_] :=
groupSched = {
Name -> "group " <> groupName,
- SchedulePoint -> "in MoL_PseudoEvolution",
+ SchedulePoint -> If[applyBCs, First[userSchedule], "in MoL_PseudoEvolution"],
SynchronizedGroups -> {},
Language -> "None",
Comment -> lookup[calc, Name]