X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Flortensor.cpp;h=e8f4f87312d9070d5e2b826affbeddb40f60bf37;hp=f9d5f44a8196be1eadbfce0c064f7cab21c33ccf;hb=3c509d24fde911c9438501bbf3b150c9e89ff538;hpb=fa1dee5bb93c4ed133ea6b774f7e620a025fcff4

diff --git a/ginac/lortensor.cpp b/ginac/lortensor.cpp
index f9d5f44a..e8f4f873 100644
--- a/ginac/lortensor.cpp
+++ b/ginac/lortensor.cpp
@@ -321,7 +321,10 @@ ex lortensor::eval(int level) const
 				return _ex0();
 			}
 		} else if (idx1.is_symbolic() && idx1.is_co_contra_pair(idx2)) {
-			return Dim();
+			if (idx1.is_orthogonal_only())
+				return Dim() - idx1.get_dim_parallel_space();
+			else
+				return Dim();
 		}
 	}
 	return this -> hold();