Mode Spectrale Et Analyse Sismique
Mode Spectrale Et Analyse Sismique
Mode Spectrale Et Analyse Sismique
EDF-DER
Dpartement Acoustique et Mcanique Vibratoire
1 avenue du Gnral de Gaulle
92141 CLAMART CEDEX
Responsable: M J. PIG AT
Bernard VIOLA 1er avril - 30 juin 1999
Table des matires
Remerciements 3
Abstract 4
Rsum 5
Introduction 6
Bibliographie 35
Annexes 36
Remerciements
Equations gnrales du
mouvement
1.1 Introduction
Cette partie prsente les quations gnrales du mouvement d'une struc-
ture discrtise excite en plusieurs points d'appuifl]. On aboutira un sys-
tme d'quations modales dcouples. Puis suit une prsentation du principe
des mthodes spectrales.
Jp I
E = V.U
De 1.1 on tire alors :
Mn.Xr + An.Xr + Ku.Xr =
-Mn. - AU. - Kn.E - M2. - Al2. - K12.U
Soit:
Ku.V + K12 = 0
t=i
On obtient un systme d'quations dcouples en projetant 1.3 sur la
base $, et en utilisant les notations et proprits suivantes :
ij .. .0
(
En supposant que la matrice d'amortissement peut se diagonaliser ainsi
sur la base des modes propres :
...0
O...2mnfnu;n
Le systme obtenu est de la forme :
p
di + 2iL>ii + iJfai = Y, Pkilktt) (1.4)
k=i
i = 1...71
fiki
m-
ieme
o 9k est la k colonne de $ et ik est la kteme colonne d'une matrice
identit de dimensions (p,p).
On obtient ainsi un systme d'quations dcouples.
9
1.4 Estimation du maxima de la rponse
La mthode d'estimation du maxima de la rponse de la structure est
base sur la notion de Spectres de Rponse d'Oscillateur. La rponse du
systme la sollicitation sismique peut en effet tre crite comme une com-
binaison des rponses lmentaires d'oscillateurs rgis par les quations:
10
Chapitre 2
2.1 Introduction
Le chapitre prcdant ayant prsent les quations gnrales des m-
thodes spectrales en multi-appui, il s'agit maintenant de voir les diffrentes
faons de recombiner les rponses lmentaires qui ont t notes #,*. L'ordre
des combinaisons suivant i ou k n'tant pas fix a priori et les mthodes de
recombinaison possibles tant varies, il en rsulte de multiples mthodes
que nous allons maintenant comparer, en utilisant comme rfrence l'ana-
lyse bibliographique [2].
11
La mthode ABSUM, ou de la sommation absolue, consiste recom-
biner les composantes lmentaires selon :
Ri = E 1^*1
fc=l
k=l
Ri =
\
Elle est valable lorsque les excitations aux diffrents niveaux sont indpen-
dantes. L'utilisation de cette mthode passe donc par la justification d'une
indpendance statistique.
k=l m=l
12
selon les modes
Outre les mthodes ABSUM et SRSS d'autres mthodes de recom-
binaison sont possibles, dont certaines ont t dveloppes pour prendre en
compte la corrlation entre rponses modales.
R = maXi\Ri\ +
\ i=i
C'est--dire que les mthodes ABSUM et SRSS fournissent une borne su-
prieure et une borne infrieure du maximum de la rponse. La mthode
de Navy a alors l'avantage de donner des rsultats intermdiaires, mais elle
n'est pas valable dans le cas de modes voisins.
\RuRv\
\ tt=l V=l
Cela induit une corrlation complte entre modes voisins, et aucune corrla-
tion entre modes plus loigns. Des coefficients de corrlation plus fins sont
prsents ci-aprs.
- 2)2 + 2
u + U) + 4(2 +
13
\ 1X=1 V=l
Cette mthode CQC rentre dans la famille des mthodes de la double somme
(DSC, ou Double Sum Combination), qui fait intervenir un coefficient de
corrlation entre modes, soit dfini comme ci-dessus (mthode CQC), soit
dfini par d'autres propositions, comme celle de Rosenblueth et Elorduy :
14
2.4 La mthode des spectres croiss
Cette mthode [2] est base sur une extension du concept de spectre de
plancher. Elle fait intervenir des spectres "oscillateur-crois plancher-crois",
qui permettent de tenir compte de la corrlation entre rponses modales et
entre les excitations aux diffrents points d'appui.
Notations
Les systmes 1 et 2 sont respectivement les systmes primaire et secon-
daire.
n et nb dsignent respectivement les nombres de ddl libres et contraints
du systme 2.
X(t) et U(t) sont les vecteurs dplacement absolu respectivement des n
et nb ddl du systme 2.
^12) A\2 et K\2 sont les matrices caractristiques de couplage entre les
n et nb ddl du systme 2.
Mil) -<4ii et Kn sont les matrices caractristiques relatives aux n ddl
libres du systme 2.
Ci, u>i et $i sont le taux d'amortissement, la pulsation et le vecteur propre
associs au mode i du systme 2.
Formulation de la mthode
On considre l'quation du mouvement absolu des n ddl libres du systme
secondaire :
Mn.X + An.X + Kn.X =-Kl2.U (2.1)
Dans l'hypothse de vibrations stationnaires alatoires, on cherche la
Densit Spectrale de Puissance 5 ^ % de l'acclration Xr du ddl r.
n n nb nb
S*r*M) = E E r<ori E E bikbjrfulhiMhjMSs^ M (2.2)
t=lj=l fc=l1=1
15
On s'intresse maintenant au carr moyen de la rponse :
+00
E[X?] = J SxrJir
Soit:
Avec:
+00
n n nb
EE
=i j=i
art arj E 1=1
(2.3)
16
Bilan
On obtient ainsi une estimation de la valeur moyenne de la rponse
maximale du systme secondaire en fonction des spectres CCFS.
Si on connait les caractristiques du systme primaire, la mthode n-
cessite de gnrer les spectres CCFS partir des spectres de rponse au
sol.
Il existe une mthode [2] pour l'valuation du spectre CCFS, not ici
Skiiviii'iVjij)' Elle consiste faire dans un premier temps la synthse
modale dynamique du systme compos la fois du systme primaire et des
deux oscillateurs (WJ,J) et (UJJ,J) excits aux points d'appui k et /. Dans
un deuxime temps, on utilise une formule d'valuation du spectre CCFS
qui recombine les rponses modales lmentaires.
17
2.5 La mthode de Der Kiureghian
Introduction
Pour l'tablissement des quations gnrales du problme, ainsi que pour
les diffrentes notations utilises, on pourra se rfrer au chapitre prcdant
ou [1].
La mthode dveloppe par Der Kiureghian et Neuenhofer est une nou-
velle approche prvue pour l'analyse sismique multi-supports. Elle est int-
ressante dans la mesure o elle prend en compte les variations d'excitations
aux diffrents points de support. Une fonction de cohrence est introduite.
Elle traduit les variations de l'excitation dues aux phnomnes de propa-
gation d'onde, de perte de cohrence avec la distance et de variation des
proprits locales du sol.
Cette mthode prend bien en compte les effets de corrlation aussi bien
entre supports qu'entre modes de vibration de la structure. Elle a t teste
avec une tude mene sur un exemple de pont [7], et elle est adapte pour
l'tude d'une structure quelconque multi-supporte.
Equations du mouvement
On considre une structure dont l'quation du mouvement sous forme
matricielle est (voir 1.1):
Les quations dcouples obtenues aprs projection sur la base des modes
propres non amortis est de la forme (voir 1.4) :
(2.6)
k=i
i = l...n
Enfin, en rappelant qu'on note Sjt;() les rponses des oscillateurs rgis
par les quations :
hi + 2^w,-iw + ufski
i = l...n
k = l...p
18
on montre qu'une rponse quelconque du systme, qui peut s'crire comme
une combinaison linaire des dplacements nodaux (z(t) = qtX{i) = qt(Xr(t)+
E(t))), se met sous la forme :
Formulation de la mthode
La mthode de Der Kiureghian s'appuie sur la thorie des vibrations
alatoires. On cherche la Densit Spectrale de Puissance de la rponse z(t),
qui s'crit, en partant de l'quation 2.7 :
+ E E 66H,-Mfl'i(-iW)Gfilkai M
A;=l / = 1 t = l j = l
p p n n
+ E E E E bkibljPstiStjPsk.Vstj
k=l 1=1 i=l j = l
Avec les notations suivantes :
Soient les carrs des variances du dplacement Uk(t) au point d'appui k
et de la rponse Sfc, :
19
Soit le coefficient de corrlation croise entre le dplacement Uk (t) et
oo
Puh.h = a a J fl,-(-tw)Gttt,(w)dw
"* "''-oo
fi** ()<?,,()
Uk,max PukVuk
"" 2
fc=l Z = l t = l j = l
20
Or les facteurs de pic dpendent peu des caractristiques de chaque pro-
cessus, leurs rapports sont donc proches de l'unit, c'est pourquoi on peut
crire finalement :
. P P
E[max\z(t)\]
lk=l 1=1
P P n
+2'
k=i l=ij=i
l
2
21
La fonction de cohrence
La fonction de cohrence permet de prendre en compte les effets de
variation de l'excitation dues aux phnomnes de propagation d'onde, de
perte de cohrence avec la distance et de variation des proprits locales du
sol.
La fonction de cohrence est dfinie par :
[G k
C'est une fonction complexe dont le module est compris entre -1 et 1,
qui peut s'crire sous forme trigonomtrique :
Jki(iu) = \lki(iu)\exp[iOki(u)]
Cette forme permet, comme on va le voir, de caractriser les diffrents effets
d'incohrence qui existent entre les supports. Il n'existe pas d'expression
thorique de cette fonction de cohrence. Plusieurs modles, que nous allons
prsenter ici, sont disponibles. Ils rendent compte des phnomnes travers
des coefficients qui doivent tre dtermins de faon emirique en faisant une
moyenne statistique sur des enregistrements.
On peut adopter le modle suivant, qui rend compte des effets de pro-
pagation d'onde et d'incohrence :
ex
P
22
l7w(*w) I caractrise le phnomne d'incohrence tandis que l'argument 6ki (u>)
est dcompos en deux termes qui caractrisent l'effet de propagation de
l'onde (c'est--dire le fait que deux supports ne voient pas arriver l'onde au
mme instant) et l'effet de rponse du site (variations des proprits locales
aux supports). Der Kiureghian a propos les modles suivant pour ces trois
composantes :
\lkl(iu)\incoherence = co8\0(dkhU)]exp [ - i
= eki(u)wave-paaaa9e i
/^wave-passage _
i{-u))
a(dki,u) et f3(dki,u>) sont des fonctions qui doivent tre dtermines de fa-
on empirique, en faisant une statistique sur des enregistrements.
reprsente la fonction de transfert du site au point d'appui k.
23
Chapitre 3
3.1 Introduction
La deuxime partie du stage a consist dvelopper un outil de compa-
raison sous Matlab pour les diffrentes mthodes spectrales en multi-appui.
Afin de valider le programme, il est ncessaire d'avoir des rsultats de r-
frence fiables. C'est ainsi qu'on a dans un premier temps programm la
mthode temporelle d'analyse sismique, programmation qui a t valide en
prenant un cas test trs simple dont les rsultats sont rpertoris.
Dans un premier temps, intressons-nous donc la manire de calculer
la rponse sismique avec cette mthode temporelle.
24
V\A Ml
vw 2
vw vw
m3
25
J Q , (t = l...n)
En utilisant des modes propres normaliss par rapport la masse modale,
en notant a(t) le vecteur des variables modales, KG la matrice des raideurs
modales et SM(t) le second membre de l'quation projete, il vient finale-
ment :
m.u)0
to=0
Ainsi, si on revient au systme 3.2, on peut calculer le vecteur des va-
riables modales, en intgrant :
t
MO = / 8in(u>0(t - to))SMi{to)dto (3.3)
to=0 wo
J
(t = l...n)
Le programme Matlab qui calcule la rponse d'un systme par cette
mthode temporelle valide avec les rsultats de [8] est fourni en Annexe 3.
3.5 Validation
Les rsultats fournis par la mthode temporelle programme sous Mat-
lab sont compars ceux rpertoris dans [8]. Ils sont prsents en terme de
26
dplacements relatifs aux trois ddl libres du systme 3 masses 4 ressorts sou-
mis l'acclration a.t2 en un point d'appui. Voici le tableau des rsultats,
cinq instants conscutifs :
27
Chapitre 4
4.1 Introduction
Aprs une analyse bibliographique sur les mthodes spectrales, on pr-
sente dans ce chapitre l'outil Matlab qui permet d'effectuer des tests sur
les diffrentes mthodes de recombinaison possibles. Les rsultats obtenus
sont compars, en erreur relative, ceux fournis par le programme d'analyse
temporelle (cf chapitre prcdent). Le dveloppement du programme s'est
fait en plusieurs tapes, dont on prsente dans ce chapitre les rsultats de
validation.
28
Validation
Voici les rsultats de la validation de la mthode spectrale en mono-
appui implmente sous Matlab. Pour cela on dispose de rsultats du code
de calcul en mcanique de EDF, le Code Aster, o les mthodes spectrales
en mono-appui ont dj t programmes.
Le calcul a t effectu avec le Code Aster en prenant les mmes donnes
que pour le cas test prsent au chapitre 3, en se plaant en mono-appui, donc
en considrant la mme excitation aux deux points d'appui. Le programme
Aster utilise un mode de recombinaison SRSS. On considre cependant cette
fois un amortissement modal identique pour tous les modes, dont le taux est
= 4%. Les rsultats sont compars t = ls. On considre pour ce premier
calcul spectral sous Matlab seulement deux mthodes de recombinaison,
savoir les mthodes SRSS et CQC, voir chapitre 2. Voici les rsultats obte-
nus, qui valident le programme Matlab dvelopp. Le tableau prsente les
maxima du dplacement relatif des trois masses, exprim en mtre. L'cart
est calcul en prenant le calcul Aster comme rfrence.
29
4.3 Tests sur les mthodes de recombinaison mo-
dales
Le but de ces tests est de valider un outil de comparaison entre les
diffrentes mthodes de recombinaison modales. Les mthodes implmentes
sous Matlab sont :
la mthode ABSUM,
la mthode SRSS,
la mthode de Navy,
la mthode des 10 %,
la mthode CQC.
On considre toujours le systme simple du cas test (cf Chapitre 3).
Cependant on peut faire varier des paramtres tels que les valeurs des masses,
des raideurs, les acclrations aux deux points d'appui.
Pour comparer les mthodes de recombinaison modale, on se place en
mono-appui (l'acclration aux deux points d'appui est identique). On note
roi, m2, 77i3 les trois masses du systme (cf figure 3.2).
On utilise l'acclrogramme d'un sisme, ainsi que le SRO qui lui est
associ, calcul avec le code Aster :
30
Pseudo-acceleratian, en g Acceleration en m.s-2
CO
\ - \ - \ : ! : . . . . : . - - : . . : . . : . . : . .
Voici quelques rsultats, en terme de dplacements relatifs des trois
masses, compars avec des calculs du code Aster : Ce premier tableau de
rsultats permet de valider le programme Matlab.
32
de recombinaison modale. On calcule pour cela l'erreur relative de chaque
mthode par rapport la rponse temporelle fournie par Aster. Voici les
rsultats obtenus :
33
Conclusion
34
Bibliographie
[3] R.-J. GIBERT. Vibrations des Structures. Interactions avec les fluides.
Sources d'excitation alatoires. CEA-EDF.INRIA.Ecole d't d'analyse
numrique, 1988.
[4] Code Aster. EDF.DER. Rponse sismique par mthode spectrale, 1995.
35
Annexes
36
Annexe 1
37,
Pseudo-acceleration(g) Acoeleration(m.s-2)
i 1
: : \
: : \
\
-
CO
00
f
: : i
Accelerogramme
10'
39
Annexe 2
40
Erreur relative. Absum-Methode temporelle
42
<%Donnees du problme: matrices de masse, raideur, amortissement...%%
:
<Parametres qui dterminent le calcul en mono ou multi-appui
~>q = [ 1 1 ] ;
Matrices de masse, de raideur, d'amortissement
-l = 1 0 ;
~il = m ;
2 = m ;
~3 = m ;
k = 10*4;
kl = k;
"2 = k;
k3 = k;
k4 = k;
'fM = [ml 0 0; 0 m2 0; 0 0 m3] ;
KK = [(kl+k2) (-k2) 0; (-k2) (k2+k3) (-k3); 0 (-k3) (k3+k4)];
AA = [0 0 0; 0 0 0; 0 0 0] ;
%Matrice des coefficients d'amortissement rduits
KSI = [0.04 0.04 0.04]';
%clear
?
?format long
%%Lecture des donnes du probleme%%
%%%%%%%%
%donnees
figure
'-subplot (3,3,4)
grid
mesh(Xr)
title ('Dplacement relatif)
%print figl
?
-figure
?
o subplot (3,3,5)
g
?
mesh (Xa)
?
title ('Dplacement absolu')
Sprint fig2
' A
N ft
%%Reponse sismique par mthode spectrale%%
clear
close all
format long
donnes
%for k = l:nk
anmax = zeros(length(D),2);
for 1=1:length(D)
for opt=l:2
1
anmax(1,opt) = SM(l,opt)/(mn(1,1)*D(1,1))*SRO(1,opt);
if pq(l) == pq(2)
anmax(l,opt) = abs(SMI(1)+SM2(1))/(mn(1,1)*D(1,1))*SRO
break
end
end
end
end
for i=l:length(D)
MAXSRSS(i) = MAXMSRSS(i,l)*2+MAXMSRSS(i,2)A2;
MAXSRSS(i) = sqrt(MAXSRSS(i));
end
MAXSRSS
figure
%subplot(3,3,1)
grid
plot(MAXSRSS)
title('Maxima en dplacements aux ddl actifs, combinaison SRSS')
%print figlOl
%
%%Maxima pour les dplacements aux ddl actifs%%%
%%Utilisation de la combinaison quadratique CQC%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%Calcul de la matrice des coefficients de correlation...
for i=l:length(D)
for j=1:length(D)
rho(i,j) = 8*sqrt(KSI(i)*KSI(j)*Omega(i,i)*Omega(j,j));
rho(i, j) = rho(i, j) * (KSI (i) *Omega(i, i)+KSI (j) *Omega(j , j) ) *Omega(i,i) *Omega(j ,
tmp = (Omega(i,i)A2-Omega(j,j)*2)A2;
tmp = tmp+4*KSI(i)*KSI(j)*Omega(i,i)*Omega(j,j)*(Omega(i,i)*2+Omega(j,j)A2);
tmp = tmp+4*(KSI(i)A2+KSI(j)A2)*Omega(i,i)^2*Omega(j,j)*2;
rho(i,j) = rho(i,j)/tmp;
end
end
MAXMALG = zeros(length(D),2);
for opt=l:2
for i=l:length(D)
tmp = 0 ;
for 1=1:length(D)
tmp = tmp+anmax(1,opt)*Fi(i,1);
end
MAXMALG(i,opt) = tmp;
end
end
for i=l:length(D)
MAXALG(i) = MAXMALG(i,l)A2+MAXMALG(i,2)A2;
MAXALG(i) = sqrt(MAXALG(i));
end
MAXALG = abs(MAXALG)
figure
%subplot(3,3,8)
grid
plot(MAXALG)
title('Maxima en dplacements aux ddl actifs, combinaison somme algebr
%print figlO3
MAXMABS = zeros(length(D),2);
for opt=l:2
for i=l:length(D)
tmp = 0;
for 1=1:length(D)
tmp = tmp+abs(anmax(1,opt)*Fi(i,1));
end
MAXMABS(i,opt) = tmp;
end
end
for i=l:length(D)
MAXABS(i) = MAXMABS(i,1)A2+MAXMABS(i,2)^2 ;
MAXABS(i) = sqrt(MAXABS(i));
end
MAXABS
figure
%subplot(3,3,8)
grid
plot(MAXABS)
title('Maxima en dplacements aux ddl actifs, combinaison sommation ab
%print figlO3
%%%Maxima pour les dplacements aux ddl actifs%%%%%%%%%%
%%%%%Utilisation de la combinaison mthode de Navy%%%%%%
MAXMNavy = zeros(length(D),2);
for opt=l:2
for i=l:length(D)
%%Recherche du maxima selon les modes |Ri|max pour chaque comp
tempo = 0;
for 1=1:length(D)
if (abs(anmax(1,opt)*Fi(i,1))>=tempo)
tempo = (anmax(1,opt)*Fi(i,1));
end
end
tmp = 0;
for 1=1:length(D)
tmp = tmp + (anmax (1, opt) *Fi (i, 1) ) *2 ;
end
tmp = tmp - tempo'*>2 ;
tmp = sqrt(tmp);
MAXMNavy(i,opt) = tempo + tmp;
end
end
for i=l:length(D)
MAXNavy(i) = MAXMNavy(i,1)A2+MAXMNavy(i,2)A2;
MAXNavy(i) = sqrt(MAXNavy(i));
end
MAXNavy
figure
%subplot(3,3,8)
grid
plot(MAXNavy)
title('Maxima en dplacements aux ddl actifs, mthode de Navy')
%print figlO3
temp
for i length(D)
epsl(i) = (abs(MAX(i,1))-abs(MAXSRSS(i)))/abs(MAX(i,l))
eps2(i) = (abs(MAX(i,1))-abs(MAXCQC(i)))/abs(MAX(i,l));
eps3(i) = (abs(MAX(i,l))-abs(MAXALG(i)))/abs(MAX(i,1));
eps4(i) = (abs(MAX(i,l))-abs(MAX10(i)))/abs(MAX(i,1));
eps5(i) = (abs(MAX(i,l))-abs(MAXNavy(i)))/abs(MAX(i,1))
eps6(i) = (abs(MAX(i,l))-abs(MAXABS(i)))/abs(MAX(i,1));
end
figure
%subplot(3,3,6)
grid
plot(100*epsl)
xlabel ( 'Noeuds' ) oil Kl.
ylabel('Erreur relative en % ' ) *
title('Erreur relative comparant SRSS avec temp')
%print fig301
figure
%subplot(3,3,7)
grid
plot(100*eps2)
xlabel('Noeuds')
ylabel('Erreur relative en %')
title('Erreur relative comparant CQC avec temp')
%print fig3 02
f igure
%subplot(3,3,9)
grid
plot(100*eps3)
xlabel('Noeuds')
ylabel('Erreur relative en %')
title('Erreur relative comparant ALG avec temp')
%print fig303
figure
%subplot(3,3,9)
grid
plot(100*eps4)
xlabel('Noeuds')
ylabel('Erreur relative en %')
title('Erreur relative comparant 10% avec temp')
%print fig304
figure
%subplot(3,3,9)
grid
plot(100*eps5)
xlabel('Noeuds')
ylabel('Erreur relative en %')
title('Erreur relative comparant Navy avec temp')
%print fig3 04
figure
%subplot(3,3,9)
grid
plot(100*eps6)
xlabel('Noeuds')
ylabel('Erreur relative en %')
title('Erreur relative comparant ABS avec temp')
%print fig3 04
%end
n II-
t i AM \ i -
%%%%%%%%%%%%%%%%%%%%%%
%%Reponse sismique par mthode spectrae%%
clear
close all
format long
%for k = l:nk
anmax = zeros(length(D),2);
for 1=1:length(D)
for opt=l:2
1
anmax(1,opt) = SM(l,opt)/(mn(1,1)*D(1,1))*SRO(l,opt);
%if pq(l) == pq(2)
%anmax(l,opt) = abs(SM1(1)+SM2(1))/(mn(l,1)*D(1,1))*SR
%break
%end
end
end
%%Combinaison ABSUM
for i=l:length(D)
MAXABS(i) = abs(MAXM(i,l))+abs(MAXM(i,2));
end
MAXABS
figure
%subplot(3,3,2)
grid
plot(MAXABS)
title('Maxima en dplacements aux ddl actifs, combinaison ABSUM')
%print fig201
%%Combinaison SRSS
for i=l:length(D)
MAXSRSS(i) = MAXM(i,l)A2+MAXM(i,2)A2;
MAXSRSS(i) = sqrt(MAXSRSS( i ) ) ;
end
MAXSRSS
figure
%subplot(3,3,2)
grid
plot(MAXSRSS)
title('Maxima en dplacements aux ddl actifs, combinaison SRSS')
%print fig201 ^
%temp
%for i=l:length(D)
% epsl(i) = (abs(MAX(i,l))-abs(MAXSRSS(i)))/abs(MAX(i,l))
% eps2(i) = (abs(MAX(i,l))-abs(MAXCQC(i)))/abs(MAX(i,1));
% eps3(i) = (abs(MAX(i,l))-abs(MAXALG(i)))/abs(MAX(i,1));
% eps4(i) = (abs(MAX(i,l))-abs(MAX10(i)))/abs(MAX(i,1));
% eps5(i) = (abs(MAX(i,l))-abs(MAXNavy(i)))/abs(MAX(i,1))
% eps6(i) = (abs(MAX(i/l))-abs(MAXABS(i)))/abs(MAX(i,1));
%end
%figure
%subplot(3,3,6)
%grid
%plot(100*epsl)
%xlabel('Noeuds')
%ylabel('Erreur relative en %')
%title('Erreur relative comparant SRSS avec temp')
%print fig301
%figure
%subplot(3,3,7)
%grid
%plot(100*eps2)
%xlabel('Noeuds )
%ylabel('Erreur relative en %')
%title('Erreur relative comparant CQC avec temp')
%print fig302
%figure
%subplot(3,3,9)
%grid
%plot(100*eps3)
%xlabel('Noeuds')
%ylabel('Erreur relative en %')
%title('Erreur relative comparant ALG avec temp')
%print fig303
%figure
%subplot(3,3,9)
%grid
%plot(100*eps4)
%xlabel('Noeuds')
%ylabel('Erreur relative en %')
%title('Erreur relative comparant 10% avec temp')
%print fig3 04
%figure
%subplot(3,3,9)
%grid
%plot(100*eps5)
%xlabel('Noeuds')
%ylabel('Erreur relative en %')
%title('Erreur relative comparant Navy avec temp')
%print fig3 04
%figure
%subplot(3,3,9)
%grid
%plot(100*eps6)
%xlabel('Noeuds')
%ylabel('Erreur relative en %')
%title('Erreur relative comparant ABS avec temp')
%print fig304 ^ | vjuUli ukyvux
S-end
%%Fonction qui calcule l'intgrale de buhamel%%
g = max(abs(y))*om A 2;
%%Fonction qui determine le sro en pseudo acceleration%%
%%%%%%%%en utilisant le sro dlivre par Asterix%%%%%%%%%
%%%%%%%%%
function [g] = SGM2(m,om,eps,sro,opt)
%t = max(t_tmp');
%dt = t_tmp(2)-t_tmp(l);
%x = t_tmp;
%n = length(x);
%for i=2:n
% i
% y(i) = Duhamel(m,om,eps,l,dt,x(i),opt);
%end
%g = max(abs(y))*omA2;
n = length(sro);
g = 0;
for i=l:n
if ((sro(i,l))<=(om/(2*3.14)))
g = 9.81*(sro(i,2)+(sro(i+l,2)-sro(i,2))/(sro(i+1,1)-sro(i,l))*((om/(2
end
end
function [g] = ace(t,opt)
%a = 2.0*10A5;
i = length(t);
%load ACC_lbns
load ACCl_avd
load ACC2_avd
dt = ACCl_avd(2,l)-ACCl_avd(l,1) ?
nts = length (ACCl_avd) ;
for k=l:n
1 = round (t (k)/dt)+l;
%while ACC_avd(l,l)<=t(k)
%if ACC_avd(l,l)==t(k)
if opt==l
g(k) = ACCl_avd(l,2);
elseif opt==2
g(k) = ACC2_avd(1,2);
end
%'Thaillault! ! '
%break
%end
%if l==m
%'Liaproblaim!'
%end
%end
nd
%%Fonction qui calcule la vitesse connaissant 1'acceleration%%
n = length(t);
for i=l:n
g(i) = quad8 ('ace' ,0,t(i),[],[] ,opt)
end
function [h] = func(x,m,om,eps,to,f,opt)