Как перевести большой полином из Maple в Fortran?

[DLL]

Полином получен из базиса Гребнера и является достаточно длинным.
Для преобразования кода из Maple в Fortran есть команда

with(CodeGeneration):
F:=Fortran(poly);

В случае когда код большой рекомендуют пользоваться командами split/makeproc

with(codegen):
F1:=makeproc(poly);
F2:=split(F1);

Тем не менее, выражение полиномиального вида разбивается крайне нерационально.
С принципиальной точки зрения, разбить полином на части крайне просто.
Странно, что Maple занимается каким-то непотребством.
Может как-то можно с умом перевести?

[DLL]

Разобрался сам. Надо пользоваться опцией optimize в команде CodeGeneration/Fortran.