Ce n'est pas une question de valeur numérique ou non de ces constantes.
Car un float devant donne ceci
solve([c(x)=f2(x)],[x]);
(%o4) 
[sqrt(5.568327996831706*sqrt(32.93073643634388*x+8.224796345905053)−32.0*x^2+
31.9693406890821*x+15.96935537647813)=1.414213562373095*
sqrt(−16.0*x^2+31.9693406890821*x+9.919188443520187)]

Le problème est que /solve/ ne donne pas les solutions numériques
Il faut utiliser d'autres fonctions, par exemple

*find_root(float(c(x)-f2(x)),x,0.6,1.4);*
(%o18) 0.99342525086738
Il me semble que cela correspond bien au graphique...
Cherchez les zéros d'une fonction ou d'une expression d'une variable dans un 
intervalle donné.

Le 19. 11. 15 17:30, Patrick Gelin a écrit :
Bonjour,

C'est une question de débutant sous Maxima. J'ai deux fonctions, définies 
ci-dessous :
*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;*

Voici le graphique, j'espère que la mailing liste le laisse en place... On peut 
voir un
point d'intersection autour de x=1 :
Je cherche la valeur précise de x, absice du point d'intersection c(x)=f2(x). 
J'ai
essayé de trouver la solution algébrique avec la commande solve :
*solve([c(x)=f2(x)],[x]);****[sqrt(%pi^(3/2)*sqrt(16*%phi^(3/2)*x+(%phi+1)*%pi)−32*x^2+8*sqrt(%phi)*%pi*x+%phi*%pi^2)
= sqrt(2)*sqrt(−16*x^2+8*sqrt(%phi)*%pi*x−%phi*%pi^2+16*%phi)]* On voit que la 
commande
pose le problème sans le résoudre... J'ai l'impression que maxima considère les
constantes %pi et %phi non pas comme des constantes mais comme des variables
supplémentaires de l'équation... Un message d'erreur sur un autre test me l'a 
suggéré.
Alors 3 variables pour une équation, il ne peut donc pas trouver la solution... 
Comment
lui faire reconnaitre que %pi et %phi ne sont pas des variables mais bien des 
constantes
définies ? J'ai essayé de supprimer le % devant pi et phi, cela ne change pas le
problème. Sinon existerait t-il une autre commande avec un autre algorithme qui 
pourrait
trouver la valeur numérique de la solution,  et non chercher son expression 
algébrique ?
Merci pur votre aide. Patrick

------------------------------------------------------------------------------

_______________________________________________
Maxima-lang-fr mailing list
[email protected]
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
<http://perso.silvain-dupertuis.org>
------------------------------------------------------------------------------
_______________________________________________
Maxima-lang-fr mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/maxima-lang-fr

Répondre à