diff options
author | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-02-06 19:24:12 -0600 |
---|---|---|
committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-02-06 19:24:12 -0600 |
commit | a8f4bbf98c7248512d259be7264b62d851eaaf42 (patch) | |
tree | 1b96706de2e57081c41ab58373d0358df3f0ec2f /Tools/CodeGen/KrancScript.m | |
parent | 3cc6aee48df9407f27df03237911bb4279cddcd5 (diff) |
KrancScript.m: Handle derivative name in parse tree
Diffstat (limited to 'Tools/CodeGen/KrancScript.m')
-rw-r--r-- | Tools/CodeGen/KrancScript.m | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Tools/CodeGen/KrancScript.m b/Tools/CodeGen/KrancScript.m index e728f14..282628e 100644 --- a/Tools/CodeGen/KrancScript.m +++ b/Tools/CodeGen/KrancScript.m @@ -116,8 +116,8 @@ Do[ process["tensor"["name"[k_],inds_]] := tensor[ToExpression[If[Names[k] === {}, "Global`"<>k, k]],Sequence@@process[inds]]; -process["dtensor"[inds_,tensor_]] := PD[process[tensor],Sequence@@process[inds]]; -process["dtensor"["indices"["lower_index"["index_symbol"["t"]]],tensor_]] := +process["dtensor"["dname"[dname_],inds_,tensor_]] := ToExpression[dname][process[tensor],Sequence@@process[inds]]; +process["dtensor"["dname"["D"], "indices"["lower_index"["index_symbol"["t"]]],tensor_]] := dot[process[tensor]]; process["indices"[inds___]] := Map[process, {inds}]; |