Thank you very much, "format" package is great. But why this package is
not mentioned in maxima reference manual? I spent a lot of time to
found "format" package documentation.
>> > -----Rupert wrote: -----
>> >
>>
>>> >>There might be another way of getting this result using the format
>>> >>library, but that's somewhat unmaintained if I remember correctly.
>>>
>> >
>> > Using format, the best I could do was
>> >
>> > (%i124) load(format)$
>> >
>> > (%i128) format(e, %poly(A));
>> > (%o128) (1/E+1/D)/A2+1/(A*B)+1/AC
>> >
>>
> This is because there is a typo in the original expression e. If you correct
> it:
>
> (%i1) e:1/(A*B)+1/(A*C)+1/(A2*E)+1/(A2*D);
>
> (%i4) display2d:false;
>
> (%o4) false
> (%i5) format(e, %poly(A));
>
> (%o5) (1/E+1/D)/A2+(1/C+1/B)/A
>
> Which is exactly the expected result.
>
>