Télécharger la plaquette Cast3M


fr en

Télécharger @powers.procedur

Retour à la liste

Numérotation des lignes : 

  1. * @POWERS   PROCEDUR  FD218221  26/02/16    21:15:08     12474          
  2. *---------------------------------------------------------------------*
  3. * PROCEDURE @POWERS                                                   *
  4. *---------------------------------------------------------------------*
  5. * NOM         : @POWERS                                               *
  6. *                                                                     *
  7. * LANGAGE     : GIBIANE-CAST3M                                        *
  8. * AUTEUR      : G. Sciumè (I2M - University of Bordeaux)              *
  9. * COURRIEL    : giuseppe.sciume@u-bordeuax.fr                         *
  10. *                                                                     *
  11. * COMMENTAIRE : modele stoechiométrique de Powers avec la             *
  12. * prise en compte de la fume de silice (Jensen O M 1993)              *                                                 
  13. *                                                                     *
  14. * Jensen O M 1993 Autogenous deformation and RH-change,               *
  15. * self-desiccation and self-desiccation shrinkage.                    *
  16. * PhD thesis. Building Materials Laboratory, Technical University     *
  17. * of Denmark.                                                         *
  18. *                                                                     *
  19. * ENTREE                                                              *
  20. *  - Contenu de ciment pour m3 [kg/m3]                                *                  
  21. *  - Contenu d'aggregat (gravier + sables) par m3 [kg/m3]             *
  22. *  - Rapport eau/ciment [-]                                           *
  23. *  - Rapport fume de silice/ciment [-]                                *
  24. *                                                                     *
  25. * SORTIES                                                             *
  26. *  - Degree d'hydratation maximal (Mills 1966)   [-] : HYDM           *
  27. *  - Eau consommée pour arriver à HYDM       [kg/m3] : WINF           *
  28. *  - Degree reactio de percolation (0.1 default) [-] : GAM0           *
  29. *  - Porosité finale (pour HYD = HYDM)           [-] : POR1           *
  30. *  - Coeff. fonction porosité                    [-] : APOR           *
  31. *                                                                     *
  32. *-------------------- CARACTERISTIQUES CONSTANTES --------------------*
  33. *                                                                     *
  34. * Masse volumique ciment  RHO_CEM  [kg/m3]: 3150.                     *
  35. * Masse volumique fume de RHO_FS   [kg/m3]: 2200.                     *
  36. * Masse volumique eau RHO_W        [kg/m3]: 1000.                     *
  37. *                                                                     *
  38. *---------------------------------------------------------------------*
  39. * VERSION    : v1, 31/10/2024, version initiale                       *
  40. * HISTORIQUE : v2, XX/XX/20XX,                                        *
  41. *---------------------------------------------------------------------*
  42.  
  43.  
  44.  
  45. DEBPROC @POWERS cem*'FLOTTANT' aggr*'FLOTTANT' 
  46.                  wc*'FLOTTANT' sc*'FLOTTANT'  ;
  47.  
  48. RHO_CEM = 3150.; 
  49. RHO_FS  = 2200.;
  50. RHO_W   = 1000.;
  51. *---------------------------------------------------------------------*
  52.  
  53. EAU    =  CEM * wc;
  54. FS     =  CEM * sc;
  55. CP_VOL = (CEM/RHO_CEM) + (EAU/RHO_W) + (FS/RHO_FS);
  56.  
  57. * Calcul degree d'hydratation maximal (Mills 1966)
  58. HYDM = (1.031 * wc) / (0.194 + wc);
  59.  
  60. * Degree d'hydratation de percolation (Degre de reaction 0.1)
  61. GAM0 =  0.1       ;
  62. HYD0 = GAM0 * HYDM;
  63.  
  64. * Calcul eau consommee pour arriver a HYDM (Powers)
  65. WINF = 0.228 * CEM * HYDM;
  66.  
  67. * Calcul coefficients p et k 
  68. *(voir PhD thesis Sciume pag. 33) 
  69. p = wc / (wc +  (RHO_W/RHO_CEM) + ((RHO_W/RHO_FS)*sc)) ;
  70. k = 1. / (1. + ((RHO_CEM/RHO_FS)*sc));
  71.  
  72. * Calcul porosite finale (pour HYD = HYDM)
  73. *(voir PhD thesis Sciume pag. 35) 
  74. *(errata eqn 1.38.2 APOR to be mulitplied times HYDM) 
  75. POR1 = (p - ((k * (0.52 - (0.69 * sc))) * (1. - p) * HYDM)) * CP_VOL;
  76. APOR =        k * (0.52 - (0.69 * sc))  * (1. - p) * HYDM   * CP_VOL;
  77.  
  78.  
  79. FINPROC WINF GAM0 POR1 APOR;
  80. ***********************************************************************
  81. * FIN PROCEDURE @POWERS
  82. ***********************************************************************
  83.  
  84.  

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