Télécharger la plaquette Cast3M


fr en

Télécharger probdens.procedur

Retour à la liste

Numérotation des lignes : 

  1. * PROBDENS  PROCEDUR  CHLOE     98/11/18    21:17:30     3360           
  2. 'DEBPROC' PROBDENS MU*'FLOTTANT' SIGMA*'FLOTTANT' 
  3.                    RB1*'FLOTTANT' B2*'FLOTTANT';
  4. *|=====================================================================
  5. *|
  6. *| << OBJET >> :
  7. *|
  8. *| Procedure permettant de définir la densite de probabilite et
  9. *| la fonction de repartition d'une variable aletoire connaissant
  10. *| ses parametres statistiques (moyenne, ecart-type, symetrie,
  11. *| aplatissement)
  12. *|
  13. *|
  14. *| NB : Les évolutions résultats sont données entre
  15. *|           Mu - 6 * Sigma et Mu + 6 * Sigma 
  16. *|
  17. *|
  18. *| << ENTREE >> :
  19. *| -- ARGUMENTS OBLIGATOIRES DANS TOUS LES CAS --
  20. *|
  21. *| MU = objet de type REEL designant la valeur moyenne
  22. *|                    de la variable aleatoire.
  23. *|
  24. *| SIGMA = objet de type REEL designant l'ecart-type
  25. *|                       de la variable aléatoire.
  26. *|
  27. *| RB1 = objet de type REEL designant la valeur du coefficient 
  28. *|                    de symétrie de la variable aleatoire.
  29. *|
  30. *| B2 = objet de type REEL designant la valeur du coefficient
  31. *|                    d'aplatissement de la variable aleatoire.
  32. *| << SORTIE >> :
  33. *|
  34. *|
  35. *| PDF = objet de type EVOLUTION contenant la densite de probabilite
  36. *|                     de la variable aléatoire
  37. *|
  38. *| CDF = objet de type EVOLUTION contenant la fonction de repartition 
  39. *|                     de la variable aléatoire
  40. *|
  41. *|=====================================================================
  42. *                                                                               
  43. * ______________________                                                        
  44. *                                                                               
  45. * DECLARATIONS GENERALES                                                        
  46. * ______________________                                                        
  47. *                                                                               
  48. SI = 'MOT' 'SI' ; SINON = 'MOT' 'SINON' ; FINSI = 'MOT' 'FINSI' ;               
  49. REPETER = 'MOT' 'REPETER'; QUITTER = 'MOT' 'QUITTER'; FIN = 'MOT' 'FIN';        
  50. EXISTE = 'MOT' 'EXISTE' ; EGA = 'MOT' 'EGA' ;                                   
  51. ERREUR = 'MOT' 'ERREUR' ;                                                       
  52. ENTIER   = 'MOT' 'ENTIER  ' ;                                                   
  53. FLOTTANT = 'MOT' 'FLOTTANT' ;                                                   
  54. MOT      = 'MOT' 'MOT     ' ;                                                   
  55. * _____                                                        
  56. *                                                                               
  57. * TESTS                                                        
  58. * _____                                                        
  59. *                                                                               
  60. * _________________                                                        
  61. *                                                                               
  62. * DEBUT DES CALCULS                                                        
  63. * _________________                                                        
  64. *
  65. X1 = PROG;
  66. Y1 = PROG;
  67. Y2 = PROG;
  68. oldy = 0.;
  69. *
  70. NPAS = 100;
  71. REPE BOUC NPAS;
  72.   absx = (MU - (6 * SIGMA)) + ((&BOUC*(12*SIGMA))/NPAS);
  73.   X1 = X1 ET (PROG absx);
  74.   newy = PROB MU SIGMA RB1 B2 absx;
  75.   Y1 = Y1 ET (PROG ((newy - oldy)/((12*SIGMA)/NPAS)));
  76.   Y2 = Y2 ET (PROG newy);
  77.   oldy = newy;
  78. FIN BOUC;
  79. CDF = evol 'MANU' 'Valeur' X1 'Repartition' Y2 ;
  80. PDF = evol 'MANU' 'Valeur' X1 'Densite' Y1 ;
  81. 'FINPROC' PDF CDF;
  82.  

© Cast3M 2003 - Tous droits réservés.
Mentions légales