some more comments and cleanups to mul::expand() and ncmul::expand()

[ginac.git] / ginac / expairseq.cpp

diff --git a/ginac/expairseq.cpp b/ginac/expairseq.cpp
index a18927c26e69933a485f7ddaa2aca91e42acc0c7..f49fefcf208495ddf3a9d9d78f8a744bebf36092 100644 (file)
--- a/ginac/expairseq.cpp
+++ b/ginac/expairseq.cpp
@@ -311,7 +311,10 @@ ex expairseq::map(map_function & f) const
                ++cit;
        }
 
                ++cit;
        }
 

-       return thisexpairseq(v, f(overall_coeff));
+       if (overall_coeff.is_equal(default_overall_coeff()))
+               return thisexpairseq(v, default_overall_coeff());
+       else
+               return thisexpairseq(v, f(overall_coeff));

 }
 
 ex expairseq::eval(int level) const
 }
 
 ex expairseq::eval(int level) const