3 DEBUT(CODE=_F(NOM='AHLV100A',),);
7 AIR=DEFI_MATERIAU(FLUIDE=_F(RHO=1.3,
8 CELE_C=('RI',343.0,0.0),),);
10 CHAMPMAT=AFFE_MATERIAU(AFFE=_F(MATER=AIR,
14 GUIDE=AFFE_MODELE(MAILLAGE=MAIL,
17 PHENOMENE='ACOUSTIQUE',
18 MODELISATION='3D',),);
20 CHARACOU=AFFE_CHAR_ACOU(MODELE=GUIDE,
21 VITE_FACE=_F(VNOR=('RI',0.014,0.0),
22 GROUP_MA='ENTREE',),);
24 IMPEACOU=AFFE_CHAR_ACOU(MODELE=GUIDE,
25 IMPE_FACE=_F(IMPE=('RI',445.89999999999998,0.0),
26 GROUP_MA='SORTIE',),);
28 MACRO_MATR_ASSE(CHAM_MATER=CHAMPMAT,
29 MATR_ASSE=(_F(MATRICE=CO('MATASK'),
31 _F(MATRICE=CO('MATASM'),
33 _F(MATRICE=CO('MATASI'),
34 OPTION='AMOR_ACOU',),),
39 VECTELEM=CALC_VECT_ELEM(OPTION='CHAR_ACOU',
43 IMPR_MATRICE(MATR_ELEM=_F(GRAIN='MAILLE',
46 FICHIER='RESULTAT',),);
48 VECTASS=ASSE_VECTEUR(VECT_ELEM=VECTELEM,
51 MATASKR=COMB_MATR_ASSE(COMB_R=_F(PARTIE='REEL',
55 MATASMR=COMB_MATR_ASSE(COMB_R=_F(PARTIE='REEL',
59 MODES=MODE_ITER_SIMULT(MATR_A=MATASKR,
61 CALC_FREQ=_F(OPTION='BANDE',
62 FREQ=(1.0,1000.0),),);
64 TEST_RESU(RESU=(_F(RESULTAT=MODES,
95 PRECISION=5.0000000000000001E-3,
101 PRECISION=5.0000000000000001E-3,
103 VALE=874.48199999999997,
107 PRECISION=5.0000000000000001E-3,
109 VALE=923.55600000000004,
113 MATRES=COMB_MATR_ASSE(COMB_C=(_F(MATR_ASSE=MATASK,
116 COEF_R=-9.8696044000000004E6,),
117 _F(COEF_C=('RI',0.0,3141.5925999999999),
118 MATR_ASSE=MATASI,),),);
120 IMPR_MATRICE(MATR_ASSE=_F(GRAIN='NOEUD',
124 FICHIER='RESULTAT',),);
126 IMPR_MATRICE(MATR_ASSE=_F(GRAIN='VALEUR',
130 FICHIER='RESULTAT',),);
132 VECRES=COMB_CHAM_NO(COMB_C=_F(COEF_C=('RI',0.0,-3141.5925999999999),
135 MATRES=FACT_LDLT(reuse =MATRES,
138 VECRES=RESO_LDLT(reuse =VECRES,
142 TEST_RESU(CHAM_NO=(_F(CHAM_GD=VECRES,
144 VALE_C=('RI',-6.2426000000000004,0.0),
148 VALE_C=('RI',-6.2426000000000004,0.0),
152 VALE_C=('RI',6.0236799999999997,1.6387),
156 VALE_C=('RI',6.0236799999999997,1.6387),
159 CHNODBEL=CALC_CHAM_ELEM(MODELE=GUIDE,
161 OPTION='PRES_ELNO_DBEL',
164 TEST_RESU(CHAM_ELEM=(_F(CHAM_GD=CHNODBEL,
166 VALE=109.90000000000001,
171 VALE=109.90000000000001,
176 VALE=109.90000000000001,
181 VALE=109.90000000000001,
185 PREEL=CALC_CHAM_ELEM(MODELE=GUIDE,
187 OPTION='PRES_ELNO_REEL',
190 TEST_RESU(CHAM_ELEM=(_F(CHAM_GD=PREEL,
192 VALE=-6.2426000000000004,
197 VALE=-6.2426000000000004,
202 VALE=6.0236799999999997,
207 VALE=6.0236799999999997,
211 PIMAG=CALC_CHAM_ELEM(MODELE=GUIDE,
213 OPTION='PRES_ELNO_IMAG',
216 TEST_RESU(CHAM_ELEM=(_F(CHAM_GD=PIMAG,
241 PRESHARM=DYNA_LINE_HARM(MATR_MASS=MATASM,
245 EXCIT=_F(PUIS_PULS=1,
250 TEST_RESU(RESU=(_F(NOM_CHAM='PRES',
253 VALE_C=('RI',-6.2426000000000004,0.0),
259 VALE_C=('RI',-6.2426000000000004,0.0),
265 VALE_C=('RI',6.0236799999999997,1.6387),
271 VALE_C=('RI',6.0236799999999997,1.6387),
275 PRESHARM=CALC_ELEM(reuse =PRESHARM,
279 OPTION='INTE_ELNO_ACTI',
282 TEST_RESU(RESU=(_F(NOM_CHAM='INTE_ELNO_ACTI',
286 PRECISION=0.029999999999999999,
287 VALE=0.043700000000000003,
290 _F(NOM_CHAM='INTE_ELNO_ACTI',
294 PRECISION=0.029999999999999999,
295 VALE=0.043700000000000003,
298 _F(NOM_CHAM='INTE_ELNO_ACTI',
302 PRECISION=0.029999999999999999,
303 VALE=0.043700000000000003,
306 _F(NOM_CHAM='INTE_ELNO_ACTI',
310 PRECISION=0.029999999999999999,
311 VALE=0.043700000000000003,
315 PRESHARM=CALC_ELEM(reuse =PRESHARM,
319 OPTION='INTE_ELNO_REAC',
322 TEST_RESU(RESU=(_F(NOM_CHAM='INTE_ELNO_REAC',
331 _F(NOM_CHAM='INTE_ELNO_REAC',
340 _F(NOM_CHAM='INTE_ELNO_REAC',
349 _F(NOM_CHAM='INTE_ELNO_REAC',
359 PRESHARM=CALC_ELEM(reuse =PRESHARM,
363 OPTION='PRES_ELNO_DBEL',
366 TEST_RESU(RESU=(_F(NOM_CHAM='PRES_ELNO_DBEL',
370 VALE=109.90000000000001,
373 _F(NOM_CHAM='PRES_ELNO_DBEL',
377 VALE=109.90000000000001,
380 _F(NOM_CHAM='PRES_ELNO_DBEL',
384 VALE=109.90000000000001,
387 _F(NOM_CHAM='PRES_ELNO_DBEL',
391 VALE=109.90000000000001,
395 PRESHARM=CALC_ELEM(reuse =PRESHARM,
399 OPTION='PRES_ELNO_REEL',
402 TEST_RESU(RESU=(_F(NOM_CHAM='PRES_ELNO_REEL',
406 VALE=-6.2426000000000004,
409 _F(NOM_CHAM='PRES_ELNO_REEL',
413 VALE=-6.2426000000000004,
416 _F(NOM_CHAM='PRES_ELNO_REEL',
420 VALE=6.0236799999999997,
423 _F(NOM_CHAM='PRES_ELNO_REEL',
427 VALE=6.0236799999999997,
431 PRESHARM=CALC_ELEM(reuse =PRESHARM,
435 OPTION='PRES_ELNO_IMAG',
438 TEST_RESU(RESU=(_F(NOM_CHAM='PRES_ELNO_IMAG',
446 _F(NOM_CHAM='PRES_ELNO_IMAG',
454 _F(NOM_CHAM='PRES_ELNO_IMAG',
463 _F(NOM_CHAM='PRES_ELNO_IMAG',