Ouch, sorry for writing in German ... was not my intention to answer@all :(

>> There is also a way to interface Fricas with MMAs via SageMath, which 
has interfaces to Maple, Matlab, Magma, and Mathematica. 
Yes, I know and that's why it wasn't worthwhile to follow up this Rubi 
affair. I thought once it might be easy (though conversion to CL is) to 
translate, however, there are too many side conditions in the rules ... 

On Friday, March 14, 2025 at 5:35:01 PM UTC+1 Dima Pasechnik wrote:



On 14 March 2025 10:24:03 GMT-05:00, Kurt Pagani <nil...@gmail.com> wrote: 
>Hi Ralf 
> 
>Das ist "cool". Da ich das Gegenstück dazu habe 
> 
>https://github.com/nilqed/spadlib/tree/master/mmaparse 
> 
>können die "MMA Fans" (ich bin keiner ;-) FriCAS auch benutzen :) 
> 
>Ich wollte den Parser einmal für Rubi->Fricas benutzen, aber das war 
>mir dann doch zuviel Arbeit, um all die MMA Funktionen zu übersetzen. 
>Vielleicht versuche ich es nochmals, falls mir langweilig wird, 

There is also a way to interface Fricas with MMAs via SageMath, which has 
interfaces to Maple, Matlab, Magma, and Mathematica. 

Just in case, 
Dima 

> 
>Beste Grüsse 
>Kurt 
> 
> 
>On Fri, 14 Mar 2025 at 00:14, 'Ralf Hemmecke' via FriCAS - computer 
>algebra system <fricas...@googlegroups.com> wrote: 
>> 
>> I sometimes want to compare FriCAS output with that what Mathematica 
>> returns and also wanted to be able to cut&paste FriCAS expressions to 
>> Mathematica without always having the need to change the syntax 
>> manually. I therefore modified Format1D in such a way that it shows 
>> Mathematica syntax. 
>> 
>> Of course, that cannot be perfect, because OutputForm is an output 
>> format and does not contain enough information. Nevertheless, the 
>> attached file produces Mathematica expressions for many common cases. 
>> 
>> Please try your favourite expression(s) and let me know where I should 
>> adapt something. 
>> 
>> Use as follows: 
>> 
>> )compile fmtmma.spad 
>> strmma x ==> 
>> first(lines(format(format(x::OutputForm)$Formatter(FormatMathematica)))) 
>> dispmma x ==> display(x::OutputForm::Formatter(FormatMathematica)) 
>> 
>> strmma(sin(x)^(a+tan(x^(-1)))) 
>> dispmma(sin(x)^(a+tan(x^(-1)))) 
>> dispmma(sum(sin(k*x),k=1..n)) 
>> 
>> =============================== 
>> %%% (33) -> strmma(sin(x)^(a+tan(x^(-1)))) 
>> 
>> (33) "Sin[x]^(Tan[1/x]+a)" 
>> Type: String 
>> %%% (34) -> dispmma(sin(x)^(a+tan(x^(-1)))) 
>> Sin[x]^(Tan[1/x]+a) 
>> Type: Void 
>> %%% (35) -> dispmma(sum(sin(k*x),k=1..n)) 
>> [OUTPUTFORM = k = 1, SEXPRESSION = (= k 1)] 
>> Sum[Sin[k*x], {k, 1, n}] 
>> Type: Void 
>> 
>> Ralf 
>> 
>> -- 
>> You received this message because you are subscribed to the Google 
Groups "FriCAS - computer algebra system" group. 
>> To unsubscribe from this group and stop receiving emails from it, send 
an email to fricas-devel...@googlegroups.com. 
>> To view this discussion visit 
https://groups.google.com/d/msgid/fricas-devel/81040453-ba21-463d-aa48-7b871ee676ef%40hemmecke.org.
 

> 

-- 
You received this message because you are subscribed to the Google Groups 
"FriCAS - computer algebra system" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to fricas-devel+unsubscr...@googlegroups.com.
To view this discussion visit 
https://groups.google.com/d/msgid/fricas-devel/11b41f74-6a33-424b-a555-1ded5ab71f4bn%40googlegroups.com.

Reply via email to