Вариант 1. MapleНечеткие множества — множества упорядоченных пар. В Maple множества одномерных списков из двух элементов. Выполняем в Maple вычисления над такими структурами, затем нечеткие множества преобразуем в строку. Строки записываем в файл и скармливаем
. Примерно такого вида
Код:
> Maple2TeX := proc(A)
local s, i;
s:= "";
for i from 1 to nops(A)-1
do
s:= cat(s, "\frac{",convert(A[i][1], string),"}{",convert(A[i][2], string), "}" "+");
end;
if nops(A) <> 0
then s:= cat(s, "\frac {",convert(A[nops(A)][1], string), "} {", convert(A[nops(A)][2], string), "}");
end;
s;
end:
> A:= {[0.2, 1], [0.5,4], [1, 5], [0.3,7], [0.8,10]}:
> Maple2TeX(A);
"\frac{.2}{1}+\frac{.5}{4}+\frac{1}{5}+\frac{.3}{7}+\frac {.8} {10}"
И получаем в данном случае
Для ведущих нулей и записи в файл в одном флаконе вместо
convert используем форматированный вывод в файл:
fprintf. Вроде проблем не предвидится.
Вариант 2. TeXНаходим в Maple нечеткие множества в виде множеств из двухэлементных списков; выводим в текстовый файл; считываем этот файл в TeX; формируем в нём нужные текстовые представления.