diff options
author | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-02-02 02:50:08 -0600 |
---|---|---|
committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-02-02 02:50:08 -0600 |
commit | d1a49afad657a207b9ca298ad1277c29cc633baf (patch) | |
tree | d87c325b623be0f7cab083d6de0c6892df7f5100 | |
parent | dc2d1f1099eae66bdb8f7bad1b87604e55a0bd18 (diff) |
Calculation.m: Add CalculationOnDevice function
-rw-r--r-- | Tools/CodeGen/Calculation.m | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/Tools/CodeGen/Calculation.m b/Tools/CodeGen/Calculation.m index 8543ed9..0b52fd7 100644 --- a/Tools/CodeGen/Calculation.m +++ b/Tools/CodeGen/Calculation.m @@ -28,6 +28,7 @@ GetCalculationName; GetEquations; GetCalculationParameters; CalculationStencilSize; +CalculationOnDevice; Begin["`Private`"]; @@ -91,6 +92,10 @@ DefFn[ StencilSize[pddefs, eqs, "not needed", {} (*ZeroDimensions*)]]]; +DefFn[ + CalculationOnDevice[calc_List] := + lookup[calc, ExecuteOn] === Device]; + End[]; EndPackage[]; |