IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Perl Discussion :

Résolution d'équation et transcription en langage perl.


Sujet :

Langage Perl

  1. #1
    Candidat au Club
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    5
    Détails du profil
    Informations personnelles :
    Localisation : Suisse

    Informations forums :
    Inscription : Juillet 2009
    Messages : 5
    Points : 2
    Points
    2
    Par défaut Résolution d'équation et transcription en langage perl.
    Bonjour à tous,

    Je vous fait parvenir une formule qui permet de calculer la puissance (dioptrie) pour un système de mesure des lentilles.
    Fan de perl mais pas forcément un super utilisateur, je pense qu'il est possible de convertir cette formule en langage perl sachant que je cherche le Rayon (R_fc)
    voici la formule mais en mode ligne, désolé.

    P=1000∆n∙(1/R_fc -1/R_b +((R_fc-√((R_fc )^2-(D/2)^2 )-F_b+T_ec )∙∆n)/(n∙R_fc∙R_b ))

    Merci d'avance pour votre aide.

    Firefighter

  2. #2
    Membre émérite
    Avatar de Jasmine80
    Femme Profil pro
    Bioinformaticienne
    Inscrit en
    Octobre 2006
    Messages
    3 157
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 44
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Bioinformaticienne
    Secteur : Santé

    Informations forums :
    Inscription : Octobre 2006
    Messages : 3 157
    Points : 2 673
    Points
    2 673
    Par défaut
    l'exposant est **
    la multiplication *
    la racine carrée sqrt()

    Si je ne me trompe pas, ça doit donc ressembler à cela :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
      $P = 1000 * $delta_n * 
    	(1/$R_fc - 1/$R_b + ( ($R_fc - sqrt(($R_fc )**2 - ($D/2)**2 ) - $F_b + $T_ec ) 
    	* $delta_n / $n * $R_fc * $R_b );
    pour sortir R_fc ... je ne sais pas comment faire.
    -- Jasmine --

  3. #3
    Candidat au Club
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    5
    Détails du profil
    Informations personnelles :
    Localisation : Suisse

    Informations forums :
    Inscription : Juillet 2009
    Messages : 5
    Points : 2
    Points
    2
    Par défaut Merci .
    Je te remercie pour ta réponse.
    Je vai tâcher de me débrouiller pour extraire Rfc, mais si quelqu'un à une idéé, elle sera la bien venue.

    Merci encore et à bientôt.

  4. #4
    Membre actif

    Profil pro
    Inscrit en
    Août 2009
    Messages
    156
    Détails du profil
    Informations personnelles :
    Âge : 42
    Localisation : France

    Informations forums :
    Inscription : Août 2009
    Messages : 156
    Points : 211
    Points
    211
    Par défaut
    $P = 1000 * $delta_n *
    (1/$R_fc - 1/$R_b + ( ($R_fc - sqrt(($R_fc )**2 - ($D/2)**2 ) - $F_b + $T_ec )
    * $delta_n / $n * $R_fc * $R_b );
    équivalent à
    $P / (1000 * $delta_n )
    =
    (1/$R_fc - 1/$R_b + ( ($R_fc - sqrt(($R_fc )**2 - ($D/2)**2 ) - $F_b + $T_ec )
    * $delta_n / $n * $R_fc * $R_b );
    équivalent à
    $P * $n / (1000 * $delta_n * $delta_n * $R_fc * $R_b)
    =
    (1/$R_fc - 1/$R_b + ( ($R_fc - sqrt(($R_fc )**2 - ($D/2)**2 ) - $F_b + $T_ec ) ;
    équivalent à
    ($P * $n / (1000 * $delta_n * $delta_n * $R_fc * $R_b) + 1/$R_b + $F_b - $T_ec
    =
    1/$R_fc + (($R_fc - sqrt(($R_fc )**2 - ($D/2)**2 ) ;
    Là ça se corse et je sèche ...

    Tu n'as aucune relation qui lie $R_fc et $D qui permettrait de simplifier le membre de droite de cette équation ?
    D'autre part je ne me rappelle plus si des règles mathématique existent pour simlpifier sqrt(A**2 + B**2) mais il ça m'évoque de vague souvenirs du lycée...
    Ptêt aussi 1/A + A qui peut s'écrire (1+A**2) / A ca se simplifie...
    Qui a fait un Bac S récemment dans ce forum ? :-)

  5. #5
    Membre du Club
    Inscrit en
    Juillet 2009
    Messages
    176
    Détails du profil
    Informations personnelles :
    Âge : 36

    Informations forums :
    Inscription : Juillet 2009
    Messages : 176
    Points : 61
    Points
    61
    Par défaut
    Bonjour, vous avez demandez une bacheliere S ?
    Je n'ai pas pris le temps de le faire (en plus je ne suis meme pas sure de pouvoir reprendre l'equation correctement...Sur une ligne j'ai du mal a voir) mais voici le principe :

    Je pense que deja, le truc qui serait bien c'est d'eliminer le denominateur. Pour cela : on met tout d'un cote de l'egalite de sorte qu'on ait zero de l'autre cote, et on met tout sur le meme denominateur.
    Tu verifies sous quels conditions ton denominateur s'annule, et une fois que tu as elimine ces cas particulier, tu peux tout simplement eliminer le denominateur.

    Separer le plus possible ce qui depend de R_fc d'un cote et ce qui n'en depend pas de l'autre.
    Le probleme ici (si je ne me trompe pas) c'est que ca ne suffit pas car on a du R_fc sous la racine..
    Le truc simple pour eliminer cette mechante racine : a nouveau tu isoles d'un cote la racine et de l'autre le reste (qui va contenir du R_fc mais c'est pas grave) et tu mets au carre de chaque cote de l'egalite.
    Maintenant si je ne me trompe pas, tu devrais arriver a une equation du second degres que tu devrais (?) savoir resoudre je pense

    J'espere que mes explications ont ete claires...

  6. #6
    Candidat au Club
    Profil pro
    Inscrit en
    Juillet 2009
    Messages
    5
    Détails du profil
    Informations personnelles :
    Localisation : Suisse

    Informations forums :
    Inscription : Juillet 2009
    Messages : 5
    Points : 2
    Points
    2
    Par défaut Merci
    merci, pour vos réponses, je vai chercher un peu de mon côté pour trouver la bonne formule et j'espère trouvé.
    Sinon je vous ferai à nouveau appel.

    Merci

Discussions similaires

  1. [langage] Perl débutant
    Par mrbungle dans le forum Langage
    Réponses: 4
    Dernier message: 10/11/2004, 16h37
  2. [langage] perl script pour balancer un B-arbre
    Par RonMaster dans le forum Langage
    Réponses: 5
    Dernier message: 22/10/2004, 17h35
  3. Réponses: 2
    Dernier message: 16/07/2004, 19h31
  4. Réponses: 5
    Dernier message: 08/07/2004, 19h57
  5. [langage] Perl en Stand alone ?
    Par lasconic dans le forum Langage
    Réponses: 2
    Dernier message: 18/02/2004, 10h19

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo