meta/Lattice.m: fix FindDependence[]

Before the fix, there were objects that FindDependence[] classified as explicit dependencies even though they were not registered to ToEnumSymbol[].
FlexibleSUSY · Sep 5, 2014 · a6d14f3 · a6d14f3
1 parent cca418d
commit a6d14f3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/meta/Lattice.m b/meta/Lattice.m
@@ -1364,7 +1364,7 @@
 FindDependence[expr_] := Module[{
 	explicit = Cases[
 	    expr,
-	    p:Re[_]|Im[_] /; ValueQ@ToEnumSymbol@PrivatizeReIm@ToCExp[p],
+	    p:Re[_]|Im[_] /; With[{cexp=ToCExp[p]}, ValueQ@ToEnumSymbol@cexp],
 	    {0, Infinity}],
 	children
     },