From 6bc7001cc9f739e9a54a26cec12067eed71a7c02 Mon Sep 17 00:00:00 2001 From: Ian Hinder Date: Fri, 27 Jan 2012 18:09:21 -0600 Subject: KrancScript.m: Add missing process invocation --- Tools/CodeGen/KrancScript.m | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Tools') diff --git a/Tools/CodeGen/KrancScript.m b/Tools/CodeGen/KrancScript.m index 7f088d0..87306db 100644 --- a/Tools/CodeGen/KrancScript.m +++ b/Tools/CodeGen/KrancScript.m @@ -109,7 +109,7 @@ process[calc:"calculation"[content___]] := {Name -> name, Equations -> Map[process,eqs]}]; -process["eqn"[lhs_,rhs_]] := Module[{name,eqs}, lhs -> process[rhs]]; +process["eqn"[lhs_,rhs_]] := Module[{name,eqs}, process[lhs] -> process[rhs]]; process["tensor"["name"[k_],"indices"[]]] := k; process["tensor"["name"[k_],inds_]] := Tensor[k,Sequence@@process[inds]]; -- cgit v1.2.3