Index: mttroot/mtt/bin/trans/m/pol2tex.m ================================================================== --- mttroot/mtt/bin/trans/m/pol2tex.m +++ mttroot/mtt/bin/trans/m/pol2tex.m @@ -9,20 +9,23 @@ ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ + ## Revision 1.2 2001/05/10 19:08:35 gawthrop + ## Cosmetic improvements + ## ## Revision 1.1 2001/05/10 11:44:40 gawthrop ## Useful conversion functions ## ## Revision 1.1 1999/03/25 01:33:51 peterg ## Initial revision ## ############################################################### if nargin<2 - name = "s" + name = "s"; endif if nargin<3 f = "%2.2f"; endif @@ -39,13 +42,13 @@ ff = sprintf(" %s",f); tex = sprintf(ff, pol(1)); endif if n>2 - tex = sprintf("%s{%s}^%i", tex, name, n-1); + tex = sprintf("%s%s^%i", tex, name, n-1); elseif n==2 - tex = sprintf("%s{%s}", tex, name); + tex = sprintf("%s%s", tex, name); else tex = sprintf("%s", tex); endif for i=2:n @@ -55,16 +58,16 @@ plusminus = '+'; endif ff = sprintf("%%s %%s %s",f); tex = sprintf(ff, tex, plusminus, abs(pol(i))); if i