#----------------------------------------------------------------------- #- #- EXEMPLE DE FICHIER PARAMETRE POUR LE CALCUL D'UN OUVRAGE SUR PIEUX #- ( PAS DE DALLE DE TRANSITION ) #- #----------------------------------------------------------------------- #======================================================================= #- BORDEREAU DES DONNEES #======================================================================= titre ' DEMO ' #-------------------- CARACTERISTIQUES GEOMETRIQUES ------------------- biais = 85. #--- (Grd) Biais geometrique de l'ouvrage larg_droite = 12.64 #--- (m) Largeur droite de l'ouvrage ouverture = 8.00 #--- (m) Distance droite entre nus de piedroits hauteur_libre = 6.02 #--- (m) Distance entre le haut de la semelle et le #--- bas de la traverse superieure ep_semelle = 1. #--- (m) Epaisseur des semelles ep_piedroit = .4 #--- (m) Epaisseur des piedroits ep_trav_sup = .4 #--- (m) Epaisseur de la traverse superieure hsremb = 0.00 #--- (m) Hauteur de remblai sur la trav. superieure hchau = 0.12 #--- (m) Epaisseur equivalente de beton pour #--- l'etalement des charges concentrees (3/4) #-------------------- CARACTERISTIQUES DU BETON ------------------------ fck28 = 3000 #--- (t/m2) Resistance du beton a 28 jours rob = 2.5 #--- (t/m3) Poids volumique du beton arme #-------------------- CARACTERISTIQUES DU SOL ------------------------ rosol = 2. #--- (t/m3) Poids volumique du sol rank1 = 0.25 #--- ( ) Coeff. mini. de poussee du sol (cf. Rankine) rank2 = 0.50 #--- ( ) Coeff. maxi. de poussee du sol (cf. Rankine) #----------------------- CARACTERISTIQUES DES FONDATIONS ---------------- #--- FONDATION SOUS LE PIEDROIT DE GAUCHE --- dpieug = 0.8 #--- (m) Diametre des pieux npieug = 5 #--- ( ) Nombre de pieux ncoug = 2 #--- ( ) Nombre de couches de sol dim hcoug(ncoug) ; dim kisolg(ncoug) ; dim kvsolg(ncoug) #-description de couche (en partant du haut) hcoug(1) = 4.6 #--- (m) Hauteur de la couche kisolg(1) = 5670 #--- (t/m3) module instantane de la couche kvsolg(1) = 2835 #--- (t/m3) module differe de la couche #-description de couche (en partant du haut) hcoug(2) = 2. #--- (m) Hauteur de la couche kisolg(2) = 10920 #--- (t/m3) module instantane de la couche kvsolg(2) = 5460 #--- (t/m3) module differe de la couche #--- FONDATION SOUS LE PIEDROIT DE DROITE --- dpieud = 0.8 #--- (m) Diametre des pieux npieud = 5 #--- ( ) Nombre de pieux ncoud = 2 #--- ( ) Nombre de couches de sol dim hcoud(ncoud) ; dim kisold(ncoud) ; dim kvsold(ncoud) #-description de couche (en partant du haut) hcoud(1) = 4.6 #--- (m) Hauteur de la couche kisold(1) = 5670 #--- (t/m3) module instantane de la couche kvsold(1) = 2835 #--- (t/m3) module differe de la couche #-description de couche (en partant du haut) hcoud(2) = 2. #--- (m) Hauteur de la couche kisold(2) = 10920 #--- (t/m3) module instantane de la couche kvsold(2) = 5460 #--- (t/m3) module differe de la couche #-------------------------------- CHARGEMENTS -------------------------- qsup = 0.350 #--- (t/m2) Poids super. + remblai rapporte au m2 psremb = 0 #--- (t/m2) Charge de sollicitation des remblai adjacents d_retrait = 3e-4 #--- ( ) Deformation due au retrait #-------------------------- CHARGES D'EXPLOITATION --------------------- #--- Chargement A(l) --- (Mettre kxal = 0 pour suprimer le chargement) kxal = 0.815 #-( ) Coefficient de ponderation (Cf. GUYON MASSONNET ) #--- Chargement Bc --- (Mettre kxbc = 0 pour suprimer le chargement) kxbc = 0.296 #-( ) Coefficient de ponderation (Cf. GUYON MASSONNET ) del_bc = 1.226 #-( ) Coefficient de majoration dynamique #--- Chargement Bt --- (Mettre kxbt = 0 pour suprimer le chargement) kxbt = 0.217 #-( ) Coefficient de ponderation (Cf. GUYON MASSONNET ) del_bt = 1.226 #-( ) Coefficient de majoration dynamique #--- Chargement Mc80 --- (Mettre kxmc80 = 0 pour suprimer le chargement) kxmc80 = .0 #-( ) Coefficient de ponderation (Cf. GUYON MASSONNET ) del_mc80 = .0 #-( ) Coefficient de majoration dynamique #--- Chargement Me80 --- (Mettre kxme80 = 0 pour suprimer le chargement) kxme80 = .0 #-( ) Coefficient de ponderation (Cf. GUYON MASSONNET ) del_me80 = .0 #-( ) Coefficient de majoration dynamique #--- Chargement Mc120 --- (Mettre kxmc120 = 0 pour suprimer le chargement) kxmc120 = 0.123 #-( ) Coefficient de ponderation (Cf. GUYON MASSONNET ) del_mc120 = 1.24 #-( ) Coefficient de majoration dynamique #--- Chargement Me120 --- (Mettre kxme120 = 0 pour suprimer le chargement) kxme120 = 0.128 #-( ) Coefficient de ponderation (Cf. GUYON MASSONNET ) del_me120 = 1.24 #-( ) Coefficient de majoration dynamique #======================================================================= #- DEBUT DU FICHIER PARAMETRE #======================================================================= #-calcul des modules instantane et differe du beton (t/m2) ebi = 11000*(fck28*9.81d-3)**(1/3)/9.81d-3 ebv = 3.7/11*ebi #-modification pour l'ouvrage droit equivalent sbiais = sin(biais*pi/200) ep_piedroit_eq = ep_piedroit/sbiais portee=ouverture/sbiais+ep_piedroit_eq #-calcul des longueurs des pieux lpieug=0 ; FAIRE i=1,ncoug << lpieug = lpieug+hcoug(i) >> cfpg = npieug/larg_droite lpieud=0 ; FAIRE i=1,ncoud << lpieud = lpieud+hcoud(i) >> cfpd = npieud/larg_droite #-defintion des coordonnees des noeuds y2=hauteur_libre+ep_trav_sup/2 noeud 1 0. 0. noeud 2 0. y2 noeud 3 portee y2 noeud 4 portee 0. noeud 5 0. -ep_semelle-lpieug noeud 6 portee -ep_semelle-lpieud #-definition des appuis #appui 1,4 dx dy rz appui 5,6 dy #-defintion des liaisons pour i=1 a 3 << barre i i i+1 >> barre 4 5 1 barre 5 4 6 #-definition des excentrements exc 4 ex y -ep_semelle 5 or y -ep_semelle #-definition des caracteristiques differees cara 1 sx ep_piedroit iz ep_piedroit_eq**3/12 2 sx ep_trav_sup iz ep_trav_sup**3/12 3 sx ep_piedroit iz ep_piedroit_eq**3/12 cara pse xx = 0. 4 sx cfpg*pi*dpieug**2 iz cfpg*pi*dpieug**4/64 pour i=1 a ncoug << j = ncoug+1-i xx = xx+hcoug(j) ; zone i kfy cfpg*dpieug*kvsolg(j) xl xx >> xx = 0. 5 sx cfpd*pi*dpieud**2 iz cfpd*pi*dpieud**4/64 pour i=1 a ncoud << xx = xx+hcoud(i) ; zone i kfy cfpd*dpieud*kvsold(i) xl xx >> cons tout e ebv ro rob temp 1e-5 #-definition des sections d'etude etude effort depla tout se 0 a 1 pas .1 charg 1 'poids propre du cadre + qsup + hremb ' poids propre tout barre 2 uni fy -qsup fin charg 2 'poussee des terres unitaire k=1' barre 1 lin xl 0. 1. rel fx (y2+hsremb)*rosol hsremb*rosol 3 lin xl 0. 1. rel fx -hsremb*rosol -(y2+hsremb)*rosol fin charg 3 'effet d un chargement unitaire des remblais' barre 1 uni fx 1 3 uni fx -1 fin charg 4 'effet du retrait' defor 2 uni dx -d_retrait fin charg 5 'effet temperature de 1 degre lentement variable' temp 2 uni 1 fin exec charg env 1 'pousse des terres rank1,rank2' charg 2 rank1 charg 2 rank2 fin env 2 comb 'combinaison els des charges permanentes ' charg 1 #-poids propre env 1 #-pousse des terres charg 4 0 1 #-retrait fin env 3 comb 'combinaison elu des charges permanentes ' charg 1 1. 1.35 #-poids propre env 1 1. 1.35 #-pousse des terres charg 4 0. 1.35 #-retrait fin #-definition des caracteristiques instantanees des pieux cara pse xx = 0. 4 sx cfpg*pi*dpieug**2 iz cfpg*pi*dpieug**4/64 pour i=1 a ncoug << j = ncoug+1-i xx = xx+hcoug(j) ; zone i kfy cfpg*dpieug*kisolg(j) xl xx >> xx = 0. 5 sx cfpd*pi*dpieud**2 iz cfpd*pi*dpieud**4/64 pour i=1 a ncoud << xx = xx+hcoud(i) ; zone i kfy cfpd*dpieud*kisold(i) xl xx >> #-definition du modul instantane du beton cons tout e ebi ro rob temp 1e-5 #-charges d'exploitation tablier barre 2 pas_ligne .25 fin civil = vide ; militaire = vide SI( kxal > 10e-7 ) << civil = civil,1 surch 1 'effet du chargement A(l)' al pond kxal fin >> SI( kxbc > 10e-7 ) << civil = civil,2 surch 2 'effet du convoi bc' bc pond kxbc*del_bc fin >> SI( kxbt > 10e-7 ) << civil = civil,3 surch 3 'effet du convoi bt' bt pond kxbt*del_bt fin >> SI( kxmc80 > 10e-7 ) << militaire = militaire,4 surch 4 'effet du convoi militaire mc80' mc80 pond kxmc80*del_mc80 fin >> SI( kxme80 > 10e-7 ) << militaire = militaire,5 surch 5 'effet du convoi militaire mc80' me80 pond kxme80*del_me80 fin >> SI( kxmc120 > 10e-7 ) << militaire = militaire,6 surch 6 'effet du convoi militaire mc120' mc120 pond kxmc120*del_mc120 fin >> SI( kxme120 > 10e-7 ) << militaire = militaire,7 surch 7 'effet du convoi militaire mc120' me120 pond kxme120*del_me120 fin >> exec surch civil,militaire env 4 'enveloppe des charges d''exploitation' surch civil 1.2 surch militaire fin charg 6 'effet temperature de 1 degre rapidement variable' temp 2 uni 1 fin exec charg 6 env 5 comb 'effet de la temperature' charg 5 -30 20 #-variation lente charg 6 -10 10 #-variation rapide fin env 6 comb 'enveloppe ELS' env 2 #-charges permanentes ELS env 4 #-charges d'exploitation env 5 0.6 #-temperature fin env 7 comb 'enveloppe ELU' env 3 #-charges permanentes ELU env 4 1.35 #-charges d'exploitation env 5 1.3*0.6 #-temperature fin