## maxima-lang-fr — French-language discussion of the Maxima computer algebra system

You can subscribe to this list here.

 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 Jan Feb Mar Apr (1) May Jun (2) Jul (11) Aug (1) Sep (4) Oct (3) Nov (2) Dec (2) Jan Feb (15) Mar (2) Apr (3) May Jun (1) Jul Aug (7) Sep (3) Oct Nov Dec (31) Jan Feb Mar (7) Apr May (1) Jun (5) Jul Aug (2) Sep (3) Oct (5) Nov Dec Jan Feb (2) Mar Apr (1) May (23) Jun Jul Aug (2) Sep Oct Nov (4) Dec (13) Jan (2) Feb (3) Mar (3) Apr May (7) Jun (5) Jul Aug Sep (6) Oct Nov (4) Dec (1) Jan (4) Feb Mar Apr May Jun Jul Aug Sep Oct (2) Nov Dec Jan Feb (9) Mar (1) Apr May Jun Jul Aug Sep Oct Nov (2) Dec Jan Feb Mar Apr May (4) Jun (1) Jul Aug Sep Oct Nov Dec Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec (3) Jan Feb Mar (4) Apr May Jun Jul (1) Aug Sep (2) Oct Nov (9) Dec (5) Jan (1) Feb (1) Mar Apr May Jun Jul Aug Sep Oct (15) Nov Dec

Showing results of 249

1 2 3 .. 10 > >> (Page 1 of 10)
 Re: [Maxima-lang-fr] Fwd: Simplification d'exposants From: Stavros Macrakis (Σταῦρος Μακράκης) - 2016-10-10 16:10:40 Attachments: Message as HTML ```Autres fonctions utile: debugmode(true) -- entre dans un mode special (un peu difficile a utiliser) backtrace() -- imprime le call stack (fonctions appelées) ff(n):=if n=0 then backtrace() else ff(n-1); ff(2); #0: ff(n=0) #1: ff(n=1) #2: ff(n=2) ​ break() -- entre dans un breakpoint, où toutes les fonctions Maxima sont disponibles, ex.: gg(a):= (q : q+a, if a=0 then break() else gg(a-1))\$ q:0\$ gg(4)\$ Entering a Maxima break point. Type 'exit;' to resume. _q; 10 _a; 0 _​backtrace()\$ #0: gg(a=0) #1: gg(a=1) #2: gg(a=2) #3: gg(a=3) #4: gg(a=4) _C-C <<< abandonne le calcul 2016-10-10 11:58 GMT-04:00 Jean-François Ingenbleek : > Ok merci > > Le lun. 10 oct. 2016 16:31, Stavros Macrakis (Σταῦρος Μακράκης) < > macrakis@...> a écrit : > >> Il y a des fonctions plus avancés/spécialisées pour le débogage, mais en >> general je me limite à trace/untrace et à ajouter des print(...). >> >> 2016-10-10 10:29 GMT-04:00 Jean-François Ingenbleek > >: >> >> Je profite de l'occasion pour demander aux experts une référence pour >> apprendre à utiliser les instruction de débogage... >> >> Merci par avance >> >> Le 10 octobre 2016 à 10:10, serge de marre a écrit : >> >> Merci à tous et particulièrement a Stavros pour sa petite bidouille très >> intéressante, qui semble en effet résoudre mes problèmes. >> Justement, j'ai la chance que les %zi ont déjà eu un declare(integer), ce >> qui facilite les choses. >> >> serge >> >> >> 2016-10-10 0:47 GMT+02:00 Stavros Macrakis (Σταῦρος Μακράκης) < >> macrakis@...>: >> >> Voici une petite bidouille qui semble résoudre tes exemples. Dis-moi si >> tu encontre des problèmes. >> >> expcontract(ex) := >> block([inflag:true,inner], >> if mapatom(ex) then ex >> elseif op(ex)="*" then >> (inner:map('expcontract,ex), >> if mapatom(inner) or (op(inner) # "*") >> then expcontract(inner) >> else expcontract_merge(inner)) >> else map('expcontract,ex))\$ >> >> expcontract_merge(ex) := >> block([prod:1, exx, inner], >> exx: makelist( if mapatom(i) or op(i)#"^" then [i,1] else args(i), i, >> args(ex)), >> for i in group_by_key(exx) do ( >> inner: product(i[j][1],j,1,length(i)), >> prod: prod * (if i[1][2]=1 then inner else ratsimp(inner)^i[1][2]) >> ), >> prod)\$ >> >> group_by_key(keylist) := >> maplist('listify,equiv_classes(setify(keylist), >> lambda([m,n],m[2]=n[2])))\$ >> >> ------------------ >> >> expcontract(x*(x-1)^k*(x+1)^k*(x+2)) => x*(x+2)*(x^2-1)^k >> >> Pour tes exemples, il faudra un radcan par la suite: >> >> ex: ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10\$ >> >> eex: expcontract(ex) => (2^((-24*%z8)-1)*(-4)^(12*%z8))/5-1/10 >> >> reex: radcan(eex) => ((-1)^(12*%z8)-1)/10 >> >> ... et aussi ... >> >> declare(%z8,integer)\$ >> >> radcan(eex) == expand(reex,0,0) == ratsimp(reex) == 0 >> >> 2016-10-09 17:20 GMT-04:00 serge de marre : >> >> Voici quelques examples un peu plus concrets. >> Les exposants sont en effet toujours identiques >> >> ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10; >> (2^(2*%z8+2)-4*(6-2^(5/2))^%z8*(2^(5/2)+6)^%z8)/2^(2*%z8); >> (1263*(2143295-221064*sqrt(94))^%z8*(221064*sqrt(94)+ >> 2143295)^%z8-1263)/188; >> >> Je ne parviens pas a faire fonctionner la suggestion de Jean-Marc, mais >> merci beaucoup pour l'aide quand-meme. >> >> serge >> >> 2016-10-09 20:25 GMT+02:00 : >> >> Bon jour , >> >> et quelque chose comme ça : >> >> matchdeclare([u,v,w],true); >> >> tellsimp((u^w*v^w),(u*v)^w); >> >> E:(a-b*sqrt(q))^k*(a+b*sqrt(q))^k; >> >> expand(%); >> >> Jean-Marc >> >> ----- Mail original ----- >> De: "serge de marre" >> À: maxima-lang-fr@... >> Envoyé: Samedi 8 Octobre 2016 23:18:31 >> Objet: [Maxima-lang-fr] Fwd: Simplification d'exposants >> >> >> >> Bonjour a tous, >> >> >> >> >> >> >> >> >> J'ai une expression comme celle-ci: >> k k >> (%o168) (a - b sqrt(q)) (b sqrt(q) + a) >> >> Comment puis-je transformer cette expression pour obtenir: >> 2 2 k >> (%o177) (a - b q) >> >> Merci d'avance >> >> serge >> >> >> >> ------------------------------------------------------------ >> ------------------ >> Check out the vibrant tech community on one of the world's most >> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >> _______________________________________________ >> Maxima-lang-fr mailing list >> Maxima-lang-fr@... >> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >> >> >> >> ------------------------------------------------------------ >> ------------------ >> Check out the vibrant tech community on one of the world's most >> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >> _______________________________________________ >> Maxima-lang-fr mailing list >> Maxima-lang-fr@... >> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >> >> >> >> >> ------------------------------------------------------------ >> ------------------ >> Check out the vibrant tech community on one of the world's most >> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >> _______________________________________________ >> Maxima-lang-fr mailing list >> Maxima-lang-fr@... >> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >> >> >> >> > ------------------------------------------------------------ > ------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > > ```
 Re: [Maxima-lang-fr] Fwd: Simplification d'exposants From: Jean-François Ingenbleek - 2016-10-10 15:58:44 Attachments: Message as HTML ```Ok merci Le lun. 10 oct. 2016 16:31, Stavros Macrakis (Σταῦρος Μακράκης) < macrakis@...> a écrit : > Il y a des fonctions plus avancés/spécialisées pour le débogage, mais en > general je me limite à trace/untrace et à ajouter des print(...). > > 2016-10-10 10:29 GMT-04:00 Jean-François Ingenbleek > : > > Je profite de l'occasion pour demander aux experts une référence pour > apprendre à utiliser les instruction de débogage... > > Merci par avance > > Le 10 octobre 2016 à 10:10, serge de marre a écrit : > > Merci à tous et particulièrement a Stavros pour sa petite bidouille très > intéressante, qui semble en effet résoudre mes problèmes. > Justement, j'ai la chance que les %zi ont déjà eu un declare(integer), ce > qui facilite les choses. > > serge > > > 2016-10-10 0:47 GMT+02:00 Stavros Macrakis (Σταῦρος Μακράκης) < > macrakis@...>: > > Voici une petite bidouille qui semble résoudre tes exemples. Dis-moi si tu > encontre des problèmes. > > expcontract(ex) := > block([inflag:true,inner], > if mapatom(ex) then ex > elseif op(ex)="*" then > (inner:map('expcontract,ex), > if mapatom(inner) or (op(inner) # "*") > then expcontract(inner) > else expcontract_merge(inner)) > else map('expcontract,ex))\$ > > expcontract_merge(ex) := > block([prod:1, exx, inner], > exx: makelist( if mapatom(i) or op(i)#"^" then [i,1] else args(i), i, > args(ex)), > for i in group_by_key(exx) do ( > inner: product(i[j][1],j,1,length(i)), > prod: prod * (if i[1][2]=1 then inner else ratsimp(inner)^i[1][2]) > ), > prod)\$ > > group_by_key(keylist) := > maplist('listify,equiv_classes(setify(keylist), > lambda([m,n],m[2]=n[2])))\$ > > ------------------ > > expcontract(x*(x-1)^k*(x+1)^k*(x+2)) => x*(x+2)*(x^2-1)^k > > Pour tes exemples, il faudra un radcan par la suite: > > ex: ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10\$ > > eex: expcontract(ex) => (2^((-24*%z8)-1)*(-4)^(12*%z8))/5-1/10 > > reex: radcan(eex) => ((-1)^(12*%z8)-1)/10 > > ... et aussi ... > > declare(%z8,integer)\$ > > radcan(eex) == expand(reex,0,0) == ratsimp(reex) == 0 > > 2016-10-09 17:20 GMT-04:00 serge de marre : > > Voici quelques examples un peu plus concrets. > Les exposants sont en effet toujours identiques > > ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10; > (2^(2*%z8+2)-4*(6-2^(5/2))^%z8*(2^(5/2)+6)^%z8)/2^(2*%z8); > > (1263*(2143295-221064*sqrt(94))^%z8*(221064*sqrt(94)+2143295)^%z8-1263)/188; > > Je ne parviens pas a faire fonctionner la suggestion de Jean-Marc, mais > merci beaucoup pour l'aide quand-meme. > > serge > > 2016-10-09 20:25 GMT+02:00 : > > Bon jour , > > et quelque chose comme ça : > > matchdeclare([u,v,w],true); > > tellsimp((u^w*v^w),(u*v)^w); > > E:(a-b*sqrt(q))^k*(a+b*sqrt(q))^k; > > expand(%); > > Jean-Marc > > ----- Mail original ----- > De: "serge de marre" > À: maxima-lang-fr@... > Envoyé: Samedi 8 Octobre 2016 23:18:31 > Objet: [Maxima-lang-fr] Fwd: Simplification d'exposants > > > > Bonjour a tous, > > > > > > > > > J'ai une expression comme celle-ci: > k k > (%o168) (a - b sqrt(q)) (b sqrt(q) + a) > > Comment puis-je transformer cette expression pour obtenir: > 2 2 k > (%o177) (a - b q) > > Merci d'avance > > serge > > > > > ------------------------------------------------------------------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > > > > > ------------------------------------------------------------------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > > > > > > ------------------------------------------------------------------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > > > > ```
 Re: [Maxima-lang-fr] Fwd: Simplification d'exposants From: Stavros Macrakis (Σταῦρος Μακράκης) - 2016-10-10 14:32:00 Attachments: Message as HTML ```Il y a des fonctions plus avancés/spécialisées pour le débogage, mais en general je me limite à trace/untrace et à ajouter des print(...). 2016-10-10 10:29 GMT-04:00 Jean-François Ingenbleek : > Je profite de l'occasion pour demander aux experts une référence pour > apprendre à utiliser les instruction de débogage... > > Merci par avance > > Le 10 octobre 2016 à 10:10, serge de marre a écrit : > >> Merci à tous et particulièrement a Stavros pour sa petite bidouille très >> intéressante, qui semble en effet résoudre mes problèmes. >> Justement, j'ai la chance que les %zi ont déjà eu un declare(integer), ce >> qui facilite les choses. >> >> serge >> >> >> 2016-10-10 0:47 GMT+02:00 Stavros Macrakis (Σταῦρος Μακράκης) < >> macrakis@...>: >> >>> Voici une petite bidouille qui semble résoudre tes exemples. Dis-moi si >>> tu encontre des problèmes. >>> >>> expcontract(ex) := >>> block([inflag:true,inner], >>> if mapatom(ex) then ex >>> elseif op(ex)="*" then >>> (inner:map('expcontract,ex), >>> if mapatom(inner) or (op(inner) # "*") >>> then expcontract(inner) >>> else expcontract_merge(inner)) >>> else map('expcontract,ex))\$ >>> >>> expcontract_merge(ex) := >>> block([prod:1, exx, inner], >>> exx: makelist( if mapatom(i) or op(i)#"^" then [i,1] else args(i), i, >>> args(ex)), >>> for i in group_by_key(exx) do ( >>> inner: product(i[j][1],j,1,length(i)), >>> prod: prod * (if i[1][2]=1 then inner else ratsimp(inner)^i[1][2]) >>> ), >>> prod)\$ >>> >>> group_by_key(keylist) := >>> maplist('listify,equiv_classes(setify(keylist), >>> lambda([m,n],m[2]=n[2])))\$ >>> >>> ------------------ >>> >>> expcontract(x*(x-1)^k*(x+1)^k*(x+2)) => x*(x+2)*(x^2-1)^k >>> >>> Pour tes exemples, il faudra un radcan par la suite: >>> >>> ex: ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10\$ >>> >>> eex: expcontract(ex) => (2^((-24*%z8)-1)*(-4)^(12*%z8))/5-1/10 >>> >>> reex: radcan(eex) => ((-1)^(12*%z8)-1)/10 >>> >>> ... et aussi ... >>> >>> declare(%z8,integer)\$ >>> >>> radcan(eex) == expand(reex,0,0) == ratsimp(reex) == 0 >>> >>> 2016-10-09 17:20 GMT-04:00 serge de marre : >>> >>>> Voici quelques examples un peu plus concrets. >>>> Les exposants sont en effet toujours identiques >>>> >>>> ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10; >>>> (2^(2*%z8+2)-4*(6-2^(5/2))^%z8*(2^(5/2)+6)^%z8)/2^(2*%z8); >>>> (1263*(2143295-221064*sqrt(94))^%z8*(221064*sqrt(94)+2143295 >>>> )^%z8-1263)/188; >>>> >>>> Je ne parviens pas a faire fonctionner la suggestion de Jean-Marc, mais >>>> merci beaucoup pour l'aide quand-meme. >>>> >>>> serge >>>> >>>> 2016-10-09 20:25 GMT+02:00 : >>>> >>>>> Bon jour , >>>>> >>>>> et quelque chose comme ça : >>>>> >>>>> matchdeclare([u,v,w],true); >>>>> >>>>> tellsimp((u^w*v^w),(u*v)^w); >>>>> >>>>> E:(a-b*sqrt(q))^k*(a+b*sqrt(q))^k; >>>>> >>>>> expand(%); >>>>> >>>>> Jean-Marc >>>>> >>>>> ----- Mail original ----- >>>>> De: "serge de marre" >>>>> À: maxima-lang-fr@... >>>>> Envoyé: Samedi 8 Octobre 2016 23:18:31 >>>>> Objet: [Maxima-lang-fr] Fwd: Simplification d'exposants >>>>> >>>>> >>>>> >>>>> Bonjour a tous, >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> J'ai une expression comme celle-ci: >>>>> k k >>>>> (%o168) (a - b sqrt(q)) (b sqrt(q) + a) >>>>> >>>>> Comment puis-je transformer cette expression pour obtenir: >>>>> 2 2 k >>>>> (%o177) (a - b q) >>>>> >>>>> Merci d'avance >>>>> >>>>> serge >>>>> >>>>> >>>>> >>>>> ------------------------------------------------------------ >>>>> ------------------ >>>>> Check out the vibrant tech community on one of the world's most >>>>> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >>>>> _______________________________________________ >>>>> Maxima-lang-fr mailing list >>>>> Maxima-lang-fr@... >>>>> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >>>>> >>>> >>>> >>>> ------------------------------------------------------------ >>>> ------------------ >>>> Check out the vibrant tech community on one of the world's most >>>> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >>>> _______________________________________________ >>>> Maxima-lang-fr mailing list >>>> Maxima-lang-fr@... >>>> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >>>> >>>> >>> >> >> ------------------------------------------------------------ >> ------------------ >> Check out the vibrant tech community on one of the world's most >> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >> _______________________________________________ >> Maxima-lang-fr mailing list >> Maxima-lang-fr@... >> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >> >> > ```
 Re: [Maxima-lang-fr] Fwd: Simplification d'exposants From: Jean-François Ingenbleek - 2016-10-10 14:29:34 Attachments: Message as HTML ```Je profite de l'occasion pour demander aux experts une référence pour apprendre à utiliser les instruction de débogage... Merci par avance Le 10 octobre 2016 à 10:10, serge de marre a écrit : > Merci à tous et particulièrement a Stavros pour sa petite bidouille très > intéressante, qui semble en effet résoudre mes problèmes. > Justement, j'ai la chance que les %zi ont déjà eu un declare(integer), ce > qui facilite les choses. > > serge > > > 2016-10-10 0:47 GMT+02:00 Stavros Macrakis (Σταῦρος Μακράκης) < > macrakis@...>: > >> Voici une petite bidouille qui semble résoudre tes exemples. Dis-moi si >> tu encontre des problèmes. >> >> expcontract(ex) := >> block([inflag:true,inner], >> if mapatom(ex) then ex >> elseif op(ex)="*" then >> (inner:map('expcontract,ex), >> if mapatom(inner) or (op(inner) # "*") >> then expcontract(inner) >> else expcontract_merge(inner)) >> else map('expcontract,ex))\$ >> >> expcontract_merge(ex) := >> block([prod:1, exx, inner], >> exx: makelist( if mapatom(i) or op(i)#"^" then [i,1] else args(i), i, >> args(ex)), >> for i in group_by_key(exx) do ( >> inner: product(i[j][1],j,1,length(i)), >> prod: prod * (if i[1][2]=1 then inner else ratsimp(inner)^i[1][2]) >> ), >> prod)\$ >> >> group_by_key(keylist) := >> maplist('listify,equiv_classes(setify(keylist), >> lambda([m,n],m[2]=n[2])))\$ >> >> ------------------ >> >> expcontract(x*(x-1)^k*(x+1)^k*(x+2)) => x*(x+2)*(x^2-1)^k >> >> Pour tes exemples, il faudra un radcan par la suite: >> >> ex: ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10\$ >> >> eex: expcontract(ex) => (2^((-24*%z8)-1)*(-4)^(12*%z8))/5-1/10 >> >> reex: radcan(eex) => ((-1)^(12*%z8)-1)/10 >> >> ... et aussi ... >> >> declare(%z8,integer)\$ >> >> radcan(eex) == expand(reex,0,0) == ratsimp(reex) == 0 >> >> 2016-10-09 17:20 GMT-04:00 serge de marre : >> >>> Voici quelques examples un peu plus concrets. >>> Les exposants sont en effet toujours identiques >>> >>> ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10; >>> (2^(2*%z8+2)-4*(6-2^(5/2))^%z8*(2^(5/2)+6)^%z8)/2^(2*%z8); >>> (1263*(2143295-221064*sqrt(94))^%z8*(221064*sqrt(94)+2143295 >>> )^%z8-1263)/188; >>> >>> Je ne parviens pas a faire fonctionner la suggestion de Jean-Marc, mais >>> merci beaucoup pour l'aide quand-meme. >>> >>> serge >>> >>> 2016-10-09 20:25 GMT+02:00 : >>> >>>> Bon jour , >>>> >>>> et quelque chose comme ça : >>>> >>>> matchdeclare([u,v,w],true); >>>> >>>> tellsimp((u^w*v^w),(u*v)^w); >>>> >>>> E:(a-b*sqrt(q))^k*(a+b*sqrt(q))^k; >>>> >>>> expand(%); >>>> >>>> Jean-Marc >>>> >>>> ----- Mail original ----- >>>> De: "serge de marre" >>>> À: maxima-lang-fr@... >>>> Envoyé: Samedi 8 Octobre 2016 23:18:31 >>>> Objet: [Maxima-lang-fr] Fwd: Simplification d'exposants >>>> >>>> >>>> >>>> Bonjour a tous, >>>> >>>> >>>> >>>> >>>> >>>> >>>> >>>> >>>> J'ai une expression comme celle-ci: >>>> k k >>>> (%o168) (a - b sqrt(q)) (b sqrt(q) + a) >>>> >>>> Comment puis-je transformer cette expression pour obtenir: >>>> 2 2 k >>>> (%o177) (a - b q) >>>> >>>> Merci d'avance >>>> >>>> serge >>>> >>>> >>>> >>>> ------------------------------------------------------------ >>>> ------------------ >>>> Check out the vibrant tech community on one of the world's most >>>> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >>>> _______________________________________________ >>>> Maxima-lang-fr mailing list >>>> Maxima-lang-fr@... >>>> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >>>> >>> >>> >>> ------------------------------------------------------------ >>> ------------------ >>> Check out the vibrant tech community on one of the world's most >>> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >>> _______________________________________________ >>> Maxima-lang-fr mailing list >>> Maxima-lang-fr@... >>> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >>> >>> >> > > ------------------------------------------------------------ > ------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > > ```
 Re: [Maxima-lang-fr] Fwd: Simplification d'exposants From: serge de marre - 2016-10-10 08:10:55 Attachments: Message as HTML ```Merci à tous et particulièrement a Stavros pour sa petite bidouille très intéressante, qui semble en effet résoudre mes problèmes. Justement, j'ai la chance que les %zi ont déjà eu un declare(integer), ce qui facilite les choses. serge 2016-10-10 0:47 GMT+02:00 Stavros Macrakis (Σταῦρος Μακράκης) < macrakis@...>: > Voici une petite bidouille qui semble résoudre tes exemples. Dis-moi si tu > encontre des problèmes. > > expcontract(ex) := > block([inflag:true,inner], > if mapatom(ex) then ex > elseif op(ex)="*" then > (inner:map('expcontract,ex), > if mapatom(inner) or (op(inner) # "*") > then expcontract(inner) > else expcontract_merge(inner)) > else map('expcontract,ex))\$ > > expcontract_merge(ex) := > block([prod:1, exx, inner], > exx: makelist( if mapatom(i) or op(i)#"^" then [i,1] else args(i), i, > args(ex)), > for i in group_by_key(exx) do ( > inner: product(i[j][1],j,1,length(i)), > prod: prod * (if i[1][2]=1 then inner else ratsimp(inner)^i[1][2]) > ), > prod)\$ > > group_by_key(keylist) := > maplist('listify,equiv_classes(setify(keylist), > lambda([m,n],m[2]=n[2])))\$ > > ------------------ > > expcontract(x*(x-1)^k*(x+1)^k*(x+2)) => x*(x+2)*(x^2-1)^k > > Pour tes exemples, il faudra un radcan par la suite: > > ex: ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10\$ > > eex: expcontract(ex) => (2^((-24*%z8)-1)*(-4)^(12*%z8))/5-1/10 > > reex: radcan(eex) => ((-1)^(12*%z8)-1)/10 > > ... et aussi ... > > declare(%z8,integer)\$ > > radcan(eex) == expand(reex,0,0) == ratsimp(reex) == 0 > > 2016-10-09 17:20 GMT-04:00 serge de marre : > >> Voici quelques examples un peu plus concrets. >> Les exposants sont en effet toujours identiques >> >> ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10; >> (2^(2*%z8+2)-4*(6-2^(5/2))^%z8*(2^(5/2)+6)^%z8)/2^(2*%z8); >> (1263*(2143295-221064*sqrt(94))^%z8*(221064*sqrt(94)+2143295 >> )^%z8-1263)/188; >> >> Je ne parviens pas a faire fonctionner la suggestion de Jean-Marc, mais >> merci beaucoup pour l'aide quand-meme. >> >> serge >> >> 2016-10-09 20:25 GMT+02:00 : >> >>> Bon jour , >>> >>> et quelque chose comme ça : >>> >>> matchdeclare([u,v,w],true); >>> >>> tellsimp((u^w*v^w),(u*v)^w); >>> >>> E:(a-b*sqrt(q))^k*(a+b*sqrt(q))^k; >>> >>> expand(%); >>> >>> Jean-Marc >>> >>> ----- Mail original ----- >>> De: "serge de marre" >>> À: maxima-lang-fr@... >>> Envoyé: Samedi 8 Octobre 2016 23:18:31 >>> Objet: [Maxima-lang-fr] Fwd: Simplification d'exposants >>> >>> >>> >>> Bonjour a tous, >>> >>> >>> >>> >>> >>> >>> >>> >>> J'ai une expression comme celle-ci: >>> k k >>> (%o168) (a - b sqrt(q)) (b sqrt(q) + a) >>> >>> Comment puis-je transformer cette expression pour obtenir: >>> 2 2 k >>> (%o177) (a - b q) >>> >>> Merci d'avance >>> >>> serge >>> >>> >>> >>> ------------------------------------------------------------ >>> ------------------ >>> Check out the vibrant tech community on one of the world's most >>> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >>> _______________________________________________ >>> Maxima-lang-fr mailing list >>> Maxima-lang-fr@... >>> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >>> >> >> >> ------------------------------------------------------------ >> ------------------ >> Check out the vibrant tech community on one of the world's most >> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >> _______________________________________________ >> Maxima-lang-fr mailing list >> Maxima-lang-fr@... >> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >> >> > ```
 Re: [Maxima-lang-fr] Fwd: Simplification d'exposants From: Stavros Macrakis (Σταῦρος Μακράκης) - 2016-10-09 22:47:15 Attachments: Message as HTML ```Voici une petite bidouille qui semble résoudre tes exemples. Dis-moi si tu encontre des problèmes. expcontract(ex) := block([inflag:true,inner], if mapatom(ex) then ex elseif op(ex)="*" then (inner:map('expcontract,ex), if mapatom(inner) or (op(inner) # "*") then expcontract(inner) else expcontract_merge(inner)) else map('expcontract,ex))\$ expcontract_merge(ex) := block([prod:1, exx, inner], exx: makelist( if mapatom(i) or op(i)#"^" then [i,1] else args(i), i, args(ex)), for i in group_by_key(exx) do ( inner: product(i[j][1],j,1,length(i)), prod: prod * (if i[1][2]=1 then inner else ratsimp(inner)^i[1][2]) ), prod)\$ group_by_key(keylist) := maplist('listify,equiv_classes(setify(keylist), lambda([m,n],m[2]=n[2])))\$ ------------------ expcontract(x*(x-1)^k*(x+1)^k*(x+2)) => x*(x+2)*(x^2-1)^k Pour tes exemples, il faudra un radcan par la suite: ex: ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10\$ eex: expcontract(ex) => (2^((-24*%z8)-1)*(-4)^(12*%z8))/5-1/10 reex: radcan(eex) => ((-1)^(12*%z8)-1)/10 ... et aussi ... declare(%z8,integer)\$ radcan(eex) == expand(reex,0,0) == ratsimp(reex) == 0 2016-10-09 17:20 GMT-04:00 serge de marre : > Voici quelques examples un peu plus concrets. > Les exposants sont en effet toujours identiques > > ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10; > (2^(2*%z8+2)-4*(6-2^(5/2))^%z8*(2^(5/2)+6)^%z8)/2^(2*%z8); > (1263*(2143295-221064*sqrt(94))^%z8*(221064*sqrt(94)+ > 2143295)^%z8-1263)/188; > > Je ne parviens pas a faire fonctionner la suggestion de Jean-Marc, mais > merci beaucoup pour l'aide quand-meme. > > serge > > 2016-10-09 20:25 GMT+02:00 : > >> Bon jour , >> >> et quelque chose comme ça : >> >> matchdeclare([u,v,w],true); >> >> tellsimp((u^w*v^w),(u*v)^w); >> >> E:(a-b*sqrt(q))^k*(a+b*sqrt(q))^k; >> >> expand(%); >> >> Jean-Marc >> >> ----- Mail original ----- >> De: "serge de marre" >> À: maxima-lang-fr@... >> Envoyé: Samedi 8 Octobre 2016 23:18:31 >> Objet: [Maxima-lang-fr] Fwd: Simplification d'exposants >> >> >> >> Bonjour a tous, >> >> >> >> >> >> >> >> >> J'ai une expression comme celle-ci: >> k k >> (%o168) (a - b sqrt(q)) (b sqrt(q) + a) >> >> Comment puis-je transformer cette expression pour obtenir: >> 2 2 k >> (%o177) (a - b q) >> >> Merci d'avance >> >> serge >> >> >> >> ------------------------------------------------------------ >> ------------------ >> Check out the vibrant tech community on one of the world's most >> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >> _______________________________________________ >> Maxima-lang-fr mailing list >> Maxima-lang-fr@... >> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >> > > > ------------------------------------------------------------ > ------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > > ```
 Re: [Maxima-lang-fr] Fwd: Simplification d'exposants From: serge de marre - 2016-10-09 21:20:43 Attachments: Message as HTML ```Voici quelques examples un peu plus concrets. Les exposants sont en effet toujours identiques ((1-sqrt(5))^(12*%z8)*(sqrt(5)+1)^(12*%z8)*2^((-24*%z8)-1))/5-1/10; (2^(2*%z8+2)-4*(6-2^(5/2))^%z8*(2^(5/2)+6)^%z8)/2^(2*%z8); (1263*(2143295-221064*sqrt(94))^%z8*(221064*sqrt(94)+2143295)^%z8-1263)/188; Je ne parviens pas a faire fonctionner la suggestion de Jean-Marc, mais merci beaucoup pour l'aide quand-meme. serge 2016-10-09 20:25 GMT+02:00 : > Bon jour , > > et quelque chose comme ça : > > matchdeclare([u,v,w],true); > > tellsimp((u^w*v^w),(u*v)^w); > > E:(a-b*sqrt(q))^k*(a+b*sqrt(q))^k; > > expand(%); > > Jean-Marc > > ----- Mail original ----- > De: "serge de marre" > À: maxima-lang-fr@... > Envoyé: Samedi 8 Octobre 2016 23:18:31 > Objet: [Maxima-lang-fr] Fwd: Simplification d'exposants > > > > Bonjour a tous, > > > > > > > > > J'ai une expression comme celle-ci: > k k > (%o168) (a - b sqrt(q)) (b sqrt(q) + a) > > Comment puis-je transformer cette expression pour obtenir: > 2 2 k > (%o177) (a - b q) > > Merci d'avance > > serge > > > > ------------------------------------------------------------ > ------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > ```
 Re: [Maxima-lang-fr] Fwd: Simplification d'exposants From: - 2016-10-09 18:25:50 ```Bon jour , et quelque chose comme ça : matchdeclare([u,v,w],true); tellsimp((u^w*v^w),(u*v)^w); E:(a-b*sqrt(q))^k*(a+b*sqrt(q))^k; expand(%); Jean-Marc ----- Mail original ----- De: "serge de marre" À: maxima-lang-fr@... Envoyé: Samedi 8 Octobre 2016 23:18:31 Objet: [Maxima-lang-fr] Fwd: Simplification d'exposants Bonjour a tous, J'ai une expression comme celle-ci: k k (%o168) (a - b sqrt(q)) (b sqrt(q) + a) Comment puis-je transformer cette expression pour obtenir: 2 2 k (%o177) (a - b q) Merci d'avance serge ------------------------------------------------------------------------------ Check out the vibrant tech community on one of the world's most engaging tech sites, SlashDot.org! http://sdm.link/slashdot _______________________________________________ Maxima-lang-fr mailing list Maxima-lang-fr@... https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr ```
 Re: [Maxima-lang-fr] Simplification d'exposants From: Stavros Macrakis (Σταῦρος Μακράκης) - 2016-10-09 17:03:45 Attachments: Message as HTML ```Est-ce que les exposants sont toujours identiques, p.e., (a+1)^k*(a-1)^k? Ou y a-t'il des cas plus compliqués, p.e., (a+1)^k*(a-1)^(k+3) ou (a+1)^(2*k-m)*(a-1)^(k+m) ou r*(a+1)^(k+1)*(a+2)^m*(a-1)^(k-1)*a^-k. Il est assez facile de traiter le premier cas. Dans les autres cas, il faudrait d'abord spécifier le résultat voulu... et le code sera un peu plus compliqué... mais toujours faisable. -s 2016-10-09 11:59 GMT-04:00 Jean-François Ingenbleek : > Çà se complique.... > > Le dim. 9 oct. 2016 17:51, serge de marre a écrit : > >> Merci Jean-François, c'est une bonne idée, malheureusement, j'ai >> plusieurs expressions de ce type (disons E1, E2, ... En) avec des a1..an, >> b1..bn, q1...qn et k1..kn. L'expression que je désire simplifier est du >> type F(E1,..,En). >> J'ai essayé avec matchdeclare et defrule, mais je ne suis pas encore >> parvenu à trouver une solution satisfaisante. >> >> serge >> >> On Oct 9, 2016 4:52 PM, "Jean-François Ingenbleek" >> wrote: >> >> E:(a-b*sqrt(q)^k)*(a+b*sqrt(q)^k >> (expand(part(E,1,1)*part(E,2,1))^k >> >> Le dim. 9 oct. 2016 10:06, Roland Salz a écrit : >> >> From: serge de marre - 2016-10-08 21:18:38 >> >> *Attachments:* Message as HTML >> ; >> >> >> Bonjour a tous, >> >> >> >> J'ai une expression comme celle-ci: >> >> k k >> >> (%o168) (a - b sqrt(q)) (b sqrt(q) + a) >> >> >> >> Comment puis-je transformer cette expression pour obtenir: >> >> 2 2 k >> >> (%o177) (a - b q) >> >> >> >> Merci d'avance >> >> >> >> serge >> >> >> >> >> >> Bonjour Serge, >> >> >> >> C’est sans doute un problème grave. Malheureusement j’ai complètement >> oublié la solution. Peut-être quelqu’un d’autre sait plus. On pourrait >> transmettre cette question à la liste maxima-discuss. Là il-y-a des vrais >> spécialistes pour des choses comme ça. >> >> >> >> Merci >> >> >> >> Roland >> ------------------------------------------------------------ >> ------------------ >> Check out the vibrant tech community on one of the world's most >> engaging tech sites, SlashDot.org! http://sdm.link/slashdot______ >> _________________________________________ >> Maxima-lang-fr mailing list >> Maxima-lang-fr@... >> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >> >> >> ------------------------------------------------------------ >> ------------------ >> Check out the vibrant tech community on one of the world's most >> engaging tech sites, SlashDot.org! http://sdm.link/slashdot >> _______________________________________________ >> Maxima-lang-fr mailing list >> Maxima-lang-fr@... >> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >> >> > ------------------------------------------------------------ > ------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > > ```
 Re: [Maxima-lang-fr] Simplification d'exposants From: Jean-François Ingenbleek - 2016-10-09 16:00:14 Attachments: Message as HTML ```Çà se complique.... Le dim. 9 oct. 2016 17:51, serge de marre a écrit : > Merci Jean-François, c'est une bonne idée, malheureusement, j'ai plusieurs > expressions de ce type (disons E1, E2, ... En) avec des a1..an, b1..bn, > q1...qn et k1..kn. L'expression que je désire simplifier est du type > F(E1,..,En). > J'ai essayé avec matchdeclare et defrule, mais je ne suis pas encore > parvenu à trouver une solution satisfaisante. > > serge > > On Oct 9, 2016 4:52 PM, "Jean-François Ingenbleek" > wrote: > > E:(a-b*sqrt(q)^k)*(a+b*sqrt(q)^k > (expand(part(E,1,1)*part(E,2,1))^k > > Le dim. 9 oct. 2016 10:06, Roland Salz a écrit : > > From: serge de marre - 2016-10-08 21:18:38 > > *Attachments:* Message as HTML > ; > > > Bonjour a tous, > > > > J'ai une expression comme celle-ci: > > k k > > (%o168) (a - b sqrt(q)) (b sqrt(q) + a) > > > > Comment puis-je transformer cette expression pour obtenir: > > 2 2 k > > (%o177) (a - b q) > > > > Merci d'avance > > > > serge > > > > > > Bonjour Serge, > > > > C’est sans doute un problème grave. Malheureusement j’ai complètement > oublié la solution. Peut-être quelqu’un d’autre sait plus. On pourrait > transmettre cette question à la liste maxima-discuss. Là il-y-a des vrais > spécialistes pour des choses comme ça. > > > > Merci > > > > Roland > > ------------------------------------------------------------------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > > > > ------------------------------------------------------------------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > > ```
 Re: [Maxima-lang-fr] Simplification d'exposants From: serge de marre - 2016-10-09 15:52:00 Attachments: Message as HTML ```Merci Jean-François, c'est une bonne idée, malheureusement, j'ai plusieurs expressions de ce type (disons E1, E2, ... En) avec des a1..an, b1..bn, q1...qn et k1..kn. L'expression que je désire simplifier est du type F(E1,..,En). J'ai essayé avec matchdeclare et defrule, mais je ne suis pas encore parvenu à trouver une solution satisfaisante. serge On Oct 9, 2016 4:52 PM, "Jean-François Ingenbleek" wrote: > E:(a-b*sqrt(q)^k)*(a+b*sqrt(q)^k > (expand(part(E,1,1)*part(E,2,1))^k > > Le dim. 9 oct. 2016 10:06, Roland Salz a écrit : > >> From: serge de marre - 2016-10-08 21:18:38 >> >> *Attachments:* Message as HTML >> ; >> >> >> Bonjour a tous, >> >> >> >> J'ai une expression comme celle-ci: >> >> k k >> >> (%o168) (a - b sqrt(q)) (b sqrt(q) + a) >> >> >> >> Comment puis-je transformer cette expression pour obtenir: >> >> 2 2 k >> >> (%o177) (a - b q) >> >> >> >> Merci d'avance >> >> >> >> serge >> >> >> >> >> >> Bonjour Serge, >> >> >> >> C’est sans doute un problème grave. Malheureusement j’ai complètement >> oublié la solution. Peut-être quelqu’un d’autre sait plus. On pourrait >> transmettre cette question à la liste maxima-discuss. Là il-y-a des vrais >> spécialistes pour des choses comme ça. >> >> >> >> Merci >> >> >> >> Roland >> ------------------------------------------------------------ >> ------------------ >> Check out the vibrant tech community on one of the world's most >> engaging tech sites, SlashDot.org! http://sdm.link/slashdot______ >> _________________________________________ >> Maxima-lang-fr mailing list >> Maxima-lang-fr@... >> https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr >> > > ------------------------------------------------------------ > ------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > > ```
 Re: [Maxima-lang-fr] Simplification d'exposants From: Jean-François Ingenbleek - 2016-10-09 14:52:20 Attachments: Message as HTML ```E:(a-b*sqrt(q)^k)*(a+b*sqrt(q)^k (expand(part(E,1,1)*part(E,2,1))^k Le dim. 9 oct. 2016 10:06, Roland Salz a écrit : > From: serge de marre - 2016-10-08 21:18:38 > > *Attachments:* Message as HTML > ; > > > Bonjour a tous, > > > > J'ai une expression comme celle-ci: > > k k > > (%o168) (a - b sqrt(q)) (b sqrt(q) + a) > > > > Comment puis-je transformer cette expression pour obtenir: > > 2 2 k > > (%o177) (a - b q) > > > > Merci d'avance > > > > serge > > > > > > Bonjour Serge, > > > > C’est sans doute un problème grave. Malheureusement j’ai complètement > oublié la solution. Peut-être quelqu’un d’autre sait plus. On pourrait > transmettre cette question à la liste maxima-discuss. Là il-y-a des vrais > spécialistes pour des choses comme ça. > > > > Merci > > > > Roland > > ------------------------------------------------------------------------------ > Check out the vibrant tech community on one of the world's most > engaging tech sites, SlashDot.org! http://sdm.link/slashdot > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr > ```
 Re: [Maxima-lang-fr] Simplification d'exposants From: Roland Salz - 2016-10-09 08:06:55 Attachments: Message as HTML ```From: serge de marre - 2016-10-08 21:18:38 Attachments: Message as HTML Bonjour a tous, J'ai une expression comme celle-ci: k k (%o168) (a - b sqrt(q)) (b sqrt(q) + a) Comment puis-je transformer cette expression pour obtenir: 2 2 k (%o177) (a - b q) Merci d'avance serge Bonjour Serge, Cest sans doute un problème grave. Malheureusement jai complètement oublié la solution. Peut-être quelquun dautre sait plus. On pourrait transmettre cette question à la liste maxima-discuss. Là il-y-a des vrais spécialistes pour des choses comme ça. Merci Roland ```
 [Maxima-lang-fr] Fwd: Simplification d'exposants From: serge de marre - 2016-10-08 21:18:38 Attachments: Message as HTML ```Bonjour a tous, J'ai une expression comme celle-ci: k k (%o168) (a - b sqrt(q)) (b sqrt(q) + a) Comment puis-je transformer cette expression pour obtenir: 2 2 k (%o177) (a - b q) Merci d'avance serge ```
 [Maxima-lang-fr] Message de test From: Roland Salz - 2016-10-08 18:13:45 Attachments: Message as HTML ```Salut, Cest un message de test seulement (pardón!). Roland ```
 [Maxima-lang-fr] maxima-jupyter From: aishen - 2016-01-24 00:23:57 Attachments: Message as HTML ```At this point I think Maxima-Jupyter is a usable environment for writing text + math in documents. If anyone wants to give it a try, I'll be glad to help. best Robert Dodier Hi, I tried to install maxima jupiter like you said in git : /git/maxima-jupyter\$ python3 ./install-maxima-jupyter.py --maxima-jupyter=/maxima Maxima-Jupyter -- an enhanced interactive Maxima shell CL-Jupyter (C) 2014-2015 Frederic Peschanski (cf. LICENSE) Additional Maxima-specific stuff by Robert Dodier; thanks Frederic! ---- ... Frontend: using IPython v4.0 /home/riri/.local/lib/python3.5/site-packages/IPython/utils/path.py:258: UserWarning: get_ipython_dir has moved to the IPython.paths module warn("get_ipython_dir has moved to the IPython.paths module") Error: unexpected option '--maxima-jupyter=/maxima' Abort. But I guess I do something wrong : I don't understand how to make maxima-jupyter ? Could you explain more precisely ? There a is a|ppa:chronitis/jupyter maybe you could add it there ? Kind regards Aishen | ```
 Re: [Maxima-lang-fr] RE : RE : programmation efficace From: Jean-François Ingenbleek - 2015-12-19 14:37:29 Attachments: Message as HTML ```Grand merci! Avec ceci: somchiffre(n):=block([q:[]],q:divide(n,10),if q[1]=0 then q[2] else q[2]+somchiffre(q[1])); ordre(m,n):= if evenp(somchiffre(m)) then ordre(m+n,n) else m/n-1; compile(ordre,somchiffre); resultat:[]\$for n in [11, 101, 1001, 1001001001] do push([ordre(n,n),n],resultat);elapsed_run_time(); j'ai le résultat en quelques secondes! Le 19 décembre 2015 à 13:43, Jean-François Ingenbleek a écrit : > Grand merci ! > Je regarde tout cela avec attention. > Le 19 déc. 2015 12:26 PM, "couraud" a écrit : > >> La list de variables après le mot clé « block » est la façon de déclarer >> des >> variables locale au block dans le langage Maxima. (Voir la doc de ce mot >> clé). >> >> >> >> La commande « map » est probablement optimisée mais c’est surtout les >> nombreuses conversions >> de nombres vers « string » et vise versa qui coûte dans vôtre version. >> >> Les quelques mesures que j’ai réalisées suggèrent que la version purement >> numérique est >> 150 fois plus rapide. >> >> Peut être qu’une version purement numérique mais utilisant « map » serais >> un peut plus rapide. >> >> Elle pourrait sûrement être encore optimisé en particulier puisqu’elle >> fait intervenir essentiellement des calculs numériques elle pourrait être >> compilé. >> (Voir la doc de « compile », « compfile » etc.). >> >> Il y aurait sûrement intérêt à ce que la liste de valeurs initiales ainsi >> que la limite du multiple soit >> des paramètres de la fonction. >> >> Enfin 10^19 est une limite vraiment optimiste. Si la boucle doit >> atteindre cette valeur cela impliquera >> des heures, voire des jours de calculs. >> >> >> >> PS : Si vous pouvez répondre à la liste plutôt que en privé. D’autre >> personne peuvent apporté >> de meilleurs solution voire même corriger mes dires (je ne suis pas un >> expert). >> >> >> >> PPS : je me demande si il ne serait pas plus efficace de tester la parité >> de la somme des digits >> et ssi elle est impair alors calculer n, plutôt que d’extraire les digits >> a partir de n. >> >> >> >> >> >> -----Message d'origine----- >> *De :* Jean-François Ingenbleek [mailto:jingenbl97@...] >> *Envoyé :* samedi 19 décembre 2015 10:32 >> *À :* couraud >> *Objet :* Re: RE : [Maxima-lang-fr] programmation efficace >> >> >> >> Merci pour cette réponse rapide. >> >> Je n'avais pas pensé à cela: [q, r] : divide(q, 10) >> >> Par contre je ne comprends pas ceci:[n, sum_digit, k, q, r, stop, result >> : []] >> >> Maladroitement sans doute j'ai voulu écrire en "style" maxima avec des >> "map" ... >> >> Mais qu'elles sont les instructions qui coûte en temps d’exécution? je >> pensais que précisément que "map" était optimisé... >> >> >> >> encore merci >> >> >> >> Le 19 décembre 2015 à 01:28, couraud a écrit : >> >> Hi, >> >> >> >> The following version seems faster : >> >> >> >> odd_sum_digit() := block([n, sum_digit, k, q, r, stop, result : []], >> >> for n in [11, 101, 1001, 2002, 3003, 4004, 5005, 6006, 7007, 8008, >> 9009] do ( >> >> stop : false, >> >> k : 1, >> >> while (k * n < 10 ^ 19) and not stop do ( >> >> sum_digit : 0, >> >> q : k * n, >> >> while q > 0 do ( >> >> [q, r] : divide(q, 10), >> >> sum_digit : sum_digit + r >> >> ), >> >> stop : oddp(sum_digit), >> >> if stop then ( >> >> result : cons([k, n], result) >> >> ), >> >> k : k + 1 >> >> ) >> >> ), >> >> result >> >> ); >> >> >> >> Hope this help. >> >> >> >> >> >> PS: Je vous réponds en anglais et je mets la mailing liste anglaise en >> copie car c’est la plus active et c’est aussi là >> >> que ce trouvent les développeurs / experts de Maxima. >> >> >> >> Best regards. >> >> >> >> -----Message d'origine----- >> *De :* Jean-François Ingenbleek [mailto:jingenbl97@...] >> *Envoyé :* vendredi 18 décembre 2015 17:42 >> *À :* maxima-lang-fr@... >> *Objet :* [Maxima-lang-fr] programmation efficace >> >> >> >> Il s'agit d'un problème de programme efficace ou inefficace dont voici >> les lignes de code: >> >> lesfin:[]\$for n in [11,101,1001,2002,3003,4004,5005,6006,7007,8008,9009] >> do block( >> arret:oddp(apply("+",map(eval_string,charlist(string(n))))), >> for i:n step n thru 10^19 while not arret do block( >> arret: oddp(apply("+",map(eval_string,charlist(string(i))))), >> if arret then push([i/n-1,n],lesfin)))\$ >> elapsed_run_time(); >> >> Elles évaluent ceci: >> * un nombre est digitalement paire si la somme de ces chiffres est paire >> -> arret:oddp(apply("+",map(eval_string,charlist(string(n))))) >> * on regarde les multiples successifs d'un nombre digitalement paire -> >> for i:n step n thru 10^19 while not arret do block( avec thru 10^19 comme >> test d'arrêt en parachute ventral... >> * on détermine le nombre de ces multiples digitalement paire jusqu'au >> premier non paire ->arret: >> oddp(apply("+",map(eval_string,charlist(string(i))))), >> * ce nombre est l'"ordre" -> push([i/n-1,n],lesfin))) >> >> Que vaut cet ordre? etc... >> >> J'explore quelque nombres pour voir: ->for n in >> [11,101,1001,2002,3003,4004,5005,6006,7007,8008,9009] >> >> Voilà le contexte. >> >> Le problème c'est que tout cela me semble bien "lent" à l’exécution et >> devient même de plus en plus lent quand je change la liste à explorer.... >> >> Y-a-t-il plus efficace que ces lignes? >> >> Merci à tous par avance >> >> >> > ```
 Re: [Maxima-lang-fr] RE : RE : programmation efficace From: Jean-François Ingenbleek - 2015-12-19 12:43:18 Attachments: Message as HTML ```Grand merci ! Je regarde tout cela avec attention. Le 19 déc. 2015 12:26 PM, "couraud" a écrit : > La list de variables après le mot clé « block » est la façon de déclarer > des > variables locale au block dans le langage Maxima. (Voir la doc de ce mot > clé). > > > > La commande « map » est probablement optimisée mais c’est surtout les > nombreuses conversions > de nombres vers « string » et vise versa qui coûte dans vôtre version. > > Les quelques mesures que j’ai réalisées suggèrent que la version purement > numérique est > 150 fois plus rapide. > > Peut être qu’une version purement numérique mais utilisant « map » serais > un peut plus rapide. > > Elle pourrait sûrement être encore optimisé en particulier puisqu’elle > fait intervenir essentiellement des calculs numériques elle pourrait être > compilé. > (Voir la doc de « compile », « compfile » etc.). > > Il y aurait sûrement intérêt à ce que la liste de valeurs initiales ainsi > que la limite du multiple soit > des paramètres de la fonction. > > Enfin 10^19 est une limite vraiment optimiste. Si la boucle doit atteindre > cette valeur cela impliquera > des heures, voire des jours de calculs. > > > > PS : Si vous pouvez répondre à la liste plutôt que en privé. D’autre > personne peuvent apporté > de meilleurs solution voire même corriger mes dires (je ne suis pas un > expert). > > > > PPS : je me demande si il ne serait pas plus efficace de tester la parité > de la somme des digits > et ssi elle est impair alors calculer n, plutôt que d’extraire les digits > a partir de n. > > > > > > -----Message d'origine----- > *De :* Jean-François Ingenbleek [mailto:jingenbl97@...] > *Envoyé :* samedi 19 décembre 2015 10:32 > *À :* couraud > *Objet :* Re: RE : [Maxima-lang-fr] programmation efficace > > > > Merci pour cette réponse rapide. > > Je n'avais pas pensé à cela: [q, r] : divide(q, 10) > > Par contre je ne comprends pas ceci:[n, sum_digit, k, q, r, stop, result : > []] > > Maladroitement sans doute j'ai voulu écrire en "style" maxima avec des > "map" ... > > Mais qu'elles sont les instructions qui coûte en temps d’exécution? je > pensais que précisément que "map" était optimisé... > > > > encore merci > > > > Le 19 décembre 2015 à 01:28, couraud a écrit : > > Hi, > > > > The following version seems faster : > > > > odd_sum_digit() := block([n, sum_digit, k, q, r, stop, result : []], > > for n in [11, 101, 1001, 2002, 3003, 4004, 5005, 6006, 7007, 8008, > 9009] do ( > > stop : false, > > k : 1, > > while (k * n < 10 ^ 19) and not stop do ( > > sum_digit : 0, > > q : k * n, > > while q > 0 do ( > > [q, r] : divide(q, 10), > > sum_digit : sum_digit + r > > ), > > stop : oddp(sum_digit), > > if stop then ( > > result : cons([k, n], result) > > ), > > k : k + 1 > > ) > > ), > > result > > ); > > > > Hope this help. > > > > > > PS: Je vous réponds en anglais et je mets la mailing liste anglaise en > copie car c’est la plus active et c’est aussi là > > que ce trouvent les développeurs / experts de Maxima. > > > > Best regards. > > > > -----Message d'origine----- > *De :* Jean-François Ingenbleek [mailto:jingenbl97@...] > *Envoyé :* vendredi 18 décembre 2015 17:42 > *À :* maxima-lang-fr@... > *Objet :* [Maxima-lang-fr] programmation efficace > > > > Il s'agit d'un problème de programme efficace ou inefficace dont voici les > lignes de code: > > lesfin:[]\$for n in [11,101,1001,2002,3003,4004,5005,6006,7007,8008,9009] > do block( > arret:oddp(apply("+",map(eval_string,charlist(string(n))))), > for i:n step n thru 10^19 while not arret do block( > arret: oddp(apply("+",map(eval_string,charlist(string(i))))), > if arret then push([i/n-1,n],lesfin)))\$ > elapsed_run_time(); > > Elles évaluent ceci: > * un nombre est digitalement paire si la somme de ces chiffres est paire > -> arret:oddp(apply("+",map(eval_string,charlist(string(n))))) > * on regarde les multiples successifs d'un nombre digitalement paire -> > for i:n step n thru 10^19 while not arret do block( avec thru 10^19 comme > test d'arrêt en parachute ventral... > * on détermine le nombre de ces multiples digitalement paire jusqu'au > premier non paire ->arret: > oddp(apply("+",map(eval_string,charlist(string(i))))), > * ce nombre est l'"ordre" -> push([i/n-1,n],lesfin))) > > Que vaut cet ordre? etc... > > J'explore quelque nombres pour voir: ->for n in > [11,101,1001,2002,3003,4004,5005,6006,7007,8008,9009] > > Voilà le contexte. > > Le problème c'est que tout cela me semble bien "lent" à l’exécution et > devient même de plus en plus lent quand je change la liste à explorer.... > > Y-a-t-il plus efficace que ces lignes? > > Merci à tous par avance > > > ```
 [Maxima-lang-fr] RE : RE : programmation efficace From: couraud - 2015-12-19 11:26:27 Attachments: Message as HTML ```La list de variables après le mot clé « block » est la façon de déclarer des variables locale au block dans le langage Maxima. (Voir la doc de ce mot clé). La commande « map » est probablement optimisée mais cest surtout les nombreuses conversions de nombres vers « string » et vise versa qui coûte dans vôtre version. Les quelques mesures que jai réalisées suggèrent que la version purement numérique est 150 fois plus rapide. Peut être quune version purement numérique mais utilisant « map » serais un peut plus rapide. Elle pourrait sûrement être encore optimisé en particulier puisquelle fait intervenir essentiellement des calculs numériques elle pourrait être compilé. (Voir la doc de « compile », « compfile » etc.). Il y aurait sûrement intérêt à ce que la liste de valeurs initiales ainsi que la limite du multiple soit des paramètres de la fonction. Enfin 10^19 est une limite vraiment optimiste. Si la boucle doit atteindre cette valeur cela impliquera des heures, voire des jours de calculs. PS : Si vous pouvez répondre à la liste plutôt que en privé. Dautre personne peuvent apporté de meilleurs solution voire même corriger mes dires (je ne suis pas un expert). PPS : je me demande si il ne serait pas plus efficace de tester la parité de la somme des digits et ssi elle est impair alors calculer n, plutôt que dextraire les digits a partir de n. -----Message d'origine----- De : Jean-François Ingenbleek [mailto:jingenbl97@...] Envoyé : samedi 19 décembre 2015 10:32 À : couraud Objet : Re: RE : [Maxima-lang-fr] programmation efficace Merci pour cette réponse rapide. Je n'avais pas pensé à cela: [q, r] : divide(q, 10) Par contre je ne comprends pas ceci:[n, sum_digit, k, q, r, stop, result : []] Maladroitement sans doute j'ai voulu écrire en "style" maxima avec des "map" ... Mais qu'elles sont les instructions qui coûte en temps dexécution? je pensais que précisément que "map" était optimisé... encore merci Le 19 décembre 2015 à 01:28, couraud a écrit : Hi, The following version seems faster : odd_sum_digit() := block([n, sum_digit, k, q, r, stop, result : []], for n in [11, 101, 1001, 2002, 3003, 4004, 5005, 6006, 7007, 8008, 9009] do ( stop : false, k : 1, while (k * n < 10 ^ 19) and not stop do ( sum_digit : 0, q : k * n, while q > 0 do ( [q, r] : divide(q, 10), sum_digit : sum_digit + r ), stop : oddp(sum_digit), if stop then ( result : cons([k, n], result) ), k : k + 1 ) ), result ); Hope this help. PS: Je vous réponds en anglais et je mets la mailing liste anglaise en copie car cest la plus active et cest aussi là que ce trouvent les développeurs / experts de Maxima. Best regards. -----Message d'origine----- De : Jean-François Ingenbleek [mailto:jingenbl97@...] Envoyé : vendredi 18 décembre 2015 17:42 À : maxima-lang-fr@... Objet : [Maxima-lang-fr] programmation efficace Il s'agit d'un problème de programme efficace ou inefficace dont voici les lignes de code: lesfin:[]\$for n in [11,101,1001,2002,3003,4004,5005,6006,7007,8008,9009] do block( arret:oddp(apply("+",map(eval_string,charlist(string(n))))), for i:n step n thru 10^19 while not arret do block( arret: oddp(apply("+",map(eval_string,charlist(string(i))))), if arret then push([i/n-1,n],lesfin)))\$ elapsed_run_time(); Elles évaluent ceci: * un nombre est digitalement paire si la somme de ces chiffres est paire -> arret:oddp(apply("+",map(eval_string,charlist(string(n))))) * on regarde les multiples successifs d'un nombre digitalement paire -> for i:n step n thru 10^19 while not arret do block( avec thru 10^19 comme test d'arrêt en parachute ventral... * on détermine le nombre de ces multiples digitalement paire jusqu'au premier non paire ->arret: oddp(apply("+",map(eval_string,charlist(string(i))))), * ce nombre est l'"ordre" -> push([i/n-1,n],lesfin))) Que vaut cet ordre? etc... J'explore quelque nombres pour voir: ->for n in [11,101,1001,2002,3003,4004,5005,6006,7007,8008,9009] Voilà le contexte. Le problème c'est que tout cela me semble bien "lent" à lexécution et devient même de plus en plus lent quand je change la liste à explorer.... Y-a-t-il plus efficace que ces lignes? Merci à tous par avance ```
 [Maxima-lang-fr] RE : programmation efficace From: couraud - 2015-12-19 00:29:31 Attachments: Message as HTML ```Hi, The following version seems faster : odd_sum_digit() := block([n, sum_digit, k, q, r, stop, result : []], for n in [11, 101, 1001, 2002, 3003, 4004, 5005, 6006, 7007, 8008, 9009] do ( stop : false, k : 1, while (k * n < 10 ^ 19) and not stop do ( sum_digit : 0, q : k * n, while q > 0 do ( [q, r] : divide(q, 10), sum_digit : sum_digit + r ), stop : oddp(sum_digit), if stop then ( result : cons([k, n], result) ), k : k + 1 ) ), result ); Hope this help. PS: Je vous réponds en anglais et je mets la mailing liste anglaise en copie car cest la plus active et cest aussi là que ce trouvent les développeurs / experts de Maxima. Best regards. -----Message d'origine----- De : Jean-François Ingenbleek [mailto:jingenbl97@...] Envoyé : vendredi 18 décembre 2015 17:42 À : maxima-lang-fr@... Objet : [Maxima-lang-fr] programmation efficace Il s'agit d'un problème de programme efficace ou inefficace dont voici les lignes de code: lesfin:[]\$for n in [11,101,1001,2002,3003,4004,5005,6006,7007,8008,9009] do block( arret:oddp(apply("+",map(eval_string,charlist(string(n))))), for i:n step n thru 10^19 while not arret do block( arret: oddp(apply("+",map(eval_string,charlist(string(i))))), if arret then push([i/n-1,n],lesfin)))\$ elapsed_run_time(); Elles évaluent ceci: * un nombre est digitalement paire si la somme de ces chiffres est paire -> arret:oddp(apply("+",map(eval_string,charlist(string(n))))) * on regarde les multiples successifs d'un nombre digitalement paire -> for i:n step n thru 10^19 while not arret do block( avec thru 10^19 comme test d'arrêt en parachute ventral... * on détermine le nombre de ces multiples digitalement paire jusqu'au premier non paire ->arret: oddp(apply("+",map(eval_string,charlist(string(i))))), * ce nombre est l'"ordre" -> push([i/n-1,n],lesfin))) Que vaut cet ordre? etc... J'explore quelque nombres pour voir: ->for n in [11,101,1001,2002,3003,4004,5005,6006,7007,8008,9009] Voilà le contexte. Le problème c'est que tout cela me semble bien "lent" à lexécution et devient même de plus en plus lent quand je change la liste à explorer.... Y-a-t-il plus efficace que ces lignes? Merci à tous par avance ```
 [Maxima-lang-fr] programmation efficace From: Jean-François Ingenbleek - 2015-12-18 16:42:16 Attachments: Message as HTML ```Il s'agit d'un problème de programme efficace ou inefficace dont voici les lignes de code: lesfin:[]\$for n in [11,101,1001,2002,3003,4004,5005,6006,7007,8008,9009] do block( arret:oddp(apply("+",map(eval_string,charlist(string(n))))), for i:n step n thru 10^19 while not arret do block( arret: oddp(apply("+",map(eval_string,charlist(string(i))))), if arret then push([i/n-1,n],lesfin)))\$ elapsed_run_time(); Elles évaluent ceci: * un nombre est digitalement paire si la somme de ces chiffres est paire -> arret:oddp(apply("+",map(eval_string,charlist(string(n))))) * on regarde les multiples successifs d'un nombre digitalement paire -> for i:n step n thru 10^19 while not arret do block( avec thru 10^19 comme test d'arrêt en parachute ventral... * on détermine le nombre de ces multiples digitalement paire jusqu'au premier non paire ->arret: oddp(apply("+",map(eval_string,charlist(string(i))))), * ce nombre est l'"ordre" -> push([i/n-1,n],lesfin))) Que vaut cet ordre? etc... J'explore quelque nombres pour voir: ->for n in [11,101,1001,2002,3003,4004,5005,6006,7007,8008,9009] Voilà le contexte. Le problème c'est que tout cela me semble bien "lent" à l’exécution et devient même de plus en plus lent quand je change la liste à explorer.... Y-a-t-il plus efficace que ces lignes? Merci à tous par avance ```
 Re: [Maxima-lang-fr] RE : Problème avec la définition des constantes %pi et %phi ... From: Silvain Dupertuis - 2015-11-23 17:53:28 Attachments: Message as HTML ```Sorry, that was my mistake in the first answer. and float is indeed unnecessary,,, Silvain Dupertuis Le 23. 11. 15 18:40, Robert Dodier a écrit : > Patrick, > > Note that your input %i3 reads: find_root(float([c(x)-f2(x)]),x,0.6,1.4); > Remove the [ ] and try it again, i.e.: find_root(float(c(x)-f2(x)),x,0.6,1.4); > > You can also remove the float(...) because find_root will apply 'float' by itself: > find_root(c(x)-f2(x),x,0.6,1.4); > > Hope this helps! Sorry, I can't write in French. I hope you can understand all the same. > > Robert Dodier > > ------------------------------------------------------------------------------ > Go from Idea to Many App Stores Faster with Intel(R) XDK > Give your users amazing mobile app experiences with Intel(R) XDK. > Use one codebase in this all-in-one HTML5 development environment. > Design, debug & build mobile apps & 2D/3D high-impact games for multiple OSs. > http://pubads.g.doubleclick.net/gampad/clk?id=254741551&iu=/4140 > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr -- Silvain Dupertuis Route de Lausanne 335 1293 Bellevue (Switzerland) tél. +41-(0)22-774.20.67 portable +41-(0)79-604.87.52 web: silvain-dupertuis.org ; ```
 Re: [Maxima-lang-fr] RE : Problème avec la définition des constantes %pi et %phi ... From: Robert Dodier - 2015-11-23 17:40:58 ```Patrick, Note that your input %i3 reads: find_root(float([c(x)-f2(x)]),x,0.6,1.4); Remove the [ ] and try it again, i.e.: find_root(float(c(x)-f2(x)),x,0.6,1.4); You can also remove the float(...) because find_root will apply 'float' by itself: find_root(c(x)-f2(x),x,0.6,1.4); Hope this helps! Sorry, I can't write in French. I hope you can understand all the same. Robert Dodier ```
 Re: [Maxima-lang-fr] RE : Problème avec la définition des constantes %pi et %phi ... From: Silvain Dupertuis - 2015-11-23 07:26:23 Attachments: text/plain ```/La solution la plus simple me semble être/ f2(x):=sqrt(%pi^(3/2)*sqrt(16*%phi^(3/2)*x+%phi*%pi+%pi)−32*x^2+8*sqrt(%phi)*%pi*x+%phi*%pi^2)/2^(5/2); c(x):=sqrt(−16*x^2+8*sqrt(%phi)*%pi*x−%phi*%pi^2+16*%phi)/4; / solve([f2(x)=c(x)]) ne donne pas de solution numérique// //Utilisez la fonction find_root // //pour trouver par approximation numérique// //les zéros de la différence f2(x)-c(x)// //dans un intervalle donné (0.6 à 1.4, comme sur le graphique)// //les valeurs de la différence aux extrémités// //devant être de signe différents// //float n'est même pas nécessaire/ *find_root(f2(x)-c(x),x,0.6,1.4);** **=> 0.99342525086738* copie d'écran => 0.99342525086738 Le 23. 11. 15 07:03, Patrick Gelin a écrit : > Bonjour à tous, > > *** merci pour vos réponses, c'est très intéressant :-) *** > > J'ai essayé *to_poly_solve* mais mon PC rentre dans une boucle infinie et je suis obligé > de tuer le processus maxima... > > Je ne comprends pas comment Sylvain vous obtenez votre résulta : > *find_root(float(c(x)-f2(x)),x,0.6,1.4);* > (%o18) 0.99342525086738 > Comme le montre ma copie d'écran ci-dessous, j'obtiens plutôt une equation plus > compliquée. La variable x restant encore présente dans l'équation... > > *C**opie d'écran : * > > Le 21/11/2015 00:04, couraud a écrit : >> >> load(to_poly_solve); >> >> %solve([c(x) = f2(x)], x); >> > > > -- > M Patrick GELIN > 33 avenue du Président Kennedy > 68200 Mulhouse > Tél : 03 89 46 30 57 > > > ------------------------------------------------------------------------------ > Go from Idea to Many App Stores Faster with Intel(R) XDK > Give your users amazing mobile app experiences with Intel(R) XDK. > Use one codebase in this all-in-one HTML5 development environment. > Design, debug & build mobile apps & 2D/3D high-impact games for multiple OSs. > http://pubads.g.doubleclick.net/gampad/clk?id=254741551&iu=/4140 > > > _______________________________________________ > Maxima-lang-fr mailing list > Maxima-lang-fr@... > https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr -- Silvain Dupertuis Route de Lausanne 335 1293 Bellevue (Switzerland) tél. +41-(0)22-774.20.67 portable +41-(0)79-604.87.52 web: silvain-dupertuis.org ; ```
 Re: [Maxima-lang-fr] RE : Problème avec la définition des constantes %pi et %phi ... From: Patrick Gelin - 2015-11-23 06:03:15 Attachments: text/plain ```Bonjour à tous, *** merci pour vos réponses, c'est très intéressant :-) *** J'ai essayé *to_poly_solve* mais mon PC rentre dans une boucle infinie et je suis obligé de tuer le processus maxima... Je ne comprends pas comment Sylvain vous obtenez votre résulta : *find_root(float(c(x)-f2(x)),x,0.6,1.4);* (%o18) 0.99342525086738 Comme le montre ma copie d'écran ci-dessous, j'obtiens plutôt une equation plus compliquée. La variable x restant encore présente dans l'équation... *C**opie d'écran : * Le 21/11/2015 00:04, couraud a écrit : > > load(to_poly_solve); > > %solve([c(x) = f2(x)], x); > -- M Patrick GELIN 33 avenue du Président Kennedy 68200 Mulhouse Tél : 03 89 46 30 57 ```
2 messages has been excluded from this view by a project administrator.

Showing results of 249

1 2 3 .. 10 > >> (Page 1 of 10)