1 #& MODIF COMMANDE DATE 30/01/2002 AUTEUR VABHHTS J.TESELET
2 # CONFIGURATION MANAGEMENT OF EDF VERSION
3 # ======================================================================
4 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
5 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6 # REDISTRIBUTION OF THIS FILE.
7 # ======================================================================
20 __version__="$Name: $"
21 __Id__="$Id: cata_aster_v6.py,v 1.12 2001/01/16 15:55:05 iliade Exp $"
23 JdC = JDC_CATA(code='ASTER',
25 regles = (AU_MOINS_UN('DEBUT','POURSUITE'),
27 A_CLASSER(('DEBUT','POURSUITE'),'FIN')))
28 # Type le plus general
29 class entier (ASSD):pass
30 class reel (ASSD):pass
31 class complexe(ASSD):pass
32 class liste (ASSD):pass
33 class chaine (ASSD):pass
45 class cabl_precont (ASSD):pass
46 class cara_elem (ASSD):pass
47 class cara_pout (ASSD):pass
48 class cham_mater (ASSD):pass
49 class char_acou (ASSD):pass
50 class char_cine_acou (ASSD):pass
51 class char_cine_meca (ASSD):pass
52 class char_cine_ther (ASSD):pass
53 class char_meca (ASSD):pass
54 class char_ther (ASSD):pass
55 class courbe (ASSD):pass
56 class fond_fiss (ASSD):pass
57 class interf_dyna_clas(ASSD):pass
58 class interspfact (ASSD):pass
59 class listis (ASSD):pass
60 class listr8 (ASSD):pass
61 class macr_elem_dyna (ASSD):pass
62 class macr_elem_stat (ASSD):pass
63 class mater (ASSD):pass
64 class melasflu (ASSD):pass
65 class modele (ASSD):pass
66 class modele_gene (ASSD):pass
67 class nume_ddl (ASSD):pass
68 class nume_ddl_gene (ASSD):pass
69 class obstacle (ASSD):pass
70 class spectre (ASSD):pass
71 class surface (ASSD):pass
72 class tran_gene (ASSD):pass
73 class type_flui_stru (ASSD):pass
74 class valeur (ASSD):pass
77 #--------------------------------
78 class maillage(ASSD):pass
79 class squelette (maillage):pass
82 # cham_gd (carte,cham_no,cham_elem)
83 #--------------------------------
85 class cham_gd(ASSD):pass
88 #--------------------------------
89 class carte(cham_gd):pass
90 class carte_dbel_r (carte):pass
91 class carte_depl_c (carte):pass
92 class carte_depl_f (carte):pass
93 class carte_depl_r (carte):pass
94 class carte_durt_r (carte):pass
95 class carte_ener_r (carte):pass
96 class carte_epsi_r (carte):pass
97 class carte_erreur (carte):pass
98 class carte_flux_r (carte):pass
99 class carte_g_depl_r (carte):pass
100 class carte_geom_r (carte):pass
101 class carte_hydr_r (carte):pass
102 class carte_inst_r (carte):pass
103 class carte_inte_r (carte):pass
104 class carte_irra_r (carte):pass
105 class carte_meta_r (carte):pass
106 class carte_neut_f (carte):pass
107 class carte_neut_r (carte):pass
108 class carte_pres_r (carte):pass
109 class carte_sief_r (carte):pass
110 class carte_sour_r (carte):pass
111 class carte_temp_f (carte):pass
112 class carte_temp_r (carte):pass
113 class carte_var2_r (carte):pass
114 class carte_vnor_c (carte):pass
117 # cham_gd/cham_elem :
118 #--------------------------------
119 class cham_elem(cham_gd):pass
120 class cham_elem_crit_r(cham_elem):pass
121 class cham_elem_dbel_r(cham_elem):pass
122 class cham_elem_depl_c(cham_elem):pass
123 class cham_elem_depl_f(cham_elem):pass
124 class cham_elem_depl_r(cham_elem):pass
125 class cham_elem_dommag(cham_elem):pass
126 class cham_elem_durt_r(cham_elem):pass
127 class cham_elem_ener_r(cham_elem):pass
128 class cham_elem_epsi_c(cham_elem):pass
129 class cham_elem_epsi_r(cham_elem):pass
130 class cham_elem_erreur(cham_elem):pass
131 class cham_elem_flux_r(cham_elem):pass
132 class cham_elem_g_depl(cham_elem):pass
133 class cham_elem_geom_r(cham_elem):pass
134 class cham_elem_hydr_r(cham_elem):pass
135 class cham_elem_inst_r(cham_elem):pass
136 class cham_elem_inte_r(cham_elem):pass
137 class cham_elem_irra_r(cham_elem):pass
138 class cham_elem_meta_r(cham_elem):pass
139 class cham_elem_neut_f(cham_elem):pass
140 class cham_elem_neut_r(cham_elem):pass
141 class cham_elem_pres_r(cham_elem):pass
142 class cham_elem_sief_c(cham_elem):pass
143 class cham_elem_sief_r(cham_elem):pass
144 class cham_elem_sour_r(cham_elem):pass
145 class cham_elem_temp_f(cham_elem):pass
146 class cham_elem_temp_r(cham_elem):pass
147 class cham_elem_vari_r(cham_elem):pass
148 class cham_elem_vnor_c(cham_elem):pass
152 #--------------------------------
153 class cham_no(cham_gd):pass
154 class cham_no_dbel_r (cham_no):pass
155 class cham_no_depl_c (cham_no):pass
156 class cham_no_depl_f (cham_no):pass
157 class cham_no_depl_r (cham_no):pass
158 class cham_no_durt_r (cham_no):pass
159 class cham_no_ener_r (cham_no):pass
160 class cham_no_epsi_r (cham_no):pass
161 class cham_no_erreur (cham_no):pass
162 class cham_no_flux_r (cham_no):pass
163 class cham_no_g_depl_r (cham_no):pass
164 class cham_no_geom_r (cham_no):pass
165 class cham_no_hydr_r (cham_no):pass
166 class cham_no_inst_r (cham_no):pass
167 class cham_no_inte_r (cham_no):pass
168 class cham_no_irra_r (cham_no):pass
169 class cham_no_meta_r (cham_no):pass
170 class cham_no_neut_f (cham_no):pass
171 class cham_no_neut_r (cham_no):pass
172 class cham_no_pres_c (cham_no):pass
173 class cham_no_pres_r (cham_no):pass
174 class cham_no_sief_r (cham_no):pass
175 class cham_no_sour_r (cham_no):pass
176 class cham_no_temp_c (cham_no):pass
177 class cham_no_temp_f (cham_no):pass
178 class cham_no_temp_r (cham_no):pass
179 class cham_no_vanl_r (cham_no):pass
180 class cham_no_var2_r (cham_no):pass
181 class cham_no_vnor_c (cham_no):pass
184 # resultat : (evol,mode_stat,mode_meca)
185 #--------------------------------
187 class resultat(ASSD):
188 def __getitem__(self,key):
189 return aster.getpara(self.get_name(),"RESULTAT",key[0],key[1])
191 class acou_harmo (resultat):pass
192 class base_modale (resultat):pass
193 class comb_fourier (resultat):pass
194 class dyna_harmo (resultat):pass
195 class dyna_trans (resultat):pass
196 class fourier_elas (resultat):pass
197 class harm_gene (resultat):pass
198 class mode_acou (resultat):pass
199 class mode_cycl (resultat):pass
200 class mode_flamb (resultat):pass
201 class mode_gene (resultat):pass
202 class mult_elas (resultat):pass
203 class theta_geom (resultat):pass
206 #--------------------------------
207 class evol(resultat):pass
208 class evol_char(evol):pass
209 class evol_elas(evol):pass
210 class evol_noli(evol):pass
211 class evol_ther(evol):pass
212 class evol_varc(evol):pass
214 # resultat/mode_stat :
215 #--------------------------------
216 class mode_stat(resultat):pass
217 class mode_stat_depl(mode_stat):pass
218 class mode_stat_acce(mode_stat):pass
219 class mode_stat_forc(mode_stat):pass
222 # resultat/mode_meca :
223 #--------------------------------
224 class mode_meca(resultat):pass
225 class mode_meca_c(mode_meca):pass
229 #--------------------------------
230 class para_sensi(fonction):pass
231 class fonction_c(fonction):pass
235 #--------------------------------
236 class matr_asse(ASSD):pass
237 class matr_asse_depl_c(matr_asse):pass
238 class matr_asse_depl_r(matr_asse):pass
239 class matr_asse_gene_r(matr_asse):pass
240 class matr_asse_gene_c(matr_asse):pass
241 class matr_asse_pres_c(matr_asse):pass
242 class matr_asse_pres_r(matr_asse):pass
243 class matr_asse_temp_c(matr_asse):pass
244 class matr_asse_temp_r(matr_asse):pass
247 #--------------------------------
248 class matr_elem(ASSD):pass
249 class matr_elem_depl_c(matr_elem):pass
250 class matr_elem_depl_r(matr_elem):pass
251 class matr_elem_pres_c(matr_elem):pass
252 class matr_elem_temp_r(matr_elem):pass
257 # table : (tabl_fonc)
258 #--------------------------------
261 def __getitem__(self,key):
262 return aster.getpara(self.get_name(),"TABLE",key[0],key[1])
264 class tabl_aire_int (table):pass
265 class tabl_calc_g_loca(table):pass
266 class tabl_calc_g_th (table):pass
267 class tabl_cara_geom (table):pass
268 class tabl_char_limite(table):pass
269 class tabl_ener_elas (table):pass
270 class tabl_ener_pot (table):pass
271 class tabl_ener_cin (table):pass
272 class tabl_ener_ext (table):pass
273 class tabl_ener_totale(table):pass
274 class tabl_indic_ener (table):pass
275 class tabl_indic_seuil(table):pass
276 class tabl_intsp (table):pass
277 class tabl_mass_iner (table):pass
278 class tabl_post_alea (table):pass
279 class tabl_post_dyna (table):pass
280 class tabl_post_f_alea(table):pass
281 class tabl_post_fatig (table):pass
282 class tabl_post_gouj2e(table):pass
283 class tabl_post_k (table):pass
284 class tabl_post_rccm (table):pass
285 class tabl_post_rele (table):pass
286 class tabl_post_simpli(table):pass
287 class tabl_post_usur (table):pass
288 class tabl_reca_weib (table):pass
289 class tabl_rice_tracey(table):pass
290 class tabl_texture (table):pass
291 class tabl_trc (table):pass
292 class tabl_weibull (table):pass
295 #--------------------------------
296 class tabl_fonc (table):pass
297 class tabl_fonc_max (tabl_fonc):pass
298 class tabl_fonc_noci (tabl_fonc):pass
299 class tabl_fonc_rms (tabl_fonc):pass
303 #--------------------------------
304 class vect_asse(ASSD):pass
305 class vect_asse_gene(vect_asse):pass
309 #--------------------------------
310 class vect_elem(ASSD):pass
311 class vect_elem_depl_r(vect_elem):pass
312 class vect_elem_pres_c(vect_elem):pass
313 class vect_elem_pres_r(vect_elem):pass
314 class vect_elem_temp_r(vect_elem):pass
316 #& MODIF COMMANDE DATE 22/11/2001 AUTEUR VABHHTS J.PELLET
317 AFFE_CARA_ELEM=OPER(nom="AFFE_CARA_ELEM",op= 19,sd_prod=cara_elem,
318 fr="Affectation de caractéristiques à des éléments de structure",
319 docu="U4.42.01-f1",reentrant='n',
320 regles=(AU_MOINS_UN('POUTRE','BARRE','COQUE','CABLE','DISCRET','MASSIF',
321 'ASSE_GRIL','GRILLE','AFFE_SECT','AFFE_FIBRE'),),
322 MODELE =SIMP(statut='o',typ=modele ),
323 INFO =SIMP(statut='f',typ='I', defaut= 1 ,into=(1,2) ),
324 VERIF =SIMP(statut='f',typ='TXM',max='**',into=("MAILLE","NOEUD") ),
326 POUTRE =FACT(statut='f',min=01,max='**',
327 regles=(UN_PARMI('MAILLE','GROUP_MA'),),
328 MAILLE =SIMP(statut='f',typ=ma,max='**'),
329 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
330 SECTION =SIMP(statut='o',typ='TXM' ,into=("GENERALE","RECTANGLE","CERCLE") ),
331 CARA_SECT =SIMP(statut='f',typ=(cara_pout) ),
332 TUYAU_NCOU =SIMP(statut='f',typ='I',min=1,max=10,defaut=3),
333 TUYAU_NSEC =SIMP(statut='f',typ='I',min=1,max=32,defaut=16),
334 b_generale =BLOC( condition = "SECTION=='GENERALE'",
335 CARA =SIMP(statut='o',typ='TXM',max='**',
336 into=("A","IY","IZ","AY","AZ","EY","EZ","JX","RY","RZ","RT",
337 "AI","JG","IYR2","IZR2","A1",
338 "IY1","IZ1","AY1","AZ1","EY1","EZ1","JX1","RY1",
339 "RZ1","RT1","AI1","JG1","IYR21","IZR21","A2",
340 "IY2","IZ2","AY2","AZ2","EY2","EZ2","JX2","RY2",
341 "RZ2","RT2","AI2","JG2","IYR22","IZR22","H",
342 "HZ","HY","EP","EPY","EPZ","H1","HZ1","HY1",
343 "EP1","EPY1","EPZ1","H2","HZ2","HY2","EP2",
344 "EPY2","EPZ2","R","R1","R2") ),
345 VALE =SIMP(statut='o',typ='R',max='**'),
346 VARI_SECT =SIMP(statut='f',typ='TXM',into=("HOMOTHETIQUE",) ),
348 b_rectangle =BLOC( condition = "SECTION=='RECTANGLE'",
349 CARA =SIMP(statut='o',typ='TXM',max='**',
350 into=("H","EP","HY","HZ","EPY","EPZ",
351 "H1","HZ1","HY1","EP1","EPY1","EPZ1",
352 "H2","HZ2","HY2","EP2","EPY2","EPZ2") ),
353 VALE =SIMP(statut='o',typ='R',max='**'),
354 VARI_SECT =SIMP(statut='f',typ='TXM',into=("HOMOTHETIQUE","AFFINE"),defaut="HOMOTHETIQUE"),
356 b_cercle =BLOC( condition = "SECTION=='CERCLE'",
357 CARA =SIMP(statut='o',typ='TXM',max='**',
358 into=("R","EP","R1","R2","EP1","EP2") ),
359 VALE =SIMP(statut='o',typ='R',max='**'),
360 VARI_SECT =SIMP(statut='f',typ='TXM',into=("HOMOTHETIQUE",) ),
361 MODI_METRIQUE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
363 FCX =SIMP(statut='f',typ=(fonction) ),
366 BARRE =FACT(statut='f',min=01,max='**',
367 regles=(UN_PARMI('MAILLE','GROUP_MA'),),
368 MAILLE =SIMP(statut='f',typ=ma,max='**'),
369 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
370 SECTION =SIMP(statut='o',typ='TXM',into=("GENERALE","RECTANGLE","CERCLE") ),
371 b_generale =BLOC( condition = "SECTION=='GENERALE'",
372 CARA =SIMP(statut='o',typ='TXM',into=("A",) ),
373 VALE =SIMP(statut='o',typ='R' ),
375 b_rectangle =BLOC( condition = "SECTION=='RECTANGLE'",
376 CARA =SIMP(statut='o',typ='TXM',into=("H","HZ","HY","EPY","EPZ","EP"),max=6 ),
377 VALE =SIMP(statut='o',typ='R',max=6 ),
379 b_cercle =BLOC( condition = "SECTION=='CERCLE'",
380 CARA =SIMP(statut='o',typ='TXM',max=2,into=("R","EP") ),
381 VALE =SIMP(statut='o',typ='R',max=2 ),
383 FCX =SIMP(statut='f',typ=(fonction) ),
386 COQUE =FACT(statut='f',min=01,max='**',
387 regles=(UN_PARMI('MAILLE','GROUP_MA' ),
388 PRESENT_PRESENT( 'EXCENTREMENT','INER_ROTA' ),),
389 MAILLE =SIMP(statut='f',typ=ma,max='**'),
390 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
391 EPAIS =SIMP(statut='o',typ='R' ),
392 ANGL_REP =SIMP(statut='f',typ='R',min=2,max=2),
393 A_CIS =SIMP(statut='f',typ='R',defaut= 0.8333333E0),
394 COEF_RIGI_DRZ =SIMP(statut='f',typ='R',defaut= 1.0E-5 ),
395 COQUE_NCOU =SIMP(statut='f',typ='I',defaut= 1 ),
396 EXCENTREMENT =SIMP(statut='f',typ='R' ),
397 INER_ROTA =SIMP(statut='f',typ='TXM',into=("OUI",) ),
398 MODI_METRIQUE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
401 CABLE =FACT(statut='f',min=01,max='**',
402 regles=(UN_PARMI('MAILLE','GROUP_MA'),
403 UN_PARMI('A','SECTION') ),
404 MAILLE =SIMP(statut='f',typ=ma,max='**'),
405 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
406 N_INIT =SIMP(statut='f',typ='R',defaut= 5000. ),
407 A =SIMP(statut='f',typ='R' ),
408 SECTION =SIMP(statut='f',typ='R' ),
409 FCX =SIMP(statut='f',typ=(fonction) ),
412 DISCRET =FACT(statut='f',min=01,max='**',
413 regles=(UN_PARMI('MAILLE','GROUP_MA','NOEUD','GROUP_NO'),),
414 NOEUD =SIMP(statut='f',typ=no,max='**'),
415 MAILLE =SIMP(statut='f',typ=ma,max='**'),
416 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
417 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
418 REPERE =SIMP(statut='f',typ='TXM',into=("LOCAL","GLOBAL") ),
419 AMOR_HYST =SIMP(statut='f',typ='R' ),
420 CARA =SIMP(statut='o',typ='TXM',max='**',
421 into=("K_T_D_N","K_T_D_L","K_TR_D_N","K_TR_D_L",
422 "K_T_N", "K_T_L", "K_TR_N", "K_TR_L",
423 "M_T_D_N","M_TR_D_N","M_T_N",
424 "M_T_L", "M_TR_N", "M_TR_L",
425 "A_T_D_N","A_TR_D_N","A_T_D_L","A_TR_D_L",
426 "A_T_N", "A_T_L", "A_TR_N", "A_TR_L") ),
427 VALE =SIMP(statut='o',typ='R',max='**'),
430 ORIENTATION =FACT(statut='f',min=01,max='**',
431 regles=(UN_PARMI('MAILLE','GROUP_MA','NOEUD','GROUP_NO' ),),
432 MAILLE =SIMP(statut='f',typ=ma,max='**'),
433 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
434 NOEUD =SIMP(statut='f',typ=no,max='**'),
435 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
436 CARA =SIMP(statut='o',typ='TXM',
437 into=("VECT_Y","ANGL_VRIL","VECT_X_Y","ANGL_NAUT","GENE_TUYAU") ),
438 VALE =SIMP(statut='o',typ='R',max='**'),
439 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-4 ),
440 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
443 DEFI_ARC =FACT(statut='f',min=01,max='**',
444 regles=(UN_PARMI('MAILLE','GROUP_MA'),
445 UN_PARMI('ORIE_ARC','CENTRE','NOEUD_CENTRE','GROUP_NO_CENTRE',
446 'POIN_TANG','NOEUD_POIN_TANG','GROUP_NO_POIN_TG'),
447 PRESENT_PRESENT('ORIE_ARC','RAYON'),
448 EXCLUS('COEF_FLEX','COEF_FLEX_XY'),
449 EXCLUS('COEF_FLEX','COEF_FLEX_XZ'),
450 EXCLUS('INDI_SIGM','INDI_SIGM_XY'),
451 EXCLUS('INDI_SIGM','INDI_SIGM_XZ'),
452 PRESENT_PRESENT('COEF_FLEX_XY','COEF_FLEX_XZ'),
453 PRESENT_PRESENT('INDI_SIGM_XY','INDI_SIGM_XZ'),),
454 MAILLE =SIMP(statut='f',typ=ma,max='**'),
455 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
456 ORIE_ARC =SIMP(statut='f',typ='R'),
457 CENTRE =SIMP(statut='f',typ='R',max='**'),
458 NOEUD_CENTRE =SIMP(statut='f',typ=no,max=1),
459 GROUP_NO_CENTRE =SIMP(statut='f',typ=grno,max=1),
460 POIN_TANG =SIMP(statut='f',typ='R',max='**'),
461 NOEUD_POIN_TANG =SIMP(statut='f',typ=no,max=1),
462 GROUP_NO_POIN_TG=SIMP(statut='f',typ=grno,max=1),
463 RAYON =SIMP(statut='f',typ='R'),
464 COEF_FLEX =SIMP(statut='f',typ='R'),
465 INDI_SIGM =SIMP(statut='f',typ='R'),
466 COEF_FLEX_XY =SIMP(statut='f',typ='R'),
467 INDI_SIGM_XY =SIMP(statut='f',typ='R'),
468 COEF_FLEX_XZ =SIMP(statut='f',typ='R'),
469 INDI_SIGM_XZ =SIMP(statut='f',typ='R'),
470 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3),
471 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
474 MASSIF =FACT(statut='f',min=01,max='**',
475 regles=(UN_PARMI('MAILLE','GROUP_MA'),
476 UN_PARMI('ANGL_REP','ANGL_AXE'),
477 EXCLUS('ANGL_REP','ANGL_AXE'),
478 EXCLUS('ANGL_REP','ORIG_AXE'),
479 PRESENT_PRESENT('ANGL_AXE','ORIG_AXE'), ),
480 MAILLE =SIMP(statut='f',typ=ma,max='**'),
481 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
482 ANGL_REP =SIMP(statut='f',typ='R',max=3),
483 ANGL_AXE =SIMP(statut='f',typ='R',max=2),
484 ORIG_AXE =SIMP(statut='f',typ='R',max=3),
487 POUTRE_FLUI =FACT(statut='f',min=01,max='**',
488 regles=(UN_PARMI('MAILLE','GROUP_MA'),),
489 MAILLE =SIMP(statut='f',typ=ma,max='**'),
490 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
491 B_T =SIMP(statut='o',typ='R'),
492 B_N =SIMP(statut='o',typ='R'),
493 B_TN =SIMP(statut='o',typ='R',defaut= 0.E+0 ),
494 A_FLUI =SIMP(statut='o',typ='R'),
495 A_CELL =SIMP(statut='o',typ='R'),
496 COEF_ECHELLE =SIMP(statut='o',typ='R'),
499 GRILLE =FACT(statut='f',min=01,max='**',
500 regles=(UN_PARMI('MAILLE','GROUP_MA'),
501 EXCLUS('ANGL_REP','ORIG_AXE'),
502 EXCLUS('EXCENTREMENT','DIST_N'),
503 ENSEMBLE('ORIG_AXE','AXE')),
504 MAILLE =SIMP(statut='f',typ=ma,max='**'),
505 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
506 SECTION_L =SIMP(statut='o',typ='R'),
507 ANGL_REP =SIMP(statut='f',typ='R',max=2),
508 ANGL_L =SIMP(statut='f',typ='R'),
509 POUR_CENT_L =SIMP(statut='f',typ='R'),
510 POUR_CENT_T =SIMP(statut='f',typ='R'),
511 DIST_N =SIMP(statut='f',typ='R'),
512 EXCENTREMENT =SIMP(statut='f',typ='R'),
513 ORIG_AXE =SIMP(statut='f',typ='R',max='**'),
514 AXE =SIMP(statut='f',typ='R',max='**'),
515 COEF_RIGI_DRZ =SIMP(statut='f',typ='R',defaut= 1.0E-10 ),
516 GRILLE_NCOU =SIMP(statut='f',typ='I',defaut= 1,min=1,max=1 ),
519 RIGI_PARASOL =FACT(statut='f',min=01,max='**',
520 regles=(UN_PARMI('COEF_GROUP','FONC_GROUP'),
521 UN_PARMI('COOR_CENTRE','NOEUD_CENTRE','GROUP_NO_CENTRE'),),
522 GROUP_MA =SIMP(statut='o',typ=ma,max='**'),
523 FONC_GROUP =SIMP(statut='f',typ=(fonction) ),
524 COEF_GROUP =SIMP(statut='f',typ='R',max='**'),
525 REPERE =SIMP(statut='f',typ='TXM',into=("LOCAL","GLOBAL") ),
526 CARA =SIMP(statut='o',typ='TXM',max='**',into=("K_TR_D_N","A_TR_D_N") ),
527 VALE =SIMP(statut='o',typ='R',max='**'),
528 GROUP_NO_CENTRE =SIMP(statut='f',typ=grno),
529 NOEUD_CENTRE =SIMP(statut='f',typ=no),
530 COOR_CENTRE =SIMP(statut='f',typ='R',max='**'),
533 ASSE_GRIL =FACT(statut='f',min=01,max='**',
534 regles=(UN_PARMI('MAILLE','GROUP_MA'),),
535 MAILLE =SIMP(statut='f',typ=ma,max='**'),
536 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
537 CARA =SIMP(statut='o',typ='TXM',max='**',
538 into=("K_TR_D_N","K_TR_D_L_T","K_TR_D_L_N",) ),
539 VALE =SIMP(statut='o',typ='R',max='**'),
540 PAS_T =SIMP(statut='o',typ='R'),
541 PAS_N =SIMP(statut='o',typ='R'),
542 ANGL_REP =SIMP(statut='o',typ='R',max='**'),
543 COEF_ECHELLE =SIMP(statut='o',typ='R'),
547 AFFE_SECT =FACT(statut='f',min=1,max='**',
548 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),
549 AU_MOINS_UN('TOUT_SECT','GROUP_MA_SECT','MAILLE_SECT'),
550 PRESENT_ABSENT('TOUT_SECT','GROUP_MA_SECT','MAILLE_SECT'),),
552 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
553 MAILLE =SIMP(statut='f',typ=ma,max='**'),
555 TOUT_SECT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
556 GROUP_MA_SECT =SIMP(statut='f',typ=grma,max='**'),
557 MAILLE_SECT =SIMP(statut='f',typ=ma,max='**'),
559 MAILLAGE_SECT =SIMP(statut='o',typ=maillage),
560 COOR_AXE_POUTRE =SIMP(statut='o',typ='R',min=2,max=2),
564 AFFE_FIBRE =FACT(statut='f',min=1,max='**',
565 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),),
567 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
568 MAILLE =SIMP(statut='f',typ=ma,max='**'),
570 CARA =SIMP(statut='f',typ='TXM',defaut='SURFACE',into=('SURFACE','DIAMETRE',)),
571 VALE =SIMP(statut='o',typ='R',max='**'),
572 COOR_AXE_POUTRE =SIMP(statut='o',typ='R',min=2,max=2),
577 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
578 # CONFIGURATION MANAGEMENT OF EDF VERSION
579 # ======================================================================
580 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
581 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
582 # REDISTRIBUTION OF THIS FILE.
583 # ======================================================================
584 AFFE_CHAR_ACOU=OPER(nom="AFFE_CHAR_ACOU",op= 68,sd_prod=char_acou,
585 fr="Affectation de charges et conditions aux limites acoustiques constantes",
586 docu="U4.44.04-e",reentrant='n',
587 regles=(AU_MOINS_UN('PRES_IMPO','VITE_FACE','IMPE_FACE','LIAISON_UNIF' ),),
588 MODELE =SIMP(statut='o',typ=modele ),
589 VERI_DDL =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
590 PRES_IMPO =FACT(statut='f',min=01,max='**',
591 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE','GROUP_NO','NOEUD'),),
592 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
593 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
594 MAILLE =SIMP(statut='f',typ=ma,max='**'),
595 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
596 NOEUD =SIMP(statut='f',typ=no,max='**'),
597 PRES =SIMP(statut='o',typ='C' ),
599 VITE_FACE =FACT(statut='f',min=01,max='**',
600 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
601 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
602 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
603 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
604 MAILLE =SIMP(statut='f',typ=ma,max='**'),
605 VNOR =SIMP(statut='o',typ='C' ),
607 IMPE_FACE =FACT(statut='f',min=01,max='**',
608 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
609 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
610 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
611 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
612 MAILLE =SIMP(statut='f',typ=ma,max='**'),
613 IMPE =SIMP(statut='o',typ='C' ),
615 LIAISON_UNIF =FACT(statut='f',min=01,max='**',
616 regles=(UN_PARMI('GROUP_NO','NOEUD','GROUP_MA','MAILLE' ),),
617 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
618 NOEUD =SIMP(statut='f',typ=no,max='**'),
619 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
620 MAILLE =SIMP(statut='f',typ=ma,max='**'),
621 DDL =SIMP(statut='o',typ='TXM',max='**'),
624 #& MODIF COMMANDE DATE 21/06/2001 AUTEUR VABHHTS J.PELLET
625 # CONFIGURATION MANAGEMENT OF EDF VERSION
626 # ======================================================================
627 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
628 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
629 # REDISTRIBUTION OF THIS FILE.
630 # ======================================================================
631 # RESPONSABLE VABHHTS J.PELLET
632 def affe_char_cine_prod(MECA_IMPO,THER_IMPO,ACOU_IMPO,**args):
633 if MECA_IMPO != None : return char_cine_meca
634 if THER_IMPO != None : return char_cine_ther
635 if ACOU_IMPO != None : return char_cine_acou
636 raise AsException("type de concept resultat non prevu")
638 AFFE_CHAR_CINE=OPER(nom="AFFE_CHAR_CINE",op= 101,sd_prod=affe_char_cine_prod
639 ,fr="Affectation de conditions aux limites cinématiques pour traitement sans dualisation",
640 docu="U4.44.03-e",reentrant='n',
641 regles=(AU_MOINS_UN('MECA_IMPO','THER_IMPO','ACOU_IMPO'),
642 EXCLUS('MECA_IMPO','THER_IMPO'),
643 EXCLUS('MECA_IMPO','ACOU_IMPO'),
644 EXCLUS('THER_IMPO','ACOU_IMPO'),),
645 MODELE =SIMP(statut='o',typ=modele ),
646 MECA_IMPO =FACT(statut='f',min=01,max='**',
647 regles=(UN_PARMI('TOUT','GROUP_NO','NOEUD'),
648 AU_MOINS_UN('DX','DY','DZ','DRX','DRY','DRZ','GRX','PRES','TEMP','PHI'),),
649 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
650 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
651 NOEUD =SIMP(statut='f',typ=no,max='**'),
652 DX =SIMP(statut='f',typ='R' ),
653 DY =SIMP(statut='f',typ='R' ),
654 DZ =SIMP(statut='f',typ='R' ),
655 DRX =SIMP(statut='f',typ='R' ),
656 DRY =SIMP(statut='f',typ='R' ),
657 DRZ =SIMP(statut='f',typ='R' ),
658 GRX =SIMP(statut='f',typ='R' ),
659 PRES =SIMP(statut='f',typ='R' ),
660 TEMP =SIMP(statut='f',typ='R' ),
661 PHI =SIMP(statut='f',typ='R' ),
663 THER_IMPO =FACT(statut='f',min=01,max='**',
664 regles=(UN_PARMI('TOUT','GROUP_NO','NOEUD'),
665 AU_MOINS_UN('TEMP','TEMP_INF','TEMP_SUP'),),
666 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
667 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
668 NOEUD =SIMP(statut='f',typ=no,max='**'),
669 TEMP_SUP =SIMP(statut='f',typ='R' ),
670 TEMP =SIMP(statut='f',typ='R' ),
671 TEMP_INF =SIMP(statut='f',typ='R' ),
673 ACOU_IMPO =FACT(statut='f',min=01,max='**',
674 regles=(UN_PARMI('TOUT','GROUP_NO','NOEUD' ),),
675 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
676 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
677 NOEUD =SIMP(statut='f',typ=no,max='**'),
678 PRES =SIMP(statut='o',typ='C' ),
680 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
682 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
683 # CONFIGURATION MANAGEMENT OF EDF VERSION
684 # ======================================================================
685 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
686 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
687 # REDISTRIBUTION OF THIS FILE.
688 # ======================================================================
689 def affe_char_cine_f_prod(MECA_IMPO,THER_IMPO,**args):
690 if MECA_IMPO != None : return char_cine_meca
691 if THER_IMPO != None : return char_cine_ther
692 raise AsException("type de concept resultat non prevu")
694 AFFE_CHAR_CINE_F=OPER(nom="AFFE_CHAR_CINE_F",op= 108,sd_prod=affe_char_cine_f_prod
695 ,fr="Affectation de conditions aux limites cinématiques pour traitement sans dualisation",
696 docu="U4.44.03-e",reentrant='n',
697 regles=(AU_MOINS_UN('MECA_IMPO','THER_IMPO'),
698 EXCLUS('MECA_IMPO','THER_IMPO'),),
699 MODELE =SIMP(statut='o',typ=modele ),
700 MECA_IMPO =FACT(statut='f',min=01,max='**',
701 regles=(UN_PARMI('TOUT','GROUP_NO','NOEUD'),
702 AU_MOINS_UN('DX','DY','DZ','DRX','DRY','DRZ','GRX','PRES','TEMP','PHI'),),
703 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
704 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
705 NOEUD =SIMP(statut='f',typ=no,max='**'),
706 DX =SIMP(statut='f',typ=fonction ),
707 DY =SIMP(statut='f',typ=fonction ),
708 DZ =SIMP(statut='f',typ=fonction ),
709 DRX =SIMP(statut='f',typ=fonction ),
710 DRY =SIMP(statut='f',typ=fonction ),
711 DRZ =SIMP(statut='f',typ=fonction ),
712 GRX =SIMP(statut='f',typ=fonction ),
713 PRES =SIMP(statut='f',typ=fonction ),
714 TEMP =SIMP(statut='f',typ=fonction ),
715 PHI =SIMP(statut='f',typ=fonction ),
717 THER_IMPO =FACT(statut='f',min=01,max='**',
718 regles=(UN_PARMI('TOUT','GROUP_NO','NOEUD'),
719 AU_MOINS_UN('TEMP','TEMP_INF','TEMP_SUP' ),),
720 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
721 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
722 NOEUD =SIMP(statut='f',typ=no,max='**'),
723 TEMP_SUP =SIMP(statut='f',typ=fonction ),
724 TEMP =SIMP(statut='f',typ=fonction ),
725 TEMP_INF =SIMP(statut='f',typ=fonction ),
727 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
729 #& MODIF COMMANDE DATE 24/01/2002 AUTEUR SMICHEL S.MICHEL-PONNELLE
730 # CONFIGURATION MANAGEMENT OF EDF VERSION
731 # ======================================================================
732 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
733 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
734 # REDISTRIBUTION OF THIS FILE.
735 # ======================================================================
736 # RESPONSABLE G8BHHXD X.DESROCHES
737 AFFE_CHAR_MECA=OPER(nom="AFFE_CHAR_MECA",op= 7,sd_prod=char_meca
738 ,fr="Affectation de charges et conditions aux limites mécaniques constantes",
739 docu="U4.44.01-f1",reentrant='n',
740 regles=(AU_MOINS_UN('DDL_IMPO','FACE_IMPO','LIAISON_DDL','FORCE_NODALE',
741 'FORCE_FACE','FORCE_ARETE','FORCE_CONTOUR','FORCE_INTERNE',
742 'PRES_REP','FORCE_POUTRE','FORCE_COQUE','LIAISON_OBLIQUE',
743 'FORCE_ELEC','INTE_ELEC','PESANTEUR','ROTATION','IMPE_FACE',
744 'VITE_FACE','TEMP_CALCULEE','RELA_CINE_BP','EPSI_INIT','CONTACT',
745 'LIAISON_UNIL_NO','LIAISON_GROUP','LIAISON_UNIF','FLUX_THM_REP',
746 'LIAISON_SOLIDE','LIAISON_ELEM','ONDE_FLUI','PRES_CALCULEE',
747 'EPSA_CALCULEE','LIAISON_CHAMNO','VECT_ASSE','LIAISON_COQUE',
748 'LIAISON_MAIL','FORCE_TUYAU','SECH_CALCULEE','HYDR_CALCULEE',
749 'EFFE_FOND','EVOL_CHAR','ARLEQUIN'),
750 EXCLUS('PRES_CALCULEE','EVOL_CHAR'),
751 EXCLUS('LIAISON_UNIL_NO','CONTACT'),),
753 MODELE =SIMP(statut='o',typ=(modele) ),
754 VERI_DDL =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
755 VERI_NORM =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
756 # A TERME PRES_CALCULEE N'EXISTERA PLUS
757 EVOL_CHAR =SIMP(statut='f',fr="Champ de pression issu d'un autre calcul",
759 PRES_CALCULEE =SIMP(statut='f',fr="Champ de pression issu d'un autre calcul",
761 TEMP_CALCULEE =SIMP(statut='f',fr="Champ de température issu d'un autre calcul",
762 typ=(evol_ther,cham_no_temp_r,carte_temp_r,carte_temp_f ) ),
763 HYDR_CALCULEE =SIMP(statut='f',fr="Champ d hydratation issu d'un autre calcul",
765 SECH_CALCULEE =SIMP(statut='f',fr="Champ de séchage issu d'un autre calcul",
766 typ=(evol_ther,cham_no_temp_r,carte_temp_r,carte_temp_f ) ),
767 EPSA_CALCULEE =SIMP(statut='f',fr="Champ de déformation anélastique issu d'un autre calcul",
769 VECT_ASSE =SIMP(statut='f',typ=cham_no_depl_r ),
771 ARLEQUIN =FACT(statut='f',min=1,max='**',
772 GROUP_MA_1 =SIMP(statut='o',typ=grma,max='**'),
773 GROUP_MA_2 =SIMP(statut='o',typ=grma,max='**'),
774 GROUP_MA_COLL =SIMP(statut='o',typ=grma,max='**'),
775 regles =(UN_PARMI('POIDS_1','POIDS_2'),),
776 POIDS_1 =SIMP(statut='f',typ='R'),
777 POIDS_2 =SIMP(statut='f',typ='R'),
780 CONTACT =FACT(statut='f',fr="Imposer du contact avec ou sans frottement",min=1,max='**',
781 regles=(UN_PARMI('GROUP_MA_2','MAILLE_2'),),
782 APPARIEMENT =SIMP(statut='f',typ='TXM',defaut="MAIT_ESCL",
783 into=("NON","NODAL","NODAL_SYME","MAIT_ESCL","MAIT_ESCL_SYME")),
784 RECHERCHE =SIMP(statut='f',typ='TXM',defaut="NOEUD_VOISIN",into=("NOEUD_BOUCLE","NOEUD_VOISIN")),
785 LISSAGE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
786 NORMALE =SIMP(statut='f',typ='TXM',defaut="MAIT",into=("MAIT","MAIT_ESCL")),
787 METHODE =SIMP(statut='f',typ='TXM',defaut="CONTRAINTE",
788 into=("CONTRAINTE","LAGRANGIEN","PENALISATION","CONTINUE") ),
789 PROJECTION =SIMP(statut='f',typ='TXM',defaut="LINEAIRE",into=("LINEAIRE",) ),
790 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
791 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),
792 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
793 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),
794 b_active =BLOC(condition = "METHODE == 'CONTRAINTE' ",
795 fr="Paramètres de la méthode des contraintes actives (contact uniquement)",
796 regles=(EXCLUS('DIST_2','COEF_IMPO'),
797 EXCLUS('DIST_1','COEF_IMPO'),),
798 NOM_CHAM =SIMP(statut='f',typ='TXM',defaut="DEPL",into=("DEPL","PRES","TEMP")),
799 FROTTEMENT =SIMP(statut='f',typ='TXM',defaut="SANS",into=("SANS",) ),
800 REAC_GEOM_INTE =SIMP(statut='f',typ='I',defaut= 2),
801 SANS_NOEUD =SIMP(statut='f',typ=no,max='**'),
802 SANS_GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
803 COEF_IMPO =SIMP(statut='f',typ='R'),
804 COEF_MULT_2 =SIMP(statut='f',typ='R'),
805 VECT_NORM_2 =SIMP(statut='f',typ='R',max=3),
806 DIST_1 =SIMP(statut='f',typ='R'),
807 DIST_2 =SIMP(statut='f',typ='R'),),
808 b_lagrangien =BLOC(condition = "METHODE == 'LAGRANGIEN' ",
809 fr="Paramètres de la méthode Lagrangienne (contact avec ou sans frottement)",
810 NOM_CHAM =SIMP(statut='f',typ='TXM',defaut="DEPL",into=("DEPL",)),
811 FROTTEMENT =SIMP(statut='f',typ='TXM',defaut="SANS",into=("SANS","COULOMB",) ),
812 REAC_GEOM_INTE =SIMP(statut='f',typ='I',defaut= 2),
813 SANS_NOEUD =SIMP(statut='f',typ=no,max='**'),
814 SANS_GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
815 DIST_1 =SIMP(statut='f',typ='R'),
816 DIST_2 =SIMP(statut='f',typ='R'),
817 b_frottement =BLOC(condition = "FROTTEMENT == 'COULOMB' ",fr="Paramètres du frottement de Coulomb",
818 COULOMB =SIMP(statut='o',typ='R',max=1),
819 COEF_MATR_FROT =SIMP(statut='f',typ='R',defaut=0.E+0),
820 VECT_Y =SIMP(statut='f',typ='R',min=3,max=3),),),
821 b_penalisation =BLOC(condition = "METHODE == 'PENALISATION' ",
822 fr="Paramètres de la méthode pénalisée (contact avec ou sans frottement)",
823 NOM_CHAM =SIMP(statut='f',typ='TXM',defaut="DEPL",into=("DEPL",)),
824 E_N =SIMP(statut='f',typ='R'),
825 FROTTEMENT =SIMP(statut='f',typ='TXM',defaut="SANS",into=("SANS","COULOMB",) ),
826 REAC_GEOM_INTE =SIMP(statut='f',typ='I',defaut= 2),
827 SANS_NOEUD =SIMP(statut='f',typ=no,max='**'),
828 SANS_GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
829 DIST_1 =SIMP(statut='f',typ='R'),
830 DIST_2 =SIMP(statut='f',typ='R'),
831 b_frottement =BLOC(condition = "FROTTEMENT == 'COULOMB' ",fr="Paramètres du frottement de Coulomb",
832 COULOMB =SIMP(statut='o',typ='R',max=1),
833 E_T =SIMP(statut='f',typ='R',
834 fr="Active la pénalisation sur le frottement et définit le coefficient de pénalisation"),
835 COEF_MATR_FROT =SIMP(statut='f',typ='R',defaut=0.E+0),
836 VECT_Y =SIMP(statut='f',typ='R',min=3,max=3),),),
837 b_continue =BLOC(condition = "METHODE == 'CONTINUE' ",
838 fr="Paramètres de la méthode continue (contact avec ou sans frottement)",
839 NOM_CHAM =SIMP(statut='f',typ='TXM',defaut="DEPL",into=("DEPL",)),
840 FROTTEMENT =SIMP(statut='f',typ='TXM',defaut="SANS",into=("SANS","COULOMB",) ),
841 INTEGRATION =SIMP(statut='f',typ='TXM',defaut="NOEUD",into=("GAUSS","NOEUD")),
842 COEF_REGU_CONT =SIMP(statut='f',typ='R',defaut=100.E+0),
843 MODL_AXIS =SIMP(statut='o',typ='TXM',into=("OUI","NON")),
844 ITER_GEOM_MAXI =SIMP(statut='f',typ='I',defaut=2),
845 ITER_CONT_MAXI =SIMP(statut='f',typ='I',defaut=30),
846 b_frottement =BLOC(condition = "FROTTEMENT == 'COULOMB' ",fr="Paramètres du frottement de Coulomb",
847 COULOMB =SIMP(statut='o',typ='R',max=1),
848 ITER_FROT_MAXI =SIMP(statut='f',typ='I',defaut=2),
849 COEF_REGU_FROT =SIMP(statut='f',typ='R',defaut=100.E+0),
850 SEUIL_INIT =SIMP(statut='f',typ='I',defaut=0),),),
853 DDL_IMPO =FACT(statut='f',min=1,max='**',
854 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE','GROUP_NO','NOEUD'),
855 AU_MOINS_UN('DX','DY','DZ','DRX','DRY','DRZ','GRX','PRES','PHI',
856 'TEMP','PRE1','PRE2','UI2','UI3','VI2','VI3','WI2','WI3','UO2',
857 'UO3','VO2','VO3','WO2','WO3','UI4','UI5','VI4','VI5','WI4',
858 'WI5','UO4','UO5','VO4','VO5','WO4','WO5','UI6','UO6','VI6',
859 'VO6','WI6','WO6','WO','WI1','WO1','GONF'),),
860 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
861 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
862 NOEUD =SIMP(statut='f',typ=no,max='**'),
863 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
864 MAILLE =SIMP(statut='f',typ=ma,max='**'),
865 DX =SIMP(statut='f',typ='R' ),
866 DY =SIMP(statut='f',typ='R' ),
867 DZ =SIMP(statut='f',typ='R' ),
868 DRX =SIMP(statut='f',typ='R' ),
869 DRY =SIMP(statut='f',typ='R' ),
870 DRZ =SIMP(statut='f',typ='R' ),
871 GRX =SIMP(statut='f',typ='R' ),
872 PRES =SIMP(statut='f',typ='R' ),
873 PHI =SIMP(statut='f',typ='R' ),
874 TEMP =SIMP(statut='f',typ='R' ),
875 PRE1 =SIMP(statut='f',typ='R' ),
876 PRE2 =SIMP(statut='f',typ='R' ),
877 UI2 =SIMP(statut='f',typ='R' ),
878 UI3 =SIMP(statut='f',typ='R' ),
879 UI4 =SIMP(statut='f',typ='R' ),
880 UI5 =SIMP(statut='f',typ='R' ),
881 UI6 =SIMP(statut='f',typ='R' ),
882 UO2 =SIMP(statut='f',typ='R' ),
883 UO3 =SIMP(statut='f',typ='R' ),
884 UO4 =SIMP(statut='f',typ='R' ),
885 UO5 =SIMP(statut='f',typ='R' ),
886 UO6 =SIMP(statut='f',typ='R' ),
887 VI2 =SIMP(statut='f',typ='R' ),
888 VI3 =SIMP(statut='f',typ='R' ),
889 VI4 =SIMP(statut='f',typ='R' ),
890 VI5 =SIMP(statut='f',typ='R' ),
891 VI6 =SIMP(statut='f',typ='R' ),
892 VO2 =SIMP(statut='f',typ='R' ),
893 VO3 =SIMP(statut='f',typ='R' ),
894 VO4 =SIMP(statut='f',typ='R' ),
895 VO5 =SIMP(statut='f',typ='R' ),
896 VO6 =SIMP(statut='f',typ='R' ),
897 WI2 =SIMP(statut='f',typ='R' ),
898 WI3 =SIMP(statut='f',typ='R' ),
899 WI4 =SIMP(statut='f',typ='R' ),
900 WI5 =SIMP(statut='f',typ='R' ),
901 WI6 =SIMP(statut='f',typ='R' ),
902 WO2 =SIMP(statut='f',typ='R' ),
903 WO3 =SIMP(statut='f',typ='R' ),
904 WO4 =SIMP(statut='f',typ='R' ),
905 WO5 =SIMP(statut='f',typ='R' ),
906 WO6 =SIMP(statut='f',typ='R' ),
907 WO =SIMP(statut='f',typ='R' ),
908 WI1 =SIMP(statut='f',typ='R' ),
909 WO1 =SIMP(statut='f',typ='R' ),
910 GONF =SIMP(statut='f',typ='R' ),
913 EFFE_FOND =FACT(statut='f',fr="Imposer un effet de fond",min=1,max='**',
914 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),),
915 GROUP_MA_INT =SIMP(statut='o',typ=grma,max='**'),
916 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
917 MAILLE =SIMP(statut='f',typ=ma,max='**'),
918 PRES =SIMP(statut='o',typ='R' ),
921 EPSI_INIT =FACT(statut='f',fr="Appliquer un chargement de déformation initiale à un volume 3D ou 2D",
923 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
924 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
925 AU_MOINS_UN('EPXX','EPYY','EPZZ','EPXY','EPXZ','EPYZ','EPX',
926 'KY','KZ','EXX','EYY','EXY','KXX','KYY','KXY'),),
927 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
928 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
929 MAILLE =SIMP(statut='f',typ=ma,max='**'),
930 EPXX =SIMP(statut='f',typ='R' ),
931 EPYY =SIMP(statut='f',typ='R' ),
932 EPZZ =SIMP(statut='f',typ='R' ),
933 EPXY =SIMP(statut='f',typ='R' ),
934 EPXZ =SIMP(statut='f',typ='R' ),
935 EPYZ =SIMP(statut='f',typ='R' ),
936 EPX =SIMP(statut='f',typ='R' ),
937 KY =SIMP(statut='f',typ='R' ),
938 KZ =SIMP(statut='f',typ='R' ),
939 EXX =SIMP(statut='f',typ='R' ),
940 EYY =SIMP(statut='f',typ='R' ),
941 EXY =SIMP(statut='f',typ='R' ),
942 KXX =SIMP(statut='f',typ='R' ),
943 KYY =SIMP(statut='f',typ='R' ),
944 KXY =SIMP(statut='f',typ='R' ),
947 FACE_IMPO =FACT(statut='f',min=1,max='**',
948 regles=(UN_PARMI('GROUP_MA','MAILLE',),
949 AU_MOINS_UN('DX','DY','DZ','DRX','DRY','DRZ','GRX','PRES','PHI',
950 'TEMP','PRE1','PRE2','DNOR','DTAN'),
954 EXCLUS('DNOR','DRX'),
955 EXCLUS('DNOR','DRY'),
956 EXCLUS('DNOR','DRZ'),
960 EXCLUS('DTAN','DRX'),
961 EXCLUS('DTAN','DRY'),
962 EXCLUS('DTAN','DRZ'),),
963 # rajout d'un mot clé REPERE :/ LOCAL /GLOBAL
964 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
965 MAILLE =SIMP(statut='f',typ=ma,max='**'),
966 DX =SIMP(statut='f',typ='R' ),
967 DY =SIMP(statut='f',typ='R' ),
968 DZ =SIMP(statut='f',typ='R' ),
969 DRX =SIMP(statut='f',typ='R' ),
970 DRY =SIMP(statut='f',typ='R' ),
971 DRZ =SIMP(statut='f',typ='R' ),
972 DNOR =SIMP(statut='f',typ='R' ),
973 DTAN =SIMP(statut='f',typ='R' ),
974 GRX =SIMP(statut='f',typ='R' ),
975 PRES =SIMP(statut='f',typ='R' ),
976 PHI =SIMP(statut='f',typ='R' ),
977 TEMP =SIMP(statut='f',typ='R' ),
978 PRE1 =SIMP(statut='f',typ='R' ),
979 PRE2 =SIMP(statut='f',typ='R' ),
982 FLUX_THM_REP =FACT(statut='f',min=1,max='**',
983 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
984 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
985 AU_MOINS_UN('FLUN','FLUN_HYDR1','FLUN_HYDR2'),),
986 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
987 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
988 MAILLE =SIMP(statut='f',typ=ma,max='**'),
989 FLUN =SIMP(statut='f',typ='R' ),
990 FLUN_HYDR1 =SIMP(statut='f',typ='R' ),
991 FLUN_HYDR2 =SIMP(statut='f',typ='R' ),
994 FORCE_ARETE =FACT(statut='f',fr="Appliquer des forces linéiques à une arete d élément volumique ou de coque",
996 regles=(AU_MOINS_UN('GROUP_MA','MAILLE',),
997 AU_MOINS_UN('FX','FY','FZ','MX','MY','MZ' ),),
998 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
999 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1000 FX =SIMP(statut='f',typ='R' ),
1001 FY =SIMP(statut='f',typ='R' ),
1002 FZ =SIMP(statut='f',typ='R' ),
1003 MX =SIMP(statut='f',typ='R' ),
1004 MY =SIMP(statut='f',typ='R' ),
1005 MZ =SIMP(statut='f',typ='R' ),
1008 FORCE_COQUE =FACT(statut='f',fr="Appliquer des forces surfaciques sur des coques",min=1,max='**',
1009 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1010 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1011 AU_MOINS_UN('FX','FY','FZ','MX','MY','MZ','PRES','F1','F2','F3','MF1','MF2'),
1012 PRESENT_ABSENT('FX','PRES','F1','F2','F3','MF1','MF2'),
1013 PRESENT_ABSENT('FY','PRES','F1','F2','F3','MF1','MF2'),
1014 PRESENT_ABSENT('FZ','PRES','F1','F2','F3','MF1','MF2'),
1015 PRESENT_ABSENT('MX','PRES','F1','F2','F3','MF1','MF2'),
1016 PRESENT_ABSENT('MY','PRES','F1','F2','F3','MF1','MF2'),
1017 PRESENT_ABSENT('MZ','PRES','F1','F2','F3','MF1','MF2'),
1018 PRESENT_ABSENT('F1','FX','FY','FZ','MX','MY','MZ','PRES'),
1019 PRESENT_ABSENT('F2','FX','FY','FZ','MX','MY','MZ','PRES'),
1020 PRESENT_ABSENT('F3','FX','FY','FZ','MX','MY','MZ','PRES'),
1021 PRESENT_ABSENT('MF1','FX','FY','FZ','MX','MY','MZ','PRES'),
1022 PRESENT_ABSENT('MF2','FX','FY','FZ','MX','MY','MZ','PRES'),
1023 PRESENT_ABSENT('PRES','FX','FY','FZ','MX','MY','MZ','F1','F2','F3','MF1','MF2'),),
1024 # rajour d'un mot clé REPERE :/ LOCAL /GLOBAL
1025 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1026 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1027 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1029 FX =SIMP(statut='f',typ='R' ),
1030 FY =SIMP(statut='f',typ='R' ),
1031 FZ =SIMP(statut='f',typ='R' ),
1032 MX =SIMP(statut='f',typ='R' ),
1033 MY =SIMP(statut='f',typ='R' ),
1034 MZ =SIMP(statut='f',typ='R' ),
1036 F1 =SIMP(statut='f',typ='R' ),
1037 F2 =SIMP(statut='f',typ='R' ),
1038 F3 =SIMP(statut='f',typ='R' ),
1039 MF1 =SIMP(statut='f',typ='R' ),
1040 MF2 =SIMP(statut='f',typ='R' ),
1042 PRES =SIMP(statut='f',typ='R' ),
1043 PLAN =SIMP(statut='f',typ='TXM',defaut="MAIL",into=("SUP","INF","MOY","MAIL",) ),
1046 FORCE_CONTOUR =FACT(statut='f',fr="Appliquer des forces linéiques au bord d'un domaine 2D ou AXIS_FOURIER",
1048 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),
1049 AU_MOINS_UN('FX','FY','FZ','MX','MY','MZ'),),
1050 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1051 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1052 FX =SIMP(statut='f',typ='R' ),
1053 FY =SIMP(statut='f',typ='R' ),
1054 FZ =SIMP(statut='f',typ='R' ),
1055 MX =SIMP(statut='f',typ='R' ),
1056 MY =SIMP(statut='f',typ='R' ),
1057 MZ =SIMP(statut='f',typ='R' ),
1060 FORCE_ELEC =FACT(statut='f',
1061 fr="Force de Laplace due à la présence d'un conducteur rectiligne secondaire non maillé",
1063 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1064 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1065 AU_MOINS_UN('FX','FY','FZ','POSITION'),
1066 EXCLUS('FX','POSITION'),
1067 EXCLUS('FY','POSITION'),
1068 EXCLUS('FZ','POSITION'),),
1069 # trop de regles : les blocs conditionnels permettent d en suprimer
1070 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1071 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1072 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1074 FX =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
1075 FY =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
1076 FZ =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
1078 POSITION =SIMP(statut='f',typ='TXM',fr="Direction prédéfinie",into=("PARA","INFI","FINI",) ),
1079 b_para =BLOC ( condition = "POSITION == 'PARA'",
1080 regles=(UN_PARMI('TRANS','DIST'),),
1081 TRANS =SIMP(statut='f',typ='R',max=3),
1082 DIST =SIMP(statut='f',typ='R' ),
1083 b_point2 =BLOC ( condition = "DIST != None",
1084 POINT2 =SIMP(statut='o',typ='R',max=3),
1087 b_fini_infi =BLOC ( condition = "(POSITION == 'FINI') or (POSITION == 'INFI')",
1088 POINT1 =SIMP(statut='o',typ='R',max=3),
1089 POINT2 =SIMP(statut='o',typ='R',max=3),
1093 FORCE_FACE =FACT(statut='f',fr="Appliquer des forces surfaciques sur une face d'éléments volumiques",
1095 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),
1096 AU_MOINS_UN('FX','FY','FZ'),),
1097 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1098 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1099 FX =SIMP(statut='f',typ='R' ),
1100 FY =SIMP(statut='f',typ='R' ),
1101 FZ =SIMP(statut='f',typ='R' ),
1104 FORCE_INTERNE =FACT(statut='f',fr="Appliquer des forces volumiques (2D ou 3D) à un domaine volumique",
1106 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1107 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1108 AU_MOINS_UN('FX','FY','FZ' ),),
1109 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1110 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1111 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1112 FX =SIMP(statut='f',typ='R' ),
1113 FY =SIMP(statut='f',typ='R' ),
1114 FZ =SIMP(statut='f',typ='R' ),
1117 IMPE_FACE =FACT(statut='f',fr="Appliquer une impédance acoustique à une face",min=1,max='**',
1118 regles=(AU_MOINS_UN('GROUP_MA','MAILLE' ),),
1119 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1120 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1121 IMPE =SIMP(statut='o',typ='R' ),
1124 FORCE_NODALE =FACT(statut='f',fr="Imposer des forces nodales en des noeuds",min=1,max='**',
1125 regles=(AU_MOINS_UN('GROUP_NO','NOEUD'),
1126 AU_MOINS_UN('FX','FY','FZ','MX','MY','MZ' ),),
1127 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1128 NOEUD =SIMP(statut='f',typ=no,max='**'),
1129 FX =SIMP(statut='f',typ='R' ),
1130 FY =SIMP(statut='f',typ='R' ),
1131 FZ =SIMP(statut='f',typ='R' ),
1132 MX =SIMP(statut='f',typ='R' ),
1133 MY =SIMP(statut='f',typ='R' ),
1134 MZ =SIMP(statut='f',typ='R' ),
1135 ANGL_NAUT =SIMP(statut='f',typ='R',max=3),
1138 FORCE_POUTRE =FACT(statut='f',fr="Appliquer des forces linéiques sur des poutres",min=1,max='**',
1139 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1140 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1141 AU_MOINS_UN('FX','FY','FZ','N','VY','VZ'),
1142 PRESENT_ABSENT('FX','N','VY','VZ'),
1143 PRESENT_ABSENT('FY','N','VY','VZ'),
1144 PRESENT_ABSENT('FZ','N','VY','VZ'),
1145 PRESENT_ABSENT('N','FX','FY','FZ'),
1146 PRESENT_ABSENT('VY','FX','FY','FZ'),
1147 PRESENT_ABSENT('VZ','FX','FY','FZ'),),
1148 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1149 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1150 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1151 TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FORCE",into=("VENT","FORCE",) ),
1152 # rajour d'un mot clé REPERE :/ LOCAL /GLOBAL
1153 FX =SIMP(statut='f',typ='R' ),
1154 FY =SIMP(statut='f',typ='R' ),
1155 FZ =SIMP(statut='f',typ='R' ),
1157 N =SIMP(statut='f',typ='R' ),
1158 VY =SIMP(statut='f',typ='R' ),
1159 VZ =SIMP(statut='f',typ='R' ),
1163 FORCE_TUYAU =FACT(statut='f',fr="imposer une pression dans un élément TUYAU",min=1,max='**',
1164 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1165 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
1166 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1167 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1168 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1169 PRES =SIMP(statut='f',typ='R' ),
1172 INTE_ELEC =FACT(statut='f',fr="Force de Laplace due à la présence d'un conducteur non rectiligne secondaire",
1174 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1175 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1176 AU_MOINS_UN('GROUP_MA_2','MAILLE_2','TRANS','SYME'),
1177 EXCLUS('TRANS','SYME'),),
1178 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1179 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1180 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1181 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
1182 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),
1183 TRANS =SIMP(statut='f',typ='R',max='**'),
1184 SYME =SIMP(statut='f',typ='R',max='**'),
1187 LIAISON_CHAMNO =FACT(statut='f',fr="définir une relation linéaire entre tous les ddls d'un concept cham_nno",
1189 # type de cham_no CO()
1190 CHAM_NO =SIMP(statut='o',typ=cham_no), #CO()
1191 COEF_IMPO =SIMP(statut='o',typ='R' ),
1192 NUME_LAGR =SIMP(statut='f',typ='TXM',defaut="NORMAL",into=("NORMAL","APRES") ),
1195 LIAISON_COQUE =FACT(statut='f',min=1,max='**',
1196 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
1197 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),
1198 GROUP_NO_1 =SIMP(statut='f',typ=grno,max='**'),
1199 NOEUD_1 =SIMP(statut='f',typ=no,max='**'),
1200 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
1201 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),
1202 GROUP_NO_2 =SIMP(statut='f',typ=grno,max='**'),
1203 NOEUD_2 =SIMP(statut='f',typ=no,max='**'),
1204 NUME_LAGR =SIMP(statut='f',typ='TXM',defaut="NORMAL",into=("NORMAL","APRES") ),
1206 LIAISON_DDL =FACT(statut='f',fr="Définir une relation linéaire entre des ddls de deux ou plusieurs noeuds",
1208 regles=(UN_PARMI('GROUP_NO','NOEUD'),),
1209 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1210 NOEUD =SIMP(statut='f',typ=no,max='**'),
1211 DDL =SIMP(statut='o',typ='TXM',max='**'),
1212 COEF_MULT =SIMP(statut='o',typ='R',max='**'),
1213 COEF_IMPO =SIMP(statut='o',typ='R' ),
1216 LIAISON_ELEM =FACT(statut='f',fr="Raccorder une poutre à une partie massive 3D ou une coque", min=1,max='**',
1217 regles=(UN_PARMI('GROUP_MA_1','MAILLE_1'),
1218 UN_PARMI('GROUP_NO_2','NOEUD_2'),),
1219 OPTION =SIMP(statut='o',typ='TXM',into=("3D_TUYAU","3D_POU","COQ_POU","COQ_TUYAU") ),
1220 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
1221 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),
1222 GROUP_NO_2 =SIMP(statut='f',typ=grno,max='**'),
1223 NOEUD_2 =SIMP(statut='f',typ=no,max='**'),
1224 NUME_LAGR =SIMP(statut='f',typ='TXM',defaut="NORMAL",into=("NORMAL","APRES") ),
1225 CARA_ELEM =SIMP(statut='f',typ=(cara_elem) ),
1226 AXE_POUTRE =SIMP(statut='f',typ='R',max=3),
1227 ANGL_MAX =SIMP(statut='f',typ='R',defaut= 1. ),
1230 LIAISON_GROUP =FACT(statut='f',fr="Définir des relations linéaires entre certains ddls de couples de noeuds",
1232 regles=(UN_PARMI('GROUP_MA_1','MAILLE_1','GROUP_NO_1','NOEUD_1'),
1233 UN_PARMI('GROUP_MA_2','MAILLE_2','GROUP_NO_2','NOEUD_2'),
1234 EXCLUS('GROUP_MA_1','GROUP_NO_2'),
1235 EXCLUS('GROUP_MA_1','NOEUD_2'),
1236 EXCLUS('GROUP_NO_1','GROUP_MA_2'),
1237 EXCLUS('GROUP_NO_1','MAILLE_2'),
1238 EXCLUS('MAILLE_1','GROUP_NO_2'),
1239 EXCLUS('MAILLE_1','NOEUD_2'),
1240 EXCLUS('NOEUD_1','GROUP_MA_2'),
1241 EXCLUS('NOEUD_1','MAILLE_2'),
1242 EXCLUS('SANS_NOEUD','SANS_GROUP_NO'),),
1244 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
1245 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),
1246 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
1247 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),
1248 GROUP_NO_1 =SIMP(statut='f',typ=grno,max='**'),
1249 NOEUD_1 =SIMP(statut='f',typ=no,max='**'),
1250 GROUP_NO_2 =SIMP(statut='f',typ=no,max='**'),
1251 NOEUD_2 =SIMP(statut='f',typ=no,max='**'),
1253 SANS_NOEUD =SIMP(statut='f',typ=no,max='**'),
1254 SANS_GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1255 DDL_1 =SIMP(statut='o',typ='TXM',max='**'),
1256 COEF_MULT_1 =SIMP(statut='o',typ='R',max='**'),
1257 DDL_2 =SIMP(statut='o',typ='TXM',max='**'),
1258 COEF_MULT_2 =SIMP(statut='o',typ='R',max='**'),
1259 COEF_IMPO =SIMP(statut='o',typ='R' ),
1260 SOMMET =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1261 TRAN =SIMP(statut='f',typ='R',max=3),
1262 ANGL_NAUT =SIMP(statut='f',typ='R',max=3),
1263 CENTRE =SIMP(statut='f',typ='R',max=3),
1266 LIAISON_OBLIQUE =FACT(statut='f',fr="Appliquer à des noeuds une valeur de déplacement dans un repere oblique",
1268 regles=(UN_PARMI('GROUP_NO','NOEUD'),
1269 UN_PARMI('DX','DY','DZ','DRX','DRY','DRZ'),),
1270 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1271 NOEUD =SIMP(statut='f',typ=no,max='**'),
1272 ANGL_NAUT =SIMP(statut='o',typ='R',max=3),
1273 DX =SIMP(statut='f',typ='R' ),
1274 DY =SIMP(statut='f',typ='R' ),
1275 DZ =SIMP(statut='f',typ='R' ),
1276 DRX =SIMP(statut='f',typ='R' ),
1277 DRY =SIMP(statut='f',typ='R' ),
1278 DRZ =SIMP(statut='f',typ='R' ),
1281 LIAISON_SOLIDE =FACT(statut='f',fr="Modéliser une partie indéformable d'une structure",min=1,max='**',
1282 regles=(UN_PARMI('GROUP_NO','NOEUD','GROUP_MA','MAILLE'),),
1283 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1284 NOEUD =SIMP(statut='f',typ=no,max='**'),
1285 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1286 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1287 NUME_LAGR =SIMP(statut='f',typ='TXM',defaut="NORMAL",into=("NORMAL","APRES") ),
1290 LIAISON_UNIF =FACT(statut='f',fr="Imposer une meme valeur (inconnue) à des ddls d'un emsemble de noeuds",
1292 regles=(UN_PARMI('GROUP_NO','NOEUD','GROUP_MA','MAILLE'),),
1293 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1294 NOEUD =SIMP(statut='f',typ=no,max='**'),
1295 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1296 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1297 DDL =SIMP(statut='o',typ='TXM',max='**'),
1300 LIAISON_UNIL_NO =FACT(statut='f',min=1,max='**',
1301 regles=(UN_PARMI('GROUP_MA_1','MAILLE_1'),
1302 UN_PARMI('GROUP_MA_2','MAILLE_2'),),
1303 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),# CO()
1304 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),# CO()
1305 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),# CO()
1306 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),# CO()
1307 SOMMET =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1308 TRAN =SIMP(statut='f',typ='R',max=3 ),
1309 ANGL_NAUT =SIMP(statut='f',typ='R',max=3 ),
1310 CENTRE =SIMP(statut='f',typ='R',max=3 ),
1311 ANGLE_MAX =SIMP(statut='f',typ='R' ),
1312 VECT_Y =SIMP(statut='f',typ='R',min=3,max=3),
1313 FROTTEMENT =SIMP(statut='f',typ='TXM',defaut="SANS",
1314 into=("SANS","TRESCA","COULOMB") ),
1315 METHODE =SIMP(statut='f',typ='TXM',defaut="CONTRAINTE",
1316 into=("CONTRAINTE","LAGRANGIEN","PENALISATION") ),
1317 COULOMB =SIMP(statut='f',typ='R' ),
1318 TRESCA =SIMP(statut='f',typ='R' ),
1319 E_T =SIMP(statut='f',typ='R' ),
1320 COEF_MATR_FROT =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
1321 CONTACT =SIMP(statut='f',typ='TXM',into=("MAINTENU",) ),
1322 JEU =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
1325 LIAISON_MAIL =FACT(statut='f',min=1,max='**',
1326 regles=(AU_MOINS_UN('GROUP_MA_MAIT','MAILLE_MAIT'),
1327 AU_MOINS_UN('GROUP_MA_ESCL','MAILLE_ESCL','GROUP_NO_ESCL','NOEUD_ESCL'),
1328 PRESENT_PRESENT('DDL_MAIT','DDL_ESCL'),),
1329 GROUP_MA_MAIT =SIMP(statut='f',typ=grma,max='**'),
1330 MAILLE_MAIT =SIMP(statut='f',typ=ma,max='**'),
1331 GROUP_MA_ESCL =SIMP(statut='f',typ=grma,max='**'),
1332 MAILLE_ESCL =SIMP(statut='f',typ=ma,max='**'),
1333 GROUP_NO_ESCL =SIMP(statut='f',typ=grno,max='**'),
1334 NOEUD_ESCL =SIMP(statut='f',typ=no,max='**'),
1335 TRAN =SIMP(statut='f',typ='R',max=3 ),
1336 ANGL_NAUT =SIMP(statut='f',typ='R',max=3 ),
1337 CENTRE =SIMP(statut='f',typ='R',max=3 ),
1338 DDL_MAIT =SIMP(statut='f',typ='TXM',into=("DNOR",) ),
1339 DDL_ESCL =SIMP(statut='f',typ='TXM',into=("DNOR",) ),
1342 ONDE_FLUI =FACT(statut='f',fr="Appliquer une amplitude de pression d onde incidente",min=1,max='**',
1343 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),),
1344 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1345 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1346 PRES =SIMP(statut='o',typ='R' ),
1349 PRES_REP =FACT(statut='f',fr="Appliquer une pression à un domaine de milieu continu 2D ou 3D",
1351 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1352 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1353 AU_MOINS_UN('PRES','CISA_2D' ),),
1354 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1355 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1356 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1357 PRES =SIMP(statut='f',typ='R' ),
1358 CISA_2D =SIMP(statut='f',typ='R' ),
1361 PESANTEUR =SIMP(statut='f',typ='R',fr="Champ de pesanteur",min=4,max=4),
1363 RELA_CINE_BP =FACT(statut='f',min=1,max='**',
1364 CABLE_BP =SIMP(statut='o',typ=cabl_precont ),
1365 SIGM_BPEL =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
1366 RELA_CINE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
1369 ROTATION =SIMP(statut='f',typ='R',fr="Champ de rotation",min=4,max=4),
1370 b_rotation =BLOC ( condition = "ROTATION != None",
1371 CENTRE =SIMP(statut='f',typ='R',defaut=(0.,0.,0.),max=3),),
1373 VITE_FACE =FACT(statut='f',fr="Imposer des vitesses acoustiquesnormales à une face",min=1,max='**',
1374 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),),
1375 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1376 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1377 VNOR =SIMP(statut='o',typ='R' ),
1379 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
1381 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
1382 # CONFIGURATION MANAGEMENT OF EDF VERSION
1383 # ======================================================================
1384 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
1385 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
1386 # REDISTRIBUTION OF THIS FILE.
1387 # ======================================================================
1388 # RESPONSABLE G8BHHXD X.DESROCHES
1389 AFFE_CHAR_MECA_C=OPER(nom="AFFE_CHAR_MECA_C",op= 7,sd_prod=char_meca,
1390 fr="Affectation de charges et conditions aux limites mécaniques complexes",
1391 docu="U4.44.05-c",reentrant='n',
1392 regles=(AU_MOINS_UN('DDL_IMPO','FORCE_POUTRE','LIAISON_DDL', ),),
1393 MODELE =SIMP(statut='o',typ=modele ),
1394 VERI_DDL =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
1395 DDL_IMPO =FACT(statut='f',min=01,max='**',
1396 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE','GROUP_NO','NOEUD',),
1397 AU_MOINS_UN('DX','DY','DZ','DRX','DRY','DRZ','GRX','PRES','PHI', ),),
1398 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1399 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1400 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1401 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1402 NOEUD =SIMP(statut='f',typ=no,max='**'),
1403 DX =SIMP(statut='f',typ='C' ),
1404 DY =SIMP(statut='f',typ='C' ),
1405 DZ =SIMP(statut='f',typ='C' ),
1406 DRX =SIMP(statut='f',typ='C' ),
1407 DRY =SIMP(statut='f',typ='C' ),
1408 DRZ =SIMP(statut='f',typ='C' ),
1409 GRX =SIMP(statut='f',typ='C' ),
1410 PRES =SIMP(statut='f',typ='C' ),
1411 PHI =SIMP(statut='f',typ='C' ),
1413 FORCE_POUTRE =FACT(statut='f',min=01,max='**',
1414 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1415 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1416 AU_MOINS_UN('FX','FY','FZ','N','VY','VZ',),
1417 PRESENT_ABSENT('FX','N','VY','VZ',),
1418 PRESENT_ABSENT('FY','N','VY','VZ',),
1419 PRESENT_ABSENT('FZ','N','VY','VZ',),
1420 PRESENT_ABSENT('N','FX','FY','FZ',),
1421 PRESENT_ABSENT('VY', 'FX','FY','FZ',),
1422 PRESENT_ABSENT('VZ','FX','FY','FZ', ),),
1423 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1424 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1425 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1426 TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FORCE",into=("VENT","FORCE") ),
1427 FX =SIMP(statut='f',typ='C' ),
1428 FY =SIMP(statut='f',typ='C' ),
1429 FZ =SIMP(statut='f',typ='C' ),
1430 N =SIMP(statut='f',typ='C' ),
1431 VY =SIMP(statut='f',typ='C' ),
1432 VZ =SIMP(statut='f',typ='C' ),
1434 LIAISON_DDL =FACT(statut='f',min=01,max='**',
1435 regles=(UN_PARMI('GROUP_NO','NOEUD', ),),
1436 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1437 NOEUD =SIMP(statut='f',typ=no,max='**'),
1438 DDL =SIMP(statut='o',typ='TXM',max='**'),
1439 COEF_MULT =SIMP(statut='o',typ='R',max='**'),
1440 COEF_IMPO =SIMP(statut='o',typ='C' ),
1442 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
1444 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
1445 # CONFIGURATION MANAGEMENT OF EDF VERSION
1446 # ======================================================================
1447 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
1448 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
1449 # REDISTRIBUTION OF THIS FILE.
1450 # ======================================================================
1451 # RESPONSABLE G8BHHXD X.DESROCHES
1452 AFFE_CHAR_MECA_F=OPER(nom="AFFE_CHAR_MECA_F",op=7,sd_prod=char_meca,
1453 fr="Affectation de charges et conditions aux limites mécaniques fonction d une grandeur",
1454 docu="U4.44.01-f",reentrant='n',
1455 regles=(AU_MOINS_UN('DDL_IMPO','FACE_IMPO','LIAISON_DDL','FORCE_NODALE',
1456 'FORCE_FACE','FORCE_ARETE','FORCE_CONTOUR','FORCE_INTERNE',
1457 'PRES_REP','FORCE_POUTRE','VITE_FACE','IMPE_FACE','ONDE_PLANE',
1458 'LIAISON_OBLIQUE','EPSI_INIT','LIAISON_GROUP','LIAISON_UNIF',
1459 'LIAISON_SOLIDE','FORCE_COQUE','LIAISON_COQUE','FORCE_TUYAU',
1461 MODELE =SIMP(statut='o',typ=modele ),
1462 VERI_DDL =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
1463 VERI_NORM =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
1465 DDL_IMPO =FACT(statut='f',min=1,max='**',
1466 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE','GROUP_NO','NOEUD'),
1467 AU_MOINS_UN('DX','DY','DZ','DRX','DRY','DRZ','GRX','PRES','PHI',
1468 'TEMP','PRE1','PRE2'),),
1469 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1470 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1471 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1472 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1473 NOEUD =SIMP(statut='f',typ=no,max='**'),
1474 DX =SIMP(statut='f',typ=(fonction) ),
1475 DY =SIMP(statut='f',typ=(fonction) ),
1476 DZ =SIMP(statut='f',typ=(fonction) ),
1477 DRX =SIMP(statut='f',typ=(fonction) ),
1478 DRY =SIMP(statut='f',typ=(fonction) ),
1479 DRZ =SIMP(statut='f',typ=(fonction) ),
1480 GRX =SIMP(statut='f',typ=(fonction) ),
1481 PRES =SIMP(statut='f',typ=(fonction) ),
1482 PHI =SIMP(statut='f',typ=(fonction) ),
1483 TEMP =SIMP(statut='f',typ=(fonction) ),
1484 PRE1 =SIMP(statut='f',typ=(fonction) ),
1485 PRE2 =SIMP(statut='f',typ=(fonction) ),
1487 LIAISON_UNIF =FACT(statut='f',min=1,max='**',
1488 fr="Imposer une meme valeur (inconnue) a des ddls d un emsemble de noeuds",
1489 regles=(UN_PARMI('GROUP_NO','NOEUD','GROUP_MA','MAILLE'),),
1490 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1491 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1492 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1493 NOEUD =SIMP(statut='f',typ=no,max='**'),
1494 DDL =SIMP(statut='o',typ='TXM',max='**'),
1496 LIAISON_SOLIDE =FACT(statut='f',min=1,max='**',
1497 fr="Modéliser une partie indéformable d une structure",
1498 regles=(UN_PARMI('GROUP_NO','NOEUD','GROUP_MA','MAILLE'),),
1499 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1500 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1501 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1502 NOEUD =SIMP(statut='f',typ=no,max='**'),
1503 NUME_LAGR =SIMP(statut='f',typ='TXM',defaut="NORMAL",into=("NORMAL","APRES",) ),
1505 LIAISON_OBLIQUE =FACT(statut='f',min=1,max='**',
1506 fr="Définir des relations linéaires entre certains ddls de couples de noeuds",
1507 regles=(UN_PARMI('GROUP_NO','NOEUD'),
1508 UN_PARMI('DX','DY','DZ','DRX','DRY','DRZ'),),
1509 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1510 NOEUD =SIMP(statut='f',typ=no,max='**'),
1511 ANGL_NAUT =SIMP(statut='o',typ='R',max=3),
1512 DX =SIMP(statut='f',typ=(fonction) ),
1513 DY =SIMP(statut='f',typ=(fonction) ),
1514 DZ =SIMP(statut='f',typ=(fonction) ),
1515 DRX =SIMP(statut='f',typ=(fonction) ),
1516 DRY =SIMP(statut='f',typ=(fonction) ),
1517 DRZ =SIMP(statut='f',typ=(fonction) ),
1519 LIAISON_COQUE =FACT(statut='f',min=1,max='**',
1520 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
1521 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),
1522 GROUP_NO_1 =SIMP(statut='f',typ=grno,max='**'),
1523 NOEUD_1 =SIMP(statut='f',typ=no,max='**'),
1524 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
1525 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),
1526 GROUP_NO_2 =SIMP(statut='f',typ=grno,max='**'),
1527 NOEUD_2 =SIMP(statut='f',typ=no,max='**'),
1528 NUME_LAGR =SIMP(statut='f',typ='TXM',defaut="NORMAL",into=("NORMAL","APRES",) ),
1530 FACE_IMPO =FACT(statut='f',min=1,max='**',
1531 regles=(UN_PARMI('GROUP_MA','MAILLE'),
1532 AU_MOINS_UN('DX','DY','DZ','DRX','DRY','DRZ','GRX','PRES','PHI','TEMP','PRE1','PRE2','DNOR','DTAN'),
1533 EXCLUS('DNOR','DX'),
1534 EXCLUS('DNOR','DY'),
1535 EXCLUS('DNOR','DZ'),
1536 EXCLUS('DNOR','DRX'),
1537 EXCLUS('DNOR','DRY'),
1538 EXCLUS('DNOR','DRZ'),
1539 EXCLUS('DTAN','DX'),
1540 EXCLUS('DTAN','DY'),
1541 EXCLUS('DTAN','DZ'),
1542 EXCLUS('DTAN','DRX'),
1543 EXCLUS('DTAN','DRY'),
1544 EXCLUS('DTAN','DRZ'),),
1545 # rajout d un mot cle REPERE : / GLOBAL / LOCAL
1546 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1547 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1548 DX =SIMP(statut='f',typ=(fonction) ),
1549 DY =SIMP(statut='f',typ=(fonction) ),
1550 DZ =SIMP(statut='f',typ=(fonction) ),
1551 DRX =SIMP(statut='f',typ=(fonction) ),
1552 DRY =SIMP(statut='f',typ=(fonction) ),
1553 DRZ =SIMP(statut='f',typ=(fonction) ),
1554 GRX =SIMP(statut='f',typ=(fonction) ),
1555 PRES =SIMP(statut='f',typ=(fonction) ),
1556 PHI =SIMP(statut='f',typ=(fonction) ),
1557 TEMP =SIMP(statut='f',typ=(fonction) ),
1558 PRE1 =SIMP(statut='f',typ=(fonction) ),
1559 PRE2 =SIMP(statut='f',typ=(fonction) ),
1560 DNOR =SIMP(statut='f',typ=(fonction) ),
1561 DTAN =SIMP(statut='f',typ=(fonction) ),
1563 LIAISON_DDL =FACT(statut='f',min=1,max='**',
1564 fr="Définir une relation linéaire entre des ddls de deux ou plusieurs noeuds",
1565 regles=(UN_PARMI('GROUP_NO','NOEUD'),),
1566 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1567 NOEUD =SIMP(statut='f',typ=no,max='**'),
1568 DDL =SIMP(statut='o',typ='TXM',max='**'),
1569 COEF_MULT =SIMP(statut='o',typ='R',max='**'),
1570 COEF_IMPO =SIMP(statut='o',typ=(fonction) ),
1572 LIAISON_GROUP =FACT(statut='f',min=1,max='**',
1573 fr="Définir des relations linéaires entre certains ddls de couples de noeuds",
1574 regles=(UN_PARMI('GROUP_MA_1','MAILLE_1','GROUP_NO_1','NOEUD_1'),
1575 UN_PARMI('GROUP_MA_2','MAILLE_2','GROUP_NO_2','NOEUD_2'),
1576 EXCLUS('GROUP_MA_1','GROUP_NO_2'),
1577 EXCLUS('GROUP_MA_1','NOEUD_2'),
1578 EXCLUS('GROUP_NO_1','GROUP_MA_2'),
1579 EXCLUS('GROUP_NO_1','MAILLE_2'),
1580 EXCLUS('MAILLE_1','GROUP_NO_2'),
1581 EXCLUS('MAILLE_1','NOEUD_2'),
1582 EXCLUS('NOEUD_1','GROUP_MA_2'),
1583 EXCLUS('NOEUD_1','MAILLE_2'),
1584 EXCLUS('SANS_NOEUD','SANS_GROUP_NO'),),
1585 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
1586 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),
1587 GROUP_NO_1 =SIMP(statut='f',typ=grno,max='**'),
1588 NOEUD_1 =SIMP(statut='f',typ=no,max='**'),
1589 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
1590 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),
1591 GROUP_NO_2 =SIMP(statut='f',typ=grno,max='**'),
1592 NOEUD_2 =SIMP(statut='f',typ=no,max='**'),
1593 SANS_NOEUD =SIMP(statut='f',typ=no,max='**'),
1594 SANS_GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1595 DDL_1 =SIMP(statut='o',typ='TXM',max='**'),
1596 COEF_MULT_1 =SIMP(statut='o',typ='R',max='**'),
1597 DDL_2 =SIMP(statut='o',typ='TXM',max='**'),
1598 COEF_MULT_2 =SIMP(statut='o',typ='R',max='**'),
1599 COEF_IMPO =SIMP(statut='o',typ=(fonction) ),
1600 SOMMET =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1601 TRAN =SIMP(statut='f',typ='R',max=3),
1602 ANGL_NAUT =SIMP(statut='f',typ='R',max=3),
1603 CENTRE =SIMP(statut='f',typ='R',max=3),
1606 FORCE_NODALE =FACT(statut='f',min=1,max='**',
1607 regles=(UN_PARMI('GROUP_NO','NOEUD'),
1608 AU_MOINS_UN('FX','FY','FZ','MX','MY','MZ'),),
1609 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1610 NOEUD =SIMP(statut='f',typ=no,max='**'),
1611 FX =SIMP(statut='f',typ=(fonction) ),
1612 FY =SIMP(statut='f',typ=(fonction) ),
1613 FZ =SIMP(statut='f',typ=(fonction) ),
1614 MX =SIMP(statut='f',typ=(fonction) ),
1615 MY =SIMP(statut='f',typ=(fonction) ),
1616 MZ =SIMP(statut='f',typ=(fonction) ),
1617 ANGL_NAUT =SIMP(statut='f',typ=(fonction),max=3 ),
1619 FORCE_INTERNE =FACT(statut='f',min=1,max='**',
1620 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1621 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1622 AU_MOINS_UN('FX','FY','FZ'),),
1623 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1624 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1625 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1626 FX =SIMP(statut='f',typ=(fonction) ),
1627 FY =SIMP(statut='f',typ=(fonction) ),
1628 FZ =SIMP(statut='f',typ=(fonction) ),
1630 FORCE_FACE =FACT(statut='f',min=1,max='**',
1631 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),
1632 AU_MOINS_UN('FX','FY','FZ'),),
1633 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1634 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1635 FX =SIMP(statut='f',typ=(fonction) ),
1636 FY =SIMP(statut='f',typ=(fonction) ),
1637 FZ =SIMP(statut='f',typ=(fonction) ),
1639 FORCE_ARETE =FACT(statut='f',min=1,max='**',
1640 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),
1641 AU_MOINS_UN('FX','FY','FZ','MX','MY','MZ'),),
1642 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1643 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1644 FX =SIMP(statut='f',typ=(fonction) ),
1645 FY =SIMP(statut='f',typ=(fonction) ),
1646 FZ =SIMP(statut='f',typ=(fonction) ),
1647 MX =SIMP(statut='f',typ=(fonction) ),
1648 MY =SIMP(statut='f',typ=(fonction) ),
1649 MZ =SIMP(statut='f',typ=(fonction) ),
1651 FORCE_CONTOUR =FACT(statut='f',min=1,max='**',
1652 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),
1653 AU_MOINS_UN('FX','FY','FZ','MX','MY','MZ'),),
1654 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1655 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1656 FX =SIMP(statut='f',typ=(fonction) ),
1657 FY =SIMP(statut='f',typ=(fonction) ),
1658 FZ =SIMP(statut='f',typ=(fonction) ),
1659 MX =SIMP(statut='f',typ=(fonction) ),
1660 MY =SIMP(statut='f',typ=(fonction) ),
1661 MZ =SIMP(statut='f',typ=(fonction) ),
1663 PRES_REP =FACT(statut='f',min=1,max='**',
1664 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1665 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1666 AU_MOINS_UN('PRES','CISA_2D'),),
1667 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1668 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1669 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1670 PRES =SIMP(statut='f',typ=(fonction) ),
1671 CISA_2D =SIMP(statut='f',typ=(fonction) ),
1674 FORCE_COQUE =FACT(statut='f',min=1,max='**',
1675 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1676 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1677 AU_MOINS_UN('FX','FY','FZ','MX','MY','MZ','PRES','F1','F2','F3','MF1','MF2'),
1678 PRESENT_ABSENT('FX','PRES','F1','F2','F3','MF1','MF2'),
1679 PRESENT_ABSENT('FY','PRES','F1','F2','F3','MF1','MF2'),
1680 PRESENT_ABSENT('FZ','PRES','F1','F2','F3','MF1','MF2'),
1681 PRESENT_ABSENT('MX','PRES','F1','F2','F3','MF1','MF2'),
1682 PRESENT_ABSENT('MY','PRES','F1','F2','F3','MF1','MF2'),
1683 PRESENT_ABSENT('MZ','PRES','F1','F2','F3','MF1','MF2'),
1684 PRESENT_ABSENT('F1','PRES','FX','FY','FZ','MX','MY','MZ'),
1685 PRESENT_ABSENT('F2','PRES','FX','FY','FZ','MX','MY','MZ'),
1686 PRESENT_ABSENT('F3','PRES','FX','FY','FZ','MX','MY','MZ'),
1687 PRESENT_ABSENT('MF1','PRES','FX','FY','FZ','MX','MY','MZ'),
1688 PRESENT_ABSENT('MF2','PRES','FX','FY','FZ','MX','MY','MZ'),
1689 PRESENT_ABSENT('PRES','FX','FY','FZ','MX','MY','MZ','F1','F2','F3','MF1','MF2'),),
1690 # rajout d un mot cle REPERE : / GLOBAL / LOCAL
1691 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1692 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1693 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1694 FX =SIMP(statut='f',typ=(fonction) ),
1695 FY =SIMP(statut='f',typ=(fonction) ),
1696 FZ =SIMP(statut='f',typ=(fonction) ),
1697 MX =SIMP(statut='f',typ=(fonction) ),
1698 MY =SIMP(statut='f',typ=(fonction) ),
1699 MZ =SIMP(statut='f',typ=(fonction) ),
1700 F1 =SIMP(statut='f',typ=(fonction) ),
1701 F2 =SIMP(statut='f',typ=(fonction) ),
1702 F3 =SIMP(statut='f',typ=(fonction) ),
1703 MF1 =SIMP(statut='f',typ=(fonction) ),
1704 MF2 =SIMP(statut='f',typ=(fonction) ),
1705 PRES =SIMP(statut='f',typ=(fonction) ),
1706 PLAN =SIMP(statut='f',typ='TXM',defaut="MAIL",
1707 into=("SUP","INF","MOY","MAIL") ),
1709 FORCE_POUTRE =FACT(statut='f',min=1,max='**',
1710 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1711 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1712 AU_MOINS_UN('FX','FY','FZ','N','VY','VZ'),
1713 PRESENT_ABSENT('FX','N','VY','VZ'),
1714 PRESENT_ABSENT('FY','N','VY','VZ'),
1715 PRESENT_ABSENT('FZ','N','VY','VZ'),
1716 PRESENT_ABSENT('N','FX','FY','FZ'),
1717 PRESENT_ABSENT('VY','FX','FY','FZ'),
1718 PRESENT_ABSENT('VZ','FX','FY','FZ'),),
1719 # rajout d un mot cle REPERE : / GLOBAL / LOCAL
1720 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1721 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1722 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1723 TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FORCE",into=("VENT","FORCE") ),
1724 FX =SIMP(statut='f',typ=(fonction) ),
1725 FY =SIMP(statut='f',typ=(fonction) ),
1726 FZ =SIMP(statut='f',typ=(fonction) ),
1727 N =SIMP(statut='f',typ=(fonction) ),
1728 VY =SIMP(statut='f',typ=(fonction) ),
1729 VZ =SIMP(statut='f',typ=(fonction) ),
1731 FORCE_TUYAU =FACT(statut='f',min=1,max='**',
1732 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1733 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
1734 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1735 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1736 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1737 PRES =SIMP(statut='f',typ=(fonction) ),
1739 VITE_FACE =FACT(statut='f',min=1,max='**',
1740 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),
1741 PRESENT_ABSENT('GROUP_MA','MAILLE'),),
1742 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1743 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1744 VNOR =SIMP(statut='o',typ=(fonction) ),
1746 IMPE_FACE =FACT(statut='f',min=1,max='**',
1747 regles=(AU_MOINS_UN('GROUP_MA','MAILLE'),
1748 PRESENT_ABSENT('GROUP_MA','MAILLE'),),
1749 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1750 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1751 IMPE =SIMP(statut='o',typ=(fonction) ),
1753 ONDE_PLANE =FACT(statut='f',min=1,max='**',
1754 DIRECTION =SIMP(statut='o',typ='R',max='**'),
1755 TYPE_ONDE =SIMP(statut='o',typ='TXM' ),
1756 FONC_SIGNAL =SIMP(statut='o',typ=(fonction) ),
1757 DIST_ORIG =SIMP(statut='o',typ='R' ),
1759 EPSI_INIT =FACT(statut='f',min=1,max='**',
1760 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1761 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1762 AU_MOINS_UN('EPXX','EPYY','EPZZ','EPXY','EPXZ','EPYZ'),),
1763 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1764 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1765 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1766 EPXX =SIMP(statut='f',typ=(fonction) ),
1767 EPYY =SIMP(statut='f',typ=(fonction) ),
1768 EPZZ =SIMP(statut='f',typ=(fonction) ),
1769 EPXY =SIMP(statut='f',typ=(fonction) ),
1770 EPXZ =SIMP(statut='f',typ=(fonction) ),
1771 EPYZ =SIMP(statut='f',typ=(fonction) ),
1774 CONTACT =FACT(statut='f',min=1,max='**',
1775 regles=(UN_PARMI('GROUP_MA_2','MAILLE_2'),
1776 EXCLUS('DIST_2','COEF_IMPO'),
1777 EXCLUS('DIST_1','COEF_IMPO'),
1778 EXCLUS('COEF_MULT_2','GROUP_MA_1'),
1779 EXCLUS('COEF_MULT_2','MAILLE_1'),
1780 EXCLUS('COEF_IMPO','GROUP_MA_1'),
1781 EXCLUS('COEF_IMPO','MAILLE_1'),),
1782 NOM_CHAM =SIMP(statut='f',typ='TXM',defaut="DEPL",into=("DEPL","PRES","TEMP") ),
1783 APPARIEMENT =SIMP(statut='f',typ='TXM',defaut="MAIT_ESCL",
1784 into=("NON","NODAL","NODAL_SYME","MAIT_ESCL","MAIT_ESCL_SYME") ),
1785 RECHERCHE =SIMP(statut='f',typ='TXM',defaut="NOEUD_VOISIN",
1786 into=("NOEUD_BOUCLE","NOEUD_VOISIN") ),
1787 INTEGRATION =SIMP(statut='f',typ='TXM',defaut="NOEUD",into=("GAUSS","NOEUD")),
1788 COEF_REGU_CONT =SIMP(statut='f',typ='R',defaut=100.E+0),
1789 COEF_REGU_FROT =SIMP(statut='f',typ='R',defaut=100.E+0),
1790 MODL_AXIS =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
1791 ITER_GEOM_MAXI =SIMP(statut='f',typ='I',defaut=2),
1792 ITER_CONT_MAXI =SIMP(statut='f',typ='I',defaut=30),
1793 ITER_FROT_MAXI =SIMP(statut='f',typ='I',defaut=2),
1794 LISSAGE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
1795 SEUIL_INIT =SIMP(statut='f',typ='I',defaut=0),
1796 REAC_GEOM_INTE =SIMP(statut='f',typ='I',defaut= 2),
1797 NORMALE =SIMP(statut='f',typ='TXM',defaut="MAIT",into=("MAIT","MAIT_ESCL")),
1798 METHODE =SIMP(statut='f',typ='TXM',defaut="CONTRAINTE",
1799 into=("CONTRAINTE","LAGRANGIEN","PENALISATION") ),
1800 FROTTEMENT =SIMP(statut='f',typ='TXM',defaut="SANS",into=("SANS","COULOMB",) ),
1801 COULOMB =SIMP(statut='f',typ='R',max=1,defaut=0.E+0),
1802 E_N =SIMP(statut='f',typ='R' ),
1803 E_T =SIMP(statut='f',typ='R' ),
1804 COEF_MATR_FROT =SIMP(statut='f',typ='R',defaut=0.E+0),
1805 VECT_Y =SIMP(statut='f',typ='R',min=3,max=3),
1806 VECT_NORM_2 =SIMP(statut='f',typ='R',max=3),
1807 PROJECTION =SIMP(statut='f',typ='TXM',defaut="LINEAIRE",into=("LINEAIRE",) ),
1808 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
1809 MAILLE_1 =SIMP(statut='f',typ=ma,max='**' ),
1810 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
1811 MAILLE_2 =SIMP(statut='f',typ=ma,max='**' ),
1812 SANS_NOEUD =SIMP(statut='f',typ=no,max='**' ),
1813 SANS_GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1814 DIST_1 =SIMP(statut='f',typ=(fonction) ),
1815 DIST_2 =SIMP(statut='f',typ=(fonction) ),
1816 COEF_IMPO =SIMP(statut='f',typ='R',defaut=0.E+0),
1817 COEF_MULT_2 =SIMP(statut='f',typ='R',defaut=1.E+0),
1819 FLUX_THM_REP =FACT(statut='f',min=1,max='**',
1820 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1821 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1822 AU_MOINS_UN('FLUN','FLUN_HYDR1','FLUN_HYDR2'),),
1823 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1824 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1825 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1826 FLUN =SIMP(statut='f',typ=(fonction) ),
1827 FLUN_HYDR1 =SIMP(statut='f',typ=(fonction) ),
1828 FLUN_HYDR2 =SIMP(statut='f',typ=(fonction) ),
1831 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
1833 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
1834 # CONFIGURATION MANAGEMENT OF EDF VERSION
1835 # ======================================================================
1836 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
1837 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
1838 # REDISTRIBUTION OF THIS FILE.
1839 # ======================================================================
1840 AFFE_CHAR_OPS011=OPER(nom="AFFE_CHAR_OPS011",op= 190,sd_prod=char_ther,
1842 docu="",reentrant='n',
1843 regles=(AU_MOINS_UN('CARA_TORSION', ),),
1844 MODELE =SIMP(statut='o',typ=modele ),
1845 VERI_DDL =SIMP(statut='f',typ='TXM',defaut="OUI",
1846 into=("OUI","NON") ),
1847 CARA_TORSION =FACT(statut='f',min=01,max='**',
1848 regles=(UN_PARMI('TOUT','GROUP_MA'),),
1849 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1850 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1852 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
1854 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
1855 # CONFIGURATION MANAGEMENT OF EDF VERSION
1856 # ======================================================================
1857 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
1858 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
1859 # REDISTRIBUTION OF THIS FILE.
1860 # ======================================================================
1861 AFFE_CHAR_THER=OPER(nom="AFFE_CHAR_THER",op=34,sd_prod=char_ther
1862 ,fr="Affectation de charges et conditions aux limites thermiques constantes",
1863 docu="U4.44.02-f",reentrant='n',
1864 regles=(AU_MOINS_UN('TEMP_IMPO','SOURCE','FLUX_REP','ECHANGE',
1865 'ECHANGE_PAROI','GRAD_TEMP_INIT','LIAISON_DDL','LIAISON_GROUP',
1866 'LIAISON_UNIF','LIAISON_CHAMNO','RAYONNEMENT','LIAISON_MAIL' ),),
1867 MODELE =SIMP(statut='o',typ=(modele) ),
1868 VERI_DDL =SIMP(statut='f',typ='TXM',into=("OUI","NON"),defaut="OUI"),
1869 LIAISON_DDL =FACT(statut='f',min=01,max='**',
1870 regles=(UN_PARMI('GROUP_NO','NOEUD', ),),
1871 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1872 NOEUD =SIMP(statut='f',typ=no,max='**'),
1873 DDL =SIMP(statut='f',typ='TXM',max='**',
1874 into=("TEMP","TEMP_INF","TEMP_SUP") ),
1875 COEF_MULT =SIMP(statut='o',typ='R',max='**'),
1876 COEF_IMPO =SIMP(statut='o',typ='R' ),
1878 TEMP_IMPO =FACT(statut='f',min=01,max='**',
1879 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE','GROUP_NO','NOEUD'),
1880 AU_MOINS_UN('TEMP_SUP','TEMP','TEMP_INF'),),
1881 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1882 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1883 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1884 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1885 NOEUD =SIMP(statut='f',typ=no,max='**'),
1886 TEMP =SIMP(statut='f',typ='R'),
1887 TEMP_INF =SIMP(statut='f',typ='R'),
1888 TEMP_SUP =SIMP(statut='f',typ='R'), ),
1889 LIAISON_UNIF =FACT(statut='f',min=01,max='**',
1890 regles=(UN_PARMI('GROUP_NO','NOEUD','GROUP_MA','MAILLE'),),
1891 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1892 NOEUD =SIMP(statut='f',typ=no,max='**'),
1893 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1894 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1895 DDL =SIMP(statut='f',typ='TXM',max='**',defaut="TEMP",
1896 into=("TEMP","TEMP_INF","TEMP_SUP") ),
1898 LIAISON_CHAMNO =FACT(statut='f',min=01,max='**',
1899 CHAM_NO =SIMP(statut='o',typ=cham_no),# CO()# "il faut definir une structure de donnee generique chamno"
1900 COEF_IMPO =SIMP(statut='o',typ='R' ),
1901 NUME_LAGR =SIMP(statut='f',typ='TXM',defaut="NORMAL",into=("NORMAL","APRES") ),
1903 SOURCE =FACT(statut='f',min=01,max='**',
1904 regles=(UN_PARMI('SOUR','SOUR_CALCULEE',),
1905 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1906 PRESENT_ABSENT('SOUR_CALCULEE','TOUT','GROUP_MA','MAILLE'),),
1907 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1908 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1909 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1910 SOUR =SIMP(statut='f',typ='R'),
1911 SOUR_CALCULEE =SIMP(statut='f',typ=(cham_elem_sour_r) ),
1913 FLUX_REP =FACT(statut='f',min=01,max='**',
1914 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1915 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1916 PRESENT_PRESENT('CARA_TORSION','GROUP_MA'),
1917 AU_MOINS_UN('FLUN','FLUN_INF','FLUN_SUP','CARA_TORSION') ),
1918 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1919 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1920 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1921 FLUN =SIMP(statut='f',typ='R'),
1922 FLUN_INF =SIMP(statut='f',typ='R'),
1923 FLUN_SUP =SIMP(statut='f',typ='R'),
1924 CARA_TORSION =SIMP(statut='f',typ=tabl_aire_int ),
1926 ECHANGE =FACT(statut='f',min=01,max='**',
1927 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1928 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1929 AU_MOINS_UN('COEF_H','COEF_H_INF','COEF_H_SUP'),
1930 ENSEMBLE('COEF_H','TEMP_EXT',),
1931 ENSEMBLE('COEF_H_INF','TEMP_EXT_INF'),
1932 ENSEMBLE('COEF_H_SUP','TEMP_EXT_SUP'),),
1933 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1934 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1935 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1936 COEF_H =SIMP(statut='f',typ='R'),
1937 TEMP_EXT =SIMP(statut='f',typ='R'),
1938 COEF_H_INF =SIMP(statut='f',typ='R'),
1939 TEMP_EXT_INF =SIMP(statut='f',typ='R'),
1940 COEF_H_SUP =SIMP(statut='f',typ='R'),
1941 TEMP_EXT_SUP =SIMP(statut='f',typ='R'),
1943 ECHANGE_PAROI =FACT(statut='f',min=01,max='**',
1944 regles=(UN_PARMI('GROUP_MA_1','MAILLE_1'),
1945 UN_PARMI('GROUP_MA_2','MAILLE_2'),),
1946 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
1947 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),
1948 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
1949 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),
1950 COEF_H =SIMP(statut='f',typ='R'),
1951 TRAN =SIMP(statut='f',typ='R',min=2,max=3),
1952 ANGL_NAUT =SIMP(statut='f',typ='R',min=1,max=3),
1953 CENTRE =SIMP(statut='f',typ='R',min=2,max=3),
1955 GRAD_TEMP_INIT =FACT(statut='f',min=01,max='**',
1956 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
1957 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
1958 AU_MOINS_UN('FLUX_X','FLUX_Y','FLUX_Z'),),
1959 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1960 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
1961 MAILLE =SIMP(statut='f',typ=ma,max='**'),
1962 FLUX_X =SIMP(statut='f',typ='R' ),
1963 FLUX_Y =SIMP(statut='f',typ='R' ),
1964 FLUX_Z =SIMP(statut='f',typ='R' ),
1966 LIAISON_GROUP =FACT(statut='f',min=01,max='**',
1967 regles=(UN_PARMI('GROUP_MA_1','MAILLE_1','GROUP_NO_1','NOEUD_1'),
1968 UN_PARMI('GROUP_MA_2','MAILLE_2','GROUP_NO_2','NOEUD_2'),
1969 EXCLUS('GROUP_MA_1','GROUP_NO_2'),
1970 EXCLUS('GROUP_MA_1','NOEUD_2'),
1971 EXCLUS('GROUP_NO_1','GROUP_MA_2'),
1972 EXCLUS('GROUP_NO_1','MAILLE_2'),
1973 EXCLUS('MAILLE_1','GROUP_NO_2'),
1974 EXCLUS('MAILLE_1','NOEUD_2'),
1975 EXCLUS('NOEUD_1','GROUP_MA_2'),
1976 EXCLUS('NOEUD_1','MAILLE_2'),
1977 EXCLUS('SANS_NOEUD','SANS_GROUP_NO'),),
1978 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
1979 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),
1980 GROUP_NO_1 =SIMP(statut='f',typ=grno,max='**'),
1981 NOEUD_1 =SIMP(statut='f',typ=no,max='**'),
1982 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
1983 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),
1984 GROUP_NO_2 =SIMP(statut='f',typ=grno,max='**'),
1985 NOEUD_2 =SIMP(statut='f',typ=no,max='**'),
1986 SANS_NOEUD =SIMP(statut='f',typ=no,max='**'),
1987 SANS_GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
1988 DDL_1 =SIMP(statut='f',typ='TXM',max='**',defaut="TEMP",
1989 into=("TEMP","TEMP_INF","TEMP_SUP") ),
1990 COEF_MULT_1 =SIMP(statut='o',typ='R',max='**'),
1991 DDL_2 =SIMP(statut='f',typ='TXM',max='**',defaut="TEMP",
1992 into=("TEMP","TEMP_INF","TEMP_SUP",) ),
1993 COEF_MULT_2 =SIMP(statut='o',typ='R',max='**'),
1994 COEF_IMPO =SIMP(statut='o',typ='R' ),
1995 SOMMET =SIMP(statut='f',typ='TXM',into=("OUI",) ),
1996 TRAN =SIMP(statut='f',typ='R',max='**'),
1997 ANGL_NAUT =SIMP(statut='f',typ='R',max='**'),
1998 CENTRE =SIMP(statut='f',typ='R',max='**'),
2000 CONVECTION =FACT(statut='f',min=01,max='**',
2001 VITESSE =SIMP(statut='o',typ=(cham_no_depl_r) ),
2003 RAYONNEMENT =FACT(statut='f',min=01,max='**',
2004 fr="Attention, exprimer les températures en Celsius si rayonnement",
2005 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
2006 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
2007 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2008 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2009 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2010 SIGMA =SIMP(statut='o',typ='R'),
2011 EPSILON =SIMP(statut='o',typ='R'),
2012 TEMP_EXT =SIMP(statut='o',typ='R'),
2014 LIAISON_MAIL =FACT(statut='f',min=01,max='**',
2015 regles=(AU_MOINS_UN('GROUP_MA_MAIT','MAILLE_MAIT'),
2016 AU_MOINS_UN('GROUP_MA_ESCL','MAILLE_ESCL','GROUP_NO_ESCL',
2018 GROUP_MA_MAIT =SIMP(statut='f',typ=grma,max='**'),
2019 MAILLE_MAIT =SIMP(statut='f',typ=ma,max='**'),
2020 GROUP_MA_ESCL =SIMP(statut='f',typ=grma,max='**'),
2021 MAILLE_ESCL =SIMP(statut='f',typ=ma,max='**'),
2022 GROUP_NO_ESCL =SIMP(statut='f',typ=grno,max='**'),
2023 NOEUD_ESCL =SIMP(statut='f',typ=no,max='**'),
2024 TRAN =SIMP(statut='f',typ='R',max='**' ),
2025 ANGL_NAUT =SIMP(statut='f',typ='R',max='**' ),
2026 CENTRE =SIMP(statut='f',typ='R',max='**' ),
2028 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
2030 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
2031 # CONFIGURATION MANAGEMENT OF EDF VERSION
2032 # ======================================================================
2033 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2034 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2035 # REDISTRIBUTION OF THIS FILE.
2036 # ======================================================================
2037 AFFE_CHAR_THER_F=OPER(nom="AFFE_CHAR_THER_F",op=33,sd_prod=char_ther,
2038 fr="Affectation de charges et conditions aux limites thermiques fonction dune grandeur (temps, ...)",
2039 docu="U4.44.02-f",reentrant='n',
2040 regles=(AU_MOINS_UN('TEMP_IMPO','SOURCE','FLUX_REP','FLUX_NL','ECHANGE',
2041 'ECHANGE_PAROI','LIAISON_DDL','LIAISON_GROUP','LIAISON_UNIF',
2042 'GRAD_TEMP_INIT','RAYONNEMENT'),),
2043 MODELE =SIMP(statut='o',typ=(modele) ),
2044 VERI_DDL =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
2045 LIAISON_DDL =FACT(statut='f',min=1,max='**',
2046 regles=(UN_PARMI('GROUP_NO','NOEUD'),),
2047 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
2048 NOEUD =SIMP(statut='f',typ=no,max='**'),
2049 DDL =SIMP(statut='f',typ='TXM',max='**',into=("TEMP","TEMP_INF","TEMP_SUP") ),
2050 COEF_MULT =SIMP(statut='o',typ='R',max='**'),
2051 COEF_IMPO =SIMP(statut='o',typ=(fonction) ),
2053 TEMP_IMPO =FACT(statut='f',min=1,max='**',
2054 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE','GROUP_NO','NOEUD'),
2055 AU_MOINS_UN('TEMP_SUP','TEMP','TEMP_INF','EVOL_THER'),
2056 PRESENT_ABSENT('EVOL_THER','TEMP','TEMP_INF','TEMP_SUP'),),
2057 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2058 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2059 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2060 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
2061 NOEUD =SIMP(statut='f',typ=no,max='**'),
2062 EVOL_THER =SIMP(statut='f',typ=(evol_ther) ),
2063 DDL =SIMP(statut='f',typ='TXM',into=("TEMP",) ),
2064 TEMP =SIMP(statut='f',typ=(fonction) ),
2065 TEMP_INF =SIMP(statut='f',typ=(fonction) ),
2066 TEMP_SUP =SIMP(statut='f',typ=(fonction) ),
2068 LIAISON_UNIF =FACT(statut='f',min=1,max='**',
2069 regles=(UN_PARMI('GROUP_NO','NOEUD','GROUP_MA','MAILLE'),),
2070 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
2071 NOEUD =SIMP(statut='f',typ=no,max='**'),
2072 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2073 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2074 DDL =SIMP(statut='f',typ='TXM',max='**',defaut="TEMP",
2075 into=("TEMP","TEMP_INF","TEMP_SUP") ),
2077 SOURCE =FACT(statut='f',min=1,max='**',
2078 regles=(UN_PARMI('TOUT','GROUP_MA','MAILLE'),),
2079 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2080 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2081 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2082 SOUR =SIMP(statut='o',typ=(fonction) ),
2084 FLUX_REP =FACT(statut='f',min=1,max='**',
2085 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
2086 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
2087 AU_MOINS_UN('FLUN','FLUN_INF','FLUN_SUP','FLUX_X','FLUX_Y','FLUX_Z'),),
2088 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2089 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2090 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2091 FLUN =SIMP(statut='f',typ=(fonction) ),
2092 FLUN_INF =SIMP(statut='f',typ=(fonction) ),
2093 FLUN_SUP =SIMP(statut='f',typ=(fonction) ),
2094 FLUX_X =SIMP(statut='f',typ=(fonction) ),
2095 FLUX_Y =SIMP(statut='f',typ=(fonction) ),
2096 FLUX_Z =SIMP(statut='f',typ=(fonction) ),
2098 FLUX_NL =FACT(statut='f',min=1,max='**',
2099 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
2100 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
2101 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2102 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2103 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2104 FLUN =SIMP(statut='o',typ=(fonction) ),
2106 ECHANGE =FACT(statut='f',min=1,max='**',
2107 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
2108 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
2109 AU_MOINS_UN('COEF_H','COEF_H_INF','COEF_H_SUP'),
2110 ENSEMBLE('COEF_H','TEMP_EXT'),
2111 ENSEMBLE('COEF_H_INF','TEMP_EXT_INF'),
2112 ENSEMBLE('COEF_H_SUP','TEMP_EXT_SUP'),),
2113 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2114 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2115 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2116 COEF_H =SIMP(statut='f',typ=(fonction) ),
2117 TEMP_EXT =SIMP(statut='f',typ=(fonction) ),
2118 COEF_H_INF =SIMP(statut='f',typ=(fonction) ),
2119 TEMP_EXT_INF =SIMP(statut='f',typ=(fonction) ),
2120 COEF_H_SUP =SIMP(statut='f',typ=(fonction) ),
2121 TEMP_EXT_SUP =SIMP(statut='f',typ=(fonction) ),
2123 ECHANGE_PAROI =FACT(statut='f',min=1,max='**',
2124 regles=(UN_PARMI('GROUP_MA_1','MAILLE_1'),
2125 UN_PARMI('GROUP_MA_2','MAILLE_2'),),
2126 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
2127 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),
2128 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
2129 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),
2130 COEF_H =SIMP(statut='o',typ=(fonction) ),
2131 TRAN =SIMP(statut='f',typ='R',min=2,max=3),
2132 ANGL_NAUT =SIMP(statut='f',typ='R',min=1,max=3),
2133 CENTRE =SIMP(statut='f',typ='R',min=2,max=3),
2135 GRAD_TEMP_INIT =FACT(statut='f',min=1,max='**',
2136 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
2137 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
2138 AU_MOINS_UN('FLUX_X','FLUX_Y','FLUX_Z'),),
2139 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2140 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2141 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2142 FLUX_X =SIMP(statut='f',typ=(fonction) ),
2143 FLUX_Y =SIMP(statut='f',typ=(fonction) ),
2144 FLUX_Z =SIMP(statut='f',typ=(fonction) ),
2146 LIAISON_GROUP =FACT(statut='f',min=1,max='**',
2147 regles=(UN_PARMI('GROUP_MA_1','MAILLE_1','GROUP_NO_1','NOEUD_1'),
2148 UN_PARMI('GROUP_MA_2','MAILLE_2','GROUP_NO_2','NOEUD_2'),
2149 EXCLUS('GROUP_MA_1','GROUP_NO_2'),
2150 EXCLUS('GROUP_MA_1','NOEUD_2'),
2151 EXCLUS('GROUP_NO_1','GROUP_MA_2'),
2152 EXCLUS('GROUP_NO_1','MAILLE_2'),
2153 EXCLUS('MAILLE_1','GROUP_NO_2'),
2154 EXCLUS('MAILLE_1','NOEUD_2'),
2155 EXCLUS('NOEUD_1','GROUP_MA_2'),
2156 EXCLUS('NOEUD_1','MAILLE_2'),
2157 EXCLUS('SANS_NOEUD','SANS_GROUP_NO'),),
2158 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
2159 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),
2160 GROUP_NO_1 =SIMP(statut='f',typ=grno,max='**'),
2161 NOEUD_1 =SIMP(statut='f',typ=no,max='**'),
2162 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
2163 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),
2164 GROUP_NO_2 =SIMP(statut='f',typ=grno,max='**'),
2165 NOEUD_2 =SIMP(statut='f',typ=no,max='**'),
2166 SANS_NOEUD =SIMP(statut='f',typ=no,max='**'),
2167 SANS_GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
2168 DDL_1 =SIMP(statut='f',typ='TXM',max='**',defaut="TEMP",
2169 into=("TEMP","TEMP_INF","TEMP_SUP") ),
2170 COEF_MULT_1 =SIMP(statut='o',typ='R',max='**'),
2171 DDL_2 =SIMP(statut='f',typ='TXM',max='**',defaut="TEMP",
2172 into=("TEMP","TEMP_INF","TEMP_SUP") ),
2173 COEF_MULT_2 =SIMP(statut='o',typ='R',max='**'),
2174 COEF_IMPO =SIMP(statut='o',typ=(fonction) ),
2175 SOMMET =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2176 TRAN =SIMP(statut='f',typ='R',max='**'),
2177 ANGL_NAUT =SIMP(statut='f',typ='R',max='**'),
2178 CENTRE =SIMP(statut='f',typ='R',max='**'),
2180 CONVECTION =FACT(statut='f',min=1,max='**',
2181 VITESSE =SIMP(statut='o',typ=(cham_no_depl_r) ),
2183 RAYONNEMENT =FACT(statut='f',min=1,max='**',
2184 fr="Attention, exprimer les températures en Celsius si rayonnement",
2185 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),
2186 PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
2187 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2188 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2189 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2190 SIGMA =SIMP(statut='o',typ=(fonction) ),
2191 EPSILON =SIMP(statut='o',typ=(fonction) ),
2192 TEMP_EXT =SIMP(statut='o',typ=(fonction) ),
2194 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
2196 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
2197 # CONFIGURATION MANAGEMENT OF EDF VERSION
2198 # ======================================================================
2199 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2200 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2201 # REDISTRIBUTION OF THIS FILE.
2202 # ======================================================================
2203 # RESPONSABLE VABHHTS J.PELLET
2204 AFFE_MATERIAU=OPER(nom="AFFE_MATERIAU",op=6,sd_prod=cham_mater,
2205 fr="Affectation de caractéristiques de matériaux à un maillage",
2206 docu="U4.43.03-f",reentrant='n',
2207 MAILLAGE =SIMP(statut='o',typ=maillage),
2208 MODELE =SIMP(statut='f',typ=modele),
2209 AFFE =FACT(statut='o',min=01,max='**',
2210 regles=(UN_PARMI('TOUT','GROUP_MA','MAILLE','GROUP_NO','NOEUD'),),
2211 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2212 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2213 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2214 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
2215 NOEUD =SIMP(statut='f',typ=no,max='**'),
2216 MATER =SIMP(statut='o',typ=mater),
2217 TEMP_REF =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
2220 #& MODIF COMMANDE DATE 30/01/2002 AUTEUR VABHHTS J.TESELET
2221 # CONFIGURATION MANAGEMENT OF EDF VERSION
2222 # ======================================================================
2223 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2224 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2225 # REDISTRIBUTION OF THIS FILE.
2226 # ======================================================================
2227 # RESPONSABLE JMBHH01 J.M.PROIX
2228 AFFE_MODELE=OPER(nom="AFFE_MODELE",op=18,sd_prod=modele,docu="U4.41.01-f1",
2229 fr="Affectation des éléments finis sur le maillage",reentrant='n',
2230 regles=(AU_MOINS_UN('AFFE','AFFE_SOUS_STRUC'),),
2231 MAILLAGE =SIMP(statut='o',typ=(maillage) ),
2232 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
2233 VERIF =SIMP(statut='f',typ='TXM',max=2,into=("MAILLE","NOEUD") ),
2234 AFFE_SOUS_STRUC =FACT(statut='f',min=01,max=01,
2235 regles=(UN_PARMI('TOUT','MAILLE'),),
2236 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2237 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2238 PHENOMENE =SIMP(statut='f',typ='TXM',defaut="MECANIQUE",into=("MECANIQUE",) ),
2240 AFFE =FACT(statut='f',min=01,max='**',
2241 regles=(UN_PARMI('TOUT','GROUP_MA','GROUP_NO','MAILLE','NOEUD'),),
2242 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2243 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2244 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
2245 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2246 NOEUD =SIMP(statut='f',typ=no,max='**'),
2247 PHENOMENE =SIMP(statut='o',typ='TXM',
2248 into=("MECANIQUE","THERMIQUE","ACOUSTIQUE","NON_LOCAL") ),
2249 b_mecanique =BLOC( condition = "PHENOMENE=='MECANIQUE'",
2250 fr="modelisations mécaniques",
2251 MODELISATION =SIMP(statut='o',typ='TXM', into=(
2325 b_thermique =BLOC( condition = "PHENOMENE=='THERMIQUE'",
2326 fr="modelisations thermiques",
2327 MODELISATION =SIMP(statut='o',typ='TXM',into=(
2340 b_acoustique =BLOC( condition = "PHENOMENE=='ACOUSTIQUE'",
2341 fr="modelisations acoustiques",
2342 MODELISATION =SIMP(statut='o',typ='TXM',into=(
2347 b_non_local =BLOC( condition = "PHENOMENE=='NON_LOCAL'",
2348 fr="modelisations non locales",
2349 MODELISATION =SIMP(statut='o',typ='TXM',into=(
2357 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
2358 # CONFIGURATION MANAGEMENT OF EDF VERSION
2359 # ======================================================================
2360 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2361 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2362 # REDISTRIBUTION OF THIS FILE.
2363 # ======================================================================
2364 AIDE=PROC(nom="AIDE",op=42,docu="U4.02.01-f",
2365 fr="Interrogation sur le catalogue des commandes et les concepts produits",
2366 regles=(AU_MOINS_UN('COMMANDE','CONCEPT','TYPE_ELEM', ),),
2367 FICHIER =SIMP(statut='f',typ='TXM',defaut="RESULTAT"),
2368 TYPE_ELEM =FACT(fr="couple type_elem option",
2369 statut='f',min=01,max=01,
2370 INITEL =SIMP(statut='f',typ='TXM',defaut="NON",
2371 into=("OUI","NON",) ),
2373 COMMANDE =FACT(statut='f',min=01,max='**',
2374 NOM =SIMP(fr="liste des noms de commande",
2375 statut='f',typ='TXM',max='**',defaut="*"),
2376 OPTION =SIMP(fr="option d'édition de commande",
2377 statut='f',typ='TXM',defaut="CATALOGUE",
2378 into=("CATALOGUE","A_REMPLIR","NUMERO",) ),
2380 CONCEPT =FACT(statut='f',min=01,max='**',
2381 NOM =SIMP(fr="liste des noms de concept",
2382 statut='f',typ='TXM',max='**',defaut="*"),
2383 OPTION =SIMP(fr="option d'édition de concept",
2384 statut='f',typ='TXM',defaut="TOUT_TYPE",
2385 into=("TOUT_TYPE","CREER","A_CREER",) ),
2388 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
2389 # CONFIGURATION MANAGEMENT OF EDF VERSION
2390 # ======================================================================
2391 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2392 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2393 # REDISTRIBUTION OF THIS FILE.
2394 # ======================================================================
2395 # RESPONSABLE VABHHTS J.PELLET
2396 ASSE_MAILLAGE=OPER(nom="ASSE_MAILLAGE",op= 105,sd_prod=maillage,
2397 fr="Assembler deux maillages sous un seul nom",
2398 docu="U4.23.03-e",reentrant='n',
2399 MAILLAGE =SIMP(statut='o',typ=maillage,min=2,max=2 ),
2401 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
2402 # CONFIGURATION MANAGEMENT OF EDF VERSION
2403 # ======================================================================
2404 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2405 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2406 # REDISTRIBUTION OF THIS FILE.
2407 # ======================================================================
2408 ASSE_MATR_GENE=OPER(nom="ASSE_MATR_GENE",op= 128,sd_prod=matr_asse_gene_r,
2409 fr="Assemblage des matrices généralisées de macro éléments pour construction de la matrice globale généralisée",
2410 docu="U4.65.04-d",reentrant='n',
2411 NUME_DDL_GENE =SIMP(statut='o',typ=nume_ddl_gene ),
2412 OPTION =SIMP(statut='o',typ='TXM',into=("RIGI_GENE","MASS_GENE","AMOR_GENE") ),
2414 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
2415 # CONFIGURATION MANAGEMENT OF EDF VERSION
2416 # ======================================================================
2417 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2418 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2419 # REDISTRIBUTION OF THIS FILE.
2420 # ======================================================================
2421 # RESPONSABLE VABHHTS J.PELLET
2422 def asse_matrice_prod(MATR_ELEM,**args):
2423 if AsType(MATR_ELEM) == matr_elem_depl_r : return matr_asse_depl_r
2424 if AsType(MATR_ELEM) == matr_elem_depl_c : return matr_asse_depl_c
2425 if AsType(MATR_ELEM) == matr_elem_temp_r : return matr_asse_temp_r
2426 if AsType(MATR_ELEM) == matr_elem_pres_c : return matr_asse_pres_c
2427 raise AsException("type de concept resultat non prevu")
2429 ASSE_MATRICE=OPER(nom="ASSE_MATRICE",op=12,sd_prod=asse_matrice_prod,
2430 fr="Construction d une matrice assemblée",docu="U4.61.22-f",reentrant='n',
2431 MATR_ELEM =SIMP(statut='o',
2432 typ=(matr_elem_depl_r,matr_elem_depl_c,matr_elem_temp_r,matr_elem_pres_c) ),
2433 NUME_DDL =SIMP(statut='o',typ=nume_ddl),
2434 CHAR_CINE =SIMP(statut='f',typ=(char_cine_meca,char_cine_ther,char_cine_acou) ),
2435 INFO =SIMP(statut='f',typ='I',into=(1,2) ),
2437 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
2438 # CONFIGURATION MANAGEMENT OF EDF VERSION
2439 # ======================================================================
2440 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2441 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2442 # REDISTRIBUTION OF THIS FILE.
2443 # ======================================================================
2444 ASSE_VECT_GENE=OPER(nom="ASSE_VECT_GENE",op= 140,sd_prod=vect_asse_gene,
2445 fr="Assemblage de vecteurs de chargement en coordonnées généralisées",
2446 docu="U4.65.05-d",reentrant='n',
2447 NUME_DDL_GENE =SIMP(statut='o',typ=nume_ddl_gene ),
2448 CHAR_SOUS_STRUC =FACT(statut='o',min=01,max='**',
2449 SOUS_STRUC =SIMP(statut='o',typ='TXM' ),
2450 VECT_ASSE =SIMP(statut='o',typ=cham_no_depl_r ),
2453 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
2454 # CONFIGURATION MANAGEMENT OF EDF VERSION
2455 # ======================================================================
2456 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2457 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2458 # REDISTRIBUTION OF THIS FILE.
2459 # ======================================================================
2460 # RESPONSABLE VABHHTS J.PELLET
2461 def asse_vecteur_prod(VECT_ELEM,**args):
2462 if AsType(VECT_ELEM) == vect_elem_depl_r : return cham_no_depl_r
2463 if AsType(VECT_ELEM) == vect_elem_temp_r : return cham_no_temp_r
2464 if AsType(VECT_ELEM) == vect_elem_pres_r : return cham_no_pres_r
2465 if AsType(VECT_ELEM) == vect_elem_pres_c : return cham_no_pres_c
2466 raise AsException("type de concept resultat non prevu ")
2468 ASSE_VECTEUR=OPER(nom="ASSE_VECTEUR",op=13,sd_prod=asse_vecteur_prod,
2469 fr="Assemblage d un second membre",docu="U4.61.23-f",reentrant='n',
2470 VECT_ELEM =SIMP(statut='o',typ=vect_elem,max='**'),
2471 NUME_DDL =SIMP(statut='o',typ=nume_ddl ),
2472 INFO =SIMP(statut='f',typ='I',into=(1,2,) ),
2474 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
2475 # CONFIGURATION MANAGEMENT OF EDF VERSION
2476 # ======================================================================
2477 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2478 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2479 # REDISTRIBUTION OF THIS FILE.
2480 # ======================================================================
2481 CALC_AMOR_MODAL=OPER(nom="CALC_AMOR_MODAL",op= 172,sd_prod=listr8,
2482 fr="Création d'une liste d'amortissements modaux calculés selon la règle du RCC-G",
2483 docu="U4.52.13-c",reentrant='n',
2484 ENER_SOL =FACT(statut='o',min=01,max=01,
2485 regles=(UN_PARMI('GROUP_NO_RADIER','GROUP_MA_RADIER'),
2486 PRESENT_ABSENT('COEF_GROUP','FONC_GROUP'),
2487 # Peut-on remplacer les deux règles suivantes par un ENSEMBLE_('KRX','KRY','KRZ')
2488 PRESENT_PRESENT('KRX','KRY'),
2489 PRESENT_PRESENT('KRX','KRZ'),
2490 PRESENT_ABSENT('COOR_CENTRE','NOEUD_CENTRE'),
2491 PRESENT_ABSENT('GROUP_NO_CENTRE','NOEUD_CENTRE'),
2492 PRESENT_ABSENT('GROUP_NO_CENTRE','COOR_CENTRE'),),
2493 METHODE =SIMP(statut='f',typ='TXM',defaut="DEPL",into=("DEPL","RIGI_PARASOL") ),
2494 MODE_MECA =SIMP(statut='o',typ=mode_meca ),
2495 GROUP_NO_RADIER =SIMP(statut='f',typ=grno,max='**'),
2496 GROUP_MA_RADIER =SIMP(statut='f',typ=grma,max='**'),
2497 FONC_GROUP =SIMP(statut='f',typ=fonction ),
2498 COEF_GROUP =SIMP(statut='f',typ='R',max='**'),
2499 KX =SIMP(statut='o',typ='R' ),
2500 KY =SIMP(statut='o',typ='R' ),
2501 KZ =SIMP(statut='o',typ='R' ),
2502 KRX =SIMP(statut='f',typ='R' ),
2503 KRY =SIMP(statut='f',typ='R' ),
2504 KRZ =SIMP(statut='f',typ='R' ),
2505 GROUP_NO_CENTRE =SIMP(statut='f',typ=grno),
2506 NOEUD_CENTRE =SIMP(statut='f',typ=no),
2507 COOR_CENTRE =SIMP(statut='f',typ='R',max=03),
2509 AMOR_INTERNE =FACT(statut='o',min=01,max=01,
2510 ENER_POT =SIMP(statut='o',typ=tabl_ener_pot ),
2511 GROUP_MA =SIMP(statut='o',typ=grma,max='**'),
2512 AMOR_REDUIT =SIMP(statut='o',typ='R',max='**'),
2514 AMOR_SOL =FACT(statut='o',min=01,max=01,
2515 AMOR_REDUIT =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
2516 FONC_AMOR_GEO =SIMP(statut='o',typ=fonction,max='**' ),
2517 HOMOGENE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
2518 SEUIL =SIMP(statut='f',typ='R',defaut= 0.3 ),
2521 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
2522 # CONFIGURATION MANAGEMENT OF EDF VERSION
2523 # ======================================================================
2524 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2525 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2526 # REDISTRIBUTION OF THIS FILE.
2527 # ======================================================================
2528 # RESPONSABLE JMBHH01 J.M.PROIX
2529 def calc_cham_elem_prod(OPTION,**args):
2531 # options mecaniques
2532 if OPTION == "DEGE_ELNO_DEPL" : return cham_elem_epsi_r
2533 if OPTION == "ECIN_ELEM_DEPL" : return cham_elem_ener_r
2534 if OPTION == "EFGE_ELNO_CART" : return cham_elem_sief_r
2535 if OPTION == "EFGE_ELNO_DEPL" : return cham_elem_sief_r
2536 if OPTION == "ENDO_ELNO_SIGM" : return cham_elem_sief_r
2537 if OPTION == "EPOT_ELEM_DEPL" : return cham_elem_ener_r
2538 if OPTION == "ENEL_ELGA" : return cham_elem_ener_r
2539 if OPTION == "ENEL_ELNO_ELGA" : return cham_elem_ener_r
2540 if OPTION == "EPSI_ELNO_DEPL" : return cham_elem_epsi_r
2541 if OPTION == "EQUI_ELGA_EPSI" : return cham_elem_epsi_r
2542 if OPTION == "EQUI_ELGA_SIGM" : return cham_elem_sief_r
2543 if OPTION == "EQUI_ELNO_EPSI" : return cham_elem_epsi_r
2544 if OPTION == "EQUI_ELNO_SIGM" : return cham_elem_sief_r
2545 if OPTION == "PRES_DBEL_DEPL" : return cham_elem_dbel_r
2546 if OPTION == "SIEF_ELGA_DEPL" : return cham_elem_sief_r
2547 if OPTION == "SIEF_ELGA_LAGR" : return cham_elem_sief_r
2548 if OPTION == "SIGM_ELNO_CART" : return cham_elem_sief_r
2549 if OPTION == "SIGM_ELNO_DEPL" : return cham_elem_sief_r
2550 if OPTION == "SIGM_ELNO_LAGR" : return cham_elem_sief_r
2551 if OPTION == "SIPO_ELNO_DEPL" : return cham_elem_sief_r
2553 # options thermiques
2555 if OPTION == "FLUX_ELGA_TEMP" : return cham_elem_flux_r
2556 if OPTION == "FLUX_ELNO_TEMP" : return cham_elem_flux_r
2557 if OPTION == "SOUR_ELGA_ELEC" : return cham_elem_sour_r
2559 # options acoustiques
2561 if OPTION == "PRES_ELNO_DBEL" : return cham_elem_dbel_r
2562 if OPTION == "PRES_ELNO_REEL" : return cham_elem_pres_r
2563 if OPTION == "PRES_ELNO_IMAG" : return cham_elem_pres_r
2567 if OPTION == "COOR_ELGA" : return cham_elem_geom_r
2569 raise AsException("type de concept resultat non prevu")
2571 CALC_CHAM_ELEM=OPER(nom="CALC_CHAM_ELEM",op=38,sd_prod=calc_cham_elem_prod,
2572 fr="Calcul de champs par éléments à partir de champs solution ou de champs par éléments",
2573 docu="U4.81.03-f",reentrant='n',
2574 MODELE =SIMP(statut='o',typ=modele),
2575 CHAM_MATER =SIMP(statut='o',typ=cham_mater),
2576 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
2578 regles=(EXCLUS('TOUT','GROUP_MA',),EXCLUS('TOUT','MAILLE',),),
2579 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2580 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2581 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2585 # introduire un mot cle de type modelisation : mécanique,thermique,...
2588 OPTION =SIMP(statut='o',typ='TXM',
2589 into=("DEGE_ELNO_DEPL","ECIN_ELEM_DEPL","EFGE_ELNO_CART",
2590 "EFGE_ELNO_DEPL","ENDO_ELNO_SIGM","EPOT_ELEM_DEPL",
2591 "ENEL_ELGA", "ENEL_ELNO_ELGA","EPSI_ELNO_DEPL",
2592 "EQUI_ELGA_EPSI","EQUI_ELGA_SIGM","EQUI_ELNO_EPSI",
2593 "EQUI_ELNO_SIGM","PRES_DBEL_DEPL","SIEF_ELGA_DEPL",
2594 "SIEF_ELGA_LAGR","SIGM_ELNO_CART","SIGM_ELNO_DEPL",
2595 "SIGM_ELNO_LAGR","SIPO_ELNO_DEPL",
2596 "FLUX_ELGA_TEMP","FLUX_ELNO_TEMP","SOUR_ELGA_ELEC",
2597 "PRES_ELNO_DBEL","PRES_ELNO_REEL","PRES_ELNO_IMAG",
2600 b_dege_elno_depl =BLOC(condition="OPTION=='DEGE_ELNO_DEPL'",
2601 DEPL =SIMP(statut='o',typ=(cham_no_depl_r,)),
2602 PLAN =SIMP(statut='o',typ='TXM',defaut="MAIL", into=("SUP","INF","MOY","MAIL"), ),
2605 b_ecin_elem_depl =BLOC(condition="OPTION=='ECIN_ELEM_DEPL'",
2606 regles=(UN_PARMI('VITE','DEPL',),ENSEMBLE('DEPL','FREQ',),),
2607 FREQ =SIMP(statut='f',typ='R'),
2608 VITE =SIMP(statut='f',typ=cham_no_depl_r),
2609 DEPL =SIMP(statut='f',typ=(cham_no_depl_r,cham_no_depl_c)),
2612 b_efge_elno_cart =BLOC(condition="OPTION=='EFGE_ELNO_CART'",
2613 CHAM_ELEM =SIMP(statut='o',typ=(cham_elem_sief_r,) ),
2614 PLAN =SIMP(statut='o',typ='TXM',defaut="MAIL", into=("SUP","INF","MOY","MAIL"), ),
2617 b_efge_elno_depl =BLOC(condition="OPTION=='EFGE_ELNO_DEPL'",
2618 DEPL =SIMP(statut='o',typ=(cham_no_depl_r,)),
2619 PLAN =SIMP(statut='o',typ='TXM',defaut="MAIL", into=("SUP","INF","MOY","MAIL"), ),
2622 b_endo_elno_sigm =BLOC(condition="OPTION=='ENDO_ELNO_SIGM'",
2623 CHAM_ELEM =SIMP(statut='o',typ=(cham_elem_sief_r,) ),
2626 b_epot_elem_depl =BLOC(condition="OPTION=='EPOT_ELEM_DEPL'",
2627 DEPL =SIMP(statut='o',typ=(cham_no_depl_r,)),
2630 b_enel_elga =BLOC(condition="OPTION=='ENEL_ELGA'",
2631 CHAM_ELEM =SIMP(statut='o',typ=(cham_elem_sief_r,) ),
2634 b_enel_elno_elga =BLOC(condition="OPTION=='ENEL_ELNO_ELGA'",
2635 CHAM_ELEM =SIMP(statut='o',typ=(cham_elem_sief_r,) ),
2638 b_epsi_elno_depl =BLOC(condition="OPTION=='EPSI_ELNO_DEPL'",
2639 DEPL =SIMP(statut='o',typ=(cham_no_depl_r,)),
2642 b_equi_elga_epsi =BLOC(condition="OPTION=='EQUI_ELGA_EPSI'",
2643 CHAM_ELEM =SIMP(statut='o',typ=(cham_elem_epsi_r,) ),
2646 b_equi_elga_sigm =BLOC(condition="OPTION=='EQUI_ELGA_SIGM'",
2647 CHAM_ELEM =SIMP(statut='o',typ=(cham_elem_sief_r,) ),
2650 b_equi_elno_epsi =BLOC(condition="OPTION=='EQUI_ELNO_EPSI'",
2651 CHAM_ELEM =SIMP(statut='o',typ=(cham_elem_epsi_r,) ),
2654 b_equi_elno_sigm =BLOC(condition="OPTION=='EQUI_ELNO_SIGM'",
2655 CHAM_ELEM =SIMP(statut='o',typ=(cham_elem_sief_r,) ),
2658 b_pres_dbel_depl =BLOC(condition="OPTION=='PRES_DBEL_DEPL'",
2659 DEPL =SIMP(statut='o',typ=(cham_no_depl_c,)),
2662 b_sief_elga_depl =BLOC(condition="OPTION=='SIEF_ELGA_DEPL'",
2663 DEPL =SIMP(statut='o',typ=(cham_no_depl_r,)),
2666 b_sief_elga_lagr =BLOC(condition="OPTION=='SIEF_ELGA_LAGR'",
2667 DEPL =SIMP(statut='o',typ=(cham_no_depl_r,)),
2668 THETA =SIMP(statut='o',typ=(theta_geom,)),
2669 PROPAGATION =SIMP(statut='f',typ='R',defaut=0.E+0),
2672 b_sigm_elno_cart =BLOC(condition="OPTION=='SIGM_ELNO_CART'",
2673 CHAM_ELEM =SIMP(statut='o',typ=(cham_elem_sief_r,) ),
2676 b_sigm_elno_depl =BLOC(condition="OPTION=='SIGM_ELNO_DEPL'",
2677 DEPL =SIMP(statut='o',typ=(cham_no_depl_r,) ),
2680 b_sigm_elno_lagr =BLOC(condition="OPTION=='SIGM_ELNO_LAGR'",
2681 DEPL =SIMP(statut='o',typ=(cham_no_depl_r,)),
2682 THETA =SIMP(statut='o',typ=(theta_geom,)),
2683 PROPAGATION =SIMP(statut='f',typ='R',defaut=0.E+0),
2686 b_sipo_elno_depl =BLOC(condition="OPTION=='SIPO_ELNO_DEPL'",
2687 DEPL =SIMP(statut='o',typ=(cham_no_depl_r,)),
2690 b_thermique =BLOC(condition="OPTION in ('FLUX_ELNO_TEMP','FLUX_ELGA_TEMP','SOUR_ELGA_ELEC',)",
2691 TEMP =SIMP(statut='o',typ=(cham_no_temp_r,)),
2694 b_acoustique =BLOC(condition="OPTION in ('PRES_ELNO_DBEL','PRES_ELNO_REEL','PRES_ELNO_IMAG',)",
2695 PRES =SIMP(statut='o',typ=(cham_no_pres_c,)),
2700 EXCIT =FACT(statut='f',min=01,max='**',
2701 regles=(EXCLUS('FONC_MULT','COEF_MULT', ),),
2702 CHARGE =SIMP(statut='o',typ=(char_meca,char_ther,char_acou)),
2703 FONC_MULT =SIMP(statut='f',typ=fonction),
2704 COEF_MULT =SIMP(statut='f',typ='R'), ),
2706 INST =SIMP(statut='f',typ='R',defaut= 0.E+0),
2707 ACCE =SIMP(statut='f',typ=cham_no_depl_r),
2708 NUME_COUCHE =SIMP(statut='f',typ='I',defaut= 1),
2709 NIVE_COUCHE =SIMP(statut='f',typ='TXM',defaut="MOY",into=("SUP","INF","MOY") ),
2710 MODE_FOURIER =SIMP(statut='f',typ='I',defaut= 0 ),
2711 ANGLE =SIMP(statut='f',typ='I',defaut= 0),
2713 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
2714 # CONFIGURATION MANAGEMENT OF EDF VERSION
2715 # ======================================================================
2716 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2717 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2718 # REDISTRIBUTION OF THIS FILE.
2719 # ======================================================================
2720 # RESPONSABLE VABHHTS J.PELLET
2721 def calc_char_cine_prod(CHAR_CINE,**args):
2722 if AsType(CHAR_CINE) == char_cine_meca : return cham_no_depl_r
2723 if AsType(CHAR_CINE) == char_cine_ther : return cham_no_temp_r
2724 if AsType(CHAR_CINE) == char_cine_acou : return cham_no_pres_c
2725 raise AsException("type de concept resultat non prevu")
2727 CALC_CHAR_CINE=OPER(nom="CALC_CHAR_CINE",op= 102,sd_prod=calc_char_cine_prod,
2728 fr="Calcul des seconds membres associés à des charges cinématiques (conditions aux limites non dualisées)",
2729 docu="U4.61.03-e",reentrant='n',
2730 NUME_DDL =SIMP(statut='o',typ=nume_ddl ),
2731 CHAR_CINE =SIMP(statut='o',typ=(char_cine_meca,char_cine_ther,char_cine_acou ) ),
2732 INST =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
2733 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2 ) ),
2735 #& MODIF COMMANDE DATE 28/03/2001 AUTEUR CIBHHLV L.VIVAN
2736 # CONFIGURATION MANAGEMENT OF EDF VERSION
2737 # ======================================================================
2738 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2739 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2740 # REDISTRIBUTION OF THIS FILE.
2741 # ======================================================================
2742 def calc_char_seisme_prod(MATR_MASS,**args ):
2743 if AsType(MATR_MASS) == matr_asse_depl_r : return cham_no_depl_r
2744 raise AsException("type de concept resultat non prevu")
2746 CALC_CHAR_SEISME=OPER(nom="CALC_CHAR_SEISME",op= 92,sd_prod=calc_char_seisme_prod,
2747 docu="U4.63.01-e",reentrant='n',
2748 regles=(UN_PARMI('MONO_APPUI','MODE_STAT' ),),
2749 MATR_MASS =SIMP(statut='o',typ=matr_asse_depl_r,fr="Matrice de masse" ),
2750 DIRECTION =SIMP(statut='o',typ='R',max=06,fr="Directions du séisme imposé"),
2751 MONO_APPUI =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2752 MODE_STAT =SIMP(statut='f',typ=(mode_stat_depl,mode_stat_acce,mode_stat_forc,) ),
2753 b_mode_stat =BLOC ( condition = "MODE_STAT != None",
2754 regles=(UN_PARMI('NOEUD','GROUP_NO' ),),
2755 NOEUD =SIMP(statut='f',typ=no,max='**'),
2756 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
2758 TITRE =SIMP(statut='f',typ='TXM',max='**'),
2760 #& MODIF COMMANDE DATE 04/12/2001 AUTEUR GNICOLAS G.NICOLAS
2761 # CONFIGURATION MANAGEMENT OF EDF VERSION
2762 # ======================================================================
2763 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2764 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2765 # REDISTRIBUTION OF THIS FILE.
2766 # ======================================================================
2767 # RESPONSABLE JMBHH01 J.M.PROIX
2768 def calc_elem_prod(RESULTAT,**args):
2769 if AsType(RESULTAT) != None : return AsType(RESULTAT)
2770 raise AsException("type de concept resultat non prevu")
2772 CALC_ELEM=OPER(nom="CALC_ELEM",op=58,sd_prod=calc_elem_prod,docu="U4.81.01-f1",reentrant='f',
2773 fr="Compléter un résultat en calculant des champs par éléments (contraintes, déformations,... )",
2774 MODELE =SIMP(statut='o',typ=modele),
2775 CHAM_MATER =SIMP(statut='o',typ=cham_mater),
2776 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
2778 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2779 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
2780 MAILLE =SIMP(statut='f',typ=ma,max='**'),
2782 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','FREQ','NUME_MODE',
2783 'NOEUD_CMP','LIST_INST','LIST_FREQ','LIST_ORDRE','NOM_CAS'),),
2784 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
2785 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
2786 NUME_MODE =SIMP(statut='f',typ='I',max='**'),
2787 NOEUD_CMP =SIMP(statut='f',typ='TXM',max='**'),
2788 NOM_CAS =SIMP(statut='f',typ='TXM' ),
2790 INST =SIMP(statut='f',typ='R',max='**'),
2791 FREQ =SIMP(statut='f',typ='R',max='**'),
2792 LIST_INST =SIMP(statut='f',typ=listr8),
2793 LIST_FREQ =SIMP(statut='f',typ=listr8),
2794 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3 ),
2795 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU",) ),
2797 LIST_ORDRE =SIMP(statut='f',typ=listis),
2799 OPTION =SIMP(statut='o',typ='TXM',max='**',
2800 into=("EFGE_ELNO_DEPL","EPOT_ELEM_DEPL","SIGM_ELNO_DEPL","SIEF_ELGA_DEPL",
2801 "SIGM_ELNO_TUYO","SIGM_ELNO_CART","DEGE_ELNO_DEPL","EFGE_ELNO_CART",
2802 "EPSI_ELNO_DEPL","EPSI_ELGA_DEPL","EPSG_ELNO_DEPL","EPSG_ELGA_DEPL",
2803 "EPME_ELNO_DEPL","EPME_ELGA_DEPL","EPMG_ELNO_DEPL","EPMG_ELGA_DEPL",
2804 "EPSP_ELNO","EPSP_ELGA","ECIN_ELEM_DEPL","SIPO_ELNO_DEPL",
2805 "EPGR_ELNO","EPGR_ELGA","DURT_ELGA_META","DURT_ELNO_META",
2806 "SIGM_ELNO_COQU","SIGM_ELNO_SIEF","SIPO_ELNO_SIEF",
2807 "SIGM_NOZ1_ELGA","ERRE_ELEM_NOZ1","SIGM_NOZ2_ELGA","ERRE_ELEM_NOZ2",
2808 "VNOR_ELEM_DEPL","SIRE_ELNO_DEPL","ERRE_ELGA_NORE","ERRE_ELNO_ELGA",
2809 "VARI_ELNO_ELGA","VARI_ELNO_TUYO","EQUI_ELNO_SIGM","EQUI_ELGA_SIGM",
2810 "EQUI_ELNO_EPSI","EQUI_ELGA_EPSI","EQUI_ELNO_EPME","EQUI_ELGA_EPME",
2811 "DCHA_ELNO_SIGM","DCHA_ELGA_SIGM","RADI_ELNO_SIGM","RADI_ELGA_SIGM",
2812 "ENDO_ELNO_SIGA","ENDO_ELNO_SINO","ENEL_ELGA","ENEL_ELNO_ELGA","SIEF_ELNO_ELGA",
2813 "DEUL_ELGA_TEMP","DETE_ELNO_DLTE","DEUL_ELGA_DEPL","DEDE_ELNO_DLDE",
2814 "DESI_ELNO_DLSI","PMPB_ELNO_SIEF","PMPB_ELGA_SIEF",
2815 "FLUX_ELGA_TEMP","FLUX_ELNO_TEMP","HYDR_ELNO_ELGA",
2817 "PRES_ELNO_DBEL","PRES_DBEL_DEPL","PRES_ELNO_REEL","PRES_ELNO_IMAG",
2818 "INTE_ELNO_ACTI","INTE_ELNO_REAC","ERTH_ELEM_TEMP","ERTH_ELNO_ELEM"
2820 RESULTAT =SIMP(statut='o',typ=(evol_elas,dyna_trans,dyna_harmo,mode_meca,
2821 mode_stat,mode_stat_depl,mode_stat_acce,mode_stat_forc,
2822 evol_noli,mult_elas,fourier_elas,
2823 evol_ther,base_modale,
2824 acou_harmo,mode_acou,mode_flamb) ),
2825 EXCIT =FACT(statut='f',min=1,max='**',
2826 regles=(EXCLUS('FONC_MULT','FONC_MULT_C','COEF_MULT','COEF_MULT_C'),),
2827 CHARGE =SIMP(statut='o',typ=(char_meca,char_ther,char_acou) ),
2828 FONC_MULT =SIMP(statut='f',typ=fonction),
2829 FONC_MULT_C =SIMP(statut='f',typ=fonction_c),
2830 COEF_MULT =SIMP(statut='f',typ='R'),
2831 COEF_MULT_C =SIMP(statut='f',typ='C'),
2832 PHAS_DEG =SIMP(statut='f',typ='R'),
2833 PUIS_PULS =SIMP(statut='f',typ='I'),
2834 TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FIXE",into=("FIXE",) ),
2836 NORME =SIMP(statut='f',typ='TXM',defaut="VMIS",
2837 into=("VMIS","TOTAL","VMIS_CINE","TOTAL_CINE") ),
2838 NUME_COUCHE =SIMP(statut='f',typ='I',defaut= 1 ),
2839 NIVE_COUCHE =SIMP(statut='f',typ='TXM',defaut="MOY",into=("SUP","INF","MOY") ),
2841 ANGLE =SIMP(statut='f',typ='I',defaut= 0 ),
2842 PLAN =SIMP(statut='f',typ='TXM',defaut="MAIL",into=("SUP","INF","MOY","MAIL") ),
2843 SENSIBILITE =SIMP(statut='f',typ=(para_sensi,theta_geom),max='**',
2844 fr="Liste des paramètres de sensibilité.",
2845 ang="List of sensitivity parameters"),
2846 TAILLE_BLOC =SIMP(statut='f',typ='R',defaut= 400.),
2848 TEMP_INIT =FACT(statut='f',min=1,max='**',
2849 regles=(EXCLUS('META_INIT','EVOL_THER'),),
2850 META_INIT =SIMP(statut='f',typ=carte_meta_r),
2851 EVOL_THER =SIMP(statut='f',typ=evol_ther,),
2852 NUME_INIT =SIMP(statut='f',typ='I'),
2854 PARM_THETA =SIMP(statut='f',typ='R',defaut= 0.57,),
2855 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
2856 TITRE =SIMP(statut='f',typ='TXM',max='**'),
2858 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
2859 # CONFIGURATION MANAGEMENT OF EDF VERSION
2860 # ======================================================================
2861 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2862 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2863 # REDISTRIBUTION OF THIS FILE.
2864 # ======================================================================
2865 CALC_FATIGUE=OPER(nom="CALC_FATIGUE",op= 151,sd_prod=cham_elem_dommag,reentrant='n',
2866 fr="Calcul d un champ de dommage subi par une structure",
2868 regles=(PRESENT_PRESENT('DOMMAGE','MATER', ),),
2869 OPTION =SIMP(statut='o',typ='TXM',
2870 into=("DOMA_ELNO_SIGM","DOMA_ELGA_SIGM",
2871 "DOMA_ELNO_EPSI","DOMA_ELGA_EPSI",
2872 "DOMA_ELNO_EPME","DOMA_ELGA_EPME") ),
2873 HISTOIRE =FACT(statut='o',min=01,max=01,
2874 RESULTAT =SIMP(statut='o',typ=(evol_elas,dyna_trans,evol_noli) ),
2875 EQUI_GD =SIMP(statut='f',typ='TXM',defaut="VMIS_SG",into=("VMIS_SG","INVA_2_SG") ),
2877 DOMMAGE =SIMP(statut='o',typ='TXM',
2878 into=("WOHLER","MANSON_COFFIN","TAHERI_MANSON","TAHERI_MIXTE",) ),
2879 MATER =SIMP(statut='o',typ=(mater) ),
2880 TAHERI_NAPPE =SIMP(statut='f',typ=(fonction) ),
2881 TAHERI_FONC =SIMP(statut='f',typ=(fonction) ),
2882 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
2884 #& MODIF COMMANDE DATE 23/04/2001 AUTEUR MCOURTOI M.COURTOIS
2885 # CONFIGURATION MANAGEMENT OF EDF VERSION
2886 # ======================================================================
2887 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2888 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2889 # REDISTRIBUTION OF THIS FILE.
2890 # ======================================================================
2891 CALC_FLUI_STRU=OPER(nom="CALC_FLUI_STRU",op= 144,sd_prod=melasflu,
2892 docu="U4.66.02-d",reentrant='n',
2893 VITE_FLUI =FACT(statut='o',min=01,max=01,
2894 fr="Définir la plage de vitesse fluide étudiée",
2895 VITE_MIN =SIMP(statut='o',typ='R' ),
2896 VITE_MAX =SIMP(statut='o',typ='R' ),
2897 NB_POIN =SIMP(statut='o',typ='I' ),
2899 BASE_MODALE =FACT(statut='o',min=01,max=01,
2901 regles=(UN_PARMI('AMOR_REDUIT','AMOR_UNIF'),),
2902 MODE_MECA =SIMP(statut='o',typ=mode_meca ),
2903 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
2904 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**'),
2905 AMOR_UNIF =SIMP(statut='f',typ='R' ),
2907 TYPE_FLUI_STRU =SIMP(statut='o',typ=type_flui_stru ),
2908 IMPRESSION =FACT(statut='f',min=01,max=01,
2909 fr="Choix des informations à imprimer dans le fichier RESULTAT",
2910 PARA_COUPLAGE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
2911 DEFORMEE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
2914 #& MODIF COMMANDE DATE 03/10/2001 AUTEUR DURAND C.DURAND
2915 # CONFIGURATION MANAGEMENT OF EDF VERSION
2916 # ======================================================================
2917 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2918 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2919 # REDISTRIBUTION OF THIS FILE.
2920 # ======================================================================
2921 CALC_FONC_INTERP=OPER(nom="CALC_FONC_INTERP",op= 134,sd_prod=fonction,
2922 docu="U4.32.01-d1",reentrant='f',
2923 regles=(UN_PARMI('VALE_R','LIST_PARA'),),
2924 FONCTION =SIMP(statut='o',typ=fonction ),
2925 NOM_RESU =SIMP(statut='f',typ='TXM',defaut="TOUTRESU"),
2926 VALE_R =SIMP(statut='f',typ='R',max='**'),
2927 LIST_PARA =SIMP(statut='f',typ=listr8 ),
2928 INTERPOL =SIMP(statut='f',typ='TXM',max=2,defaut="LIN",into=("NON","LIN","LOG","INT") ),
2929 PROL_DROITE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("EXCLU","CONSTANT","LINEAIRE","INTERPRE") ),
2930 PROL_GAUCHE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("EXCLU","CONSTANT","LINEAIRE","INTERPRE") ),
2931 TITRE =SIMP(statut='f',typ='TXM',max='**'),
2932 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2 ) ),
2934 #& MODIF COMMANDE DATE 03/10/2001 AUTEUR DURAND C.DURAND
2935 # CONFIGURATION MANAGEMENT OF EDF VERSION
2936 # ======================================================================
2937 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
2938 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
2939 # REDISTRIBUTION OF THIS FILE.
2940 # ======================================================================
2941 # RESPONSABLE MCOURTOI M.COURTOIS
2942 def calc_fonction_prod(DERIVE,EXTRACTION,INTEGRE,RMS,NOCI_SEISME,MAX,COMB,COMB_C,ENVELOPPE,SPEC_OSCI,ASSE,FFT,COMPOSE,**args):
2943 if (RMS != None) : return tabl_fonc_rms
2944 if (MAX != None) : return tabl_fonc_max
2945 if (NOCI_SEISME != None): return tabl_fonc_noci
2946 if (INTEGRE != None) : return fonction
2947 if (DERIVE != None) : return fonction
2948 if (COMB != None) : return fonction
2949 if (ENVELOPPE != None) : return fonction
2950 if (EXTRACTION != None) : return fonction
2951 if (SPEC_OSCI != None) : return fonction
2952 if (COMB_C != None) : return fonction_c
2953 if (COMPOSE != None) : return fonction
2954 if (ASSE != None) : return fonction
2956 vale=FFT.get_child('FONCTION').get_valeur()
2957 if (AsType(vale) == fonction ) : return fonction_c
2958 if (AsType(vale) == fonction_c) : return fonction
2959 raise AsException("type de concept resultat non prevu")
2961 CALC_FONCTION=OPER(nom="CALC_FONCTION",op= 91,sd_prod=calc_fonction_prod
2962 ,fr="Opérations mathématiques sur des concepts de type fonction",
2963 docu="U4.32.04-e1",reentrant='n',
2964 regles=(UN_PARMI('DERIVE','INTEGRE','SPEC_OSCI','MAX','COMB','COMB_C','ENVELOPPE','RMS',
2965 'NOCI_SEISME','COMPOSE','EXTRACTION','ASSE','FFT' ),),
2966 FFT =FACT(statut='f',min=1,max=1,fr="Calcul de la transformee de Fourier ou de son inverse",
2967 FONCTION =SIMP(statut='o',typ=(fonction,fonction_c) )
2969 DERIVE =FACT(statut='f',min=1,max=1,fr="Calcul de la dérivée d une fonction",
2970 METHODE =SIMP(statut='f',typ='TXM',defaut="DIFF_CENTREE",into=("DIFF_CENTREE",) ),
2971 FONCTION =SIMP(statut='o',typ=fonction ),
2973 INTEGRE =FACT(statut='f',min=1,max=1,fr="Calcul de l intégrale d une fonction",
2974 METHODE =SIMP(statut='f',typ='TXM',defaut="TRAPEZE",into=("SIMPSON","TRAPEZE") ),
2975 FONCTION =SIMP(statut='o',typ=fonction),
2976 COEF =SIMP(statut='f',typ='R',defaut= 0.E+0,fr="Valeur de la constante d intégration" ),
2978 RMS =FACT(statut='f',min=1,max=1,fr="Calcul de la valeur RMS d une fonction",
2979 METHODE =SIMP(statut='f',typ='TXM',defaut="TRAPEZE",into=("SIMPSON","TRAPEZE") ),
2980 FONCTION =SIMP(statut='o',typ=fonction ),
2981 INST_INIT =SIMP(statut='f',typ='R',fr="Instant initial définissant le début du signal" ),
2982 INST_FIN =SIMP(statut='f',typ='R',fr="Instant final définissant la fin du signal" ),
2983 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
2984 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
2986 NOCI_SEISME =FACT(statut='f',min=1,max=1,
2987 FONCTION =SIMP(statut='f',typ=fonction ),
2988 SPEC_OSCI =SIMP(statut='f',typ=fonction ),
2989 OPTION =SIMP(statut='f',typ='TXM',defaut="TOUT",max='**',
2990 into=("INTE_ARIAS","POUV_DEST","INTE_SPEC","VITE_ABSO_CUMU",
2991 "DUREE_PHAS_FORT","MAXI","ACCE_SUR_VITE","TOUT",) ),
2992 INST_INIT =SIMP(statut='f',typ='R'),
2993 INST_FIN =SIMP(statut='f',typ='R'),
2994 NATURE =SIMP(statut='f',typ='TXM',into=("DEPL","VITE","ACCE") ),
2995 COEF =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
2996 PESANTEUR =SIMP(statut='f',typ='R',defaut= 9.81E+0 ),
2997 FREQ_INIT =SIMP(statut='f',typ='R',defaut= 4.E-1 ),
2998 FREQ_FIN =SIMP(statut='f',typ='R',defaut= 10.E+0 ),
2999 AMOR_REDUIT =SIMP(statut='f',typ='R'),
3000 LIST_FREQ =SIMP(statut='f',typ=listr8 ),
3001 FREQ =SIMP(statut='f',typ='R',max='**'),
3002 NORME =SIMP(statut='f',typ='R',defaut= 1.E+0 ),
3003 BORNE_INF =SIMP(statut='f',typ='R',defaut= 0.05E+0 ),
3004 BORNE_SUP =SIMP(statut='f',typ='R',defaut= 0.95E+0 ),
3005 b_acce_reel =BLOC(condition="(INST_INIT != None)or(INST_FIN != None)or(FREQ_INIT != None)or(FREQ_FIN != None)",
3006 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3),
3007 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
3010 SPEC_OSCI =FACT(statut='f',min=1,max=1,fr="Calcul du spectre d oscillateur",
3011 METHODE =SIMP(statut='f',typ='TXM',defaut="NIGAM",into=("NIGAM",) ),
3012 FONCTION =SIMP(statut='o',typ=fonction ),
3013 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**'),
3014 LIST_FREQ =SIMP(statut='f',typ=listr8 ),
3015 FREQ =SIMP(statut='f',typ='R',max='**'),
3016 NORME =SIMP(statut='f',typ='R',defaut= 9.81E+0,fr="Valeur de la norme du spectre d oscillateur" ),
3017 NATURE =SIMP(statut='f',typ='TXM',defaut="ACCE",into=("DEPL","VITE","ACCE") ),
3018 NATURE_FONC =SIMP(statut='f',typ='TXM',defaut="ACCE",into=("DEPL","VITE","ACCE") ),
3020 MAX =FACT(statut='f',min=1,max=1,fr="Calcul des extrémas locaux d une fonction",
3021 FONCTION =SIMP(statut='o',typ=fonction ),
3023 COMB =FACT(statut='f',min=1,max='**',fr="Calcul d une combinaison linéaire réelle de fonctions",
3024 FONCTION =SIMP(statut='o',typ=fonction ),
3025 COEF =SIMP(statut='o',typ='R',fr="Coefficient réel de la combinaison linéaire associée à la fonction" ),
3027 COMB_C =FACT(statut='f',min=1,max='**',fr="Calcul d une combinaison linéaire complexe de fonctions",
3028 regles=(UN_PARMI('COEF_R','COEF_C'),),
3029 FONCTION =SIMP(statut='o',typ=(fonction, fonction_c) ),
3030 COEF_R =SIMP(statut='f',typ='R',fr="Coefficient réel de la combinaison linéaire associée à la fonction" ),
3031 COEF_C =SIMP(statut='f',typ='C',fr="Coefficient complexe de la combinaison linéaire associée à la fonction" ),
3033 b_comb =BLOC ( condition = " (COMB != None) or (COMB_C != None)",
3034 LIST_PARA =SIMP(statut='f',typ=listr8 ),
3036 COMPOSE =FACT(statut='f',min=1,max=1,fr="Calcul de la composition de deux fonctions FONC_RESU(FONC_PARA)",
3037 FONC_RESU =SIMP(statut='o',typ=fonction),
3038 FONC_PARA =SIMP(statut='o',typ=fonction),
3040 EXTRACTION =FACT(statut='f',min=1,max=1,fr="Opération d extraction sur une fonction complexe",
3041 FONCTION =SIMP(statut='o',typ=fonction_c),
3042 PARTIE =SIMP(statut='o',typ='TXM',into=("REEL","IMAG","MODULE","PHASE"),fr="Partie à extraire"),
3044 ENVELOPPE =FACT(statut='f',min=1,max=1,fr="Calcul de l enveloppe d une famille de fonctions",
3045 FONCTION =SIMP(statut='o',typ=fonction,max='**' ),
3046 CRITERE =SIMP(statut='f',typ='TXM',defaut="SUP",into=("SUP","INF"),fr="Type de l enveloppe" ),
3048 ASSE =FACT(statut='f',min=1,max=1,fr="Création à partir de la concatenation de fonctions",
3049 FONCTION =SIMP(statut='o',typ=fonction,max='**' ),
3050 SURCHARGE =SIMP(statut='f',typ='TXM',defaut="DROITE",into=("DROITE","GAUCHE")),
3052 NOM_PARA =SIMP(statut='f',typ='TXM',into=("DX","DY","DZ","DRX","DRY","DRZ","TEMP",
3053 "INST","X","Y","Z","EPSI","FREQ","PULS",
3055 NOM_RESU =SIMP(statut='f',typ='TXM' ),
3056 INTERPOL =SIMP(statut='f',typ='TXM',max=2,into=("NON","LIN","LOG") ),
3057 PROL_DROITE =SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
3058 PROL_GAUCHE =SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
3059 NOM_PARA_FONC =SIMP(statut='f',typ='TXM',into=("DX","DY","DZ","DRX","DRY","DRZ","TEMP",
3060 "INST","X","Y","Z","EPSI","FREQ","PULS",
3062 INTERPOL_FONC =SIMP(statut='f',typ='TXM',max=2,into=("NON","LIN","LOG") ),
3063 PROL_DROITE_FONC=SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
3064 PROL_GAUCHE_FONC=SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
3065 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2 ) ),
3066 TITRE =SIMP(statut='f',typ='TXM',max='**'),
3068 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
3069 # CONFIGURATION MANAGEMENT OF EDF VERSION
3070 # ======================================================================
3071 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3072 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3073 # REDISTRIBUTION OF THIS FILE.
3074 # ======================================================================
3075 CALC_FORC_AJOU=OPER(nom="CALC_FORC_AJOU",op=199,sd_prod=vect_asse_gene,
3076 fr="calcul de la force ajoutee ",
3077 docu="U4.66.03-a",reentrant ='n',
3079 regles=(EXCLUS('MODE_MECA','MODELE_GENE'),
3080 PRESENT_PRESENT( 'MODELE_GENE','NUME_DDL_GENE'),
3081 UN_PARMI('MONO_APPUI', 'NOEUD','GROUP_NO'),
3082 UN_PARMI('MONO_APPUI','MODE_STAT')),
3084 MODELE_FLUIDE =SIMP(statut='o',typ=modele ),
3085 MODELE_INTERFACE=SIMP(statut='o',typ=modele ),
3086 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
3087 CHARGE =SIMP(statut='o',typ=char_ther ),
3088 MODE_MECA =SIMP(statut='f',typ=mode_meca ),
3089 MODELE_GENE =SIMP(statut='f',typ=modele_gene ),
3090 NUME_DDL_GENE =SIMP(statut='f',typ=nume_ddl_gene ),
3091 DIST_REFE =SIMP(statut='f',typ='R',defaut= 1.E-2 ),
3092 AVEC_MODE_STAT =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
3093 NUME_MODE_MECA =SIMP(statut='f',typ='I',max='**'),
3094 POTENTIEL =SIMP(statut='f',typ=evol_ther ),
3095 NOEUD_DOUBLE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
3097 DIRECTION =SIMP(statut='o',typ='R',max=3),
3098 MONO_APPUI =SIMP(statut='f',typ='TXM',into=("OUI",),),
3099 NOEUD =SIMP(statut='f',typ=no,max='**'),
3100 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
3101 MODE_STAT =SIMP(statut='f',typ=(mode_stat_depl,mode_stat_acce,mode_stat_forc,),),
3103 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2 ) ),
3105 SOLVEUR =FACT(statut='d',min=1,max=1,
3106 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
3107 b_mult_front = BLOC ( condition = "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
3108 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
3110 b_ldlt =BLOC( condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
3111 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
3113 b_ldlt_mult =BLOC( condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
3114 fr="Paramètres relatifs à la non iversibilité de la matrice à factorise",
3115 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
3116 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
3118 b_gcpc =BLOC (condition = "METHODE == 'GCPC' ", fr="Paramètres de la méthode du gradient conjugué",
3119 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
3120 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut=0),
3121 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
3122 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
3123 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
3126 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0), ),
3129 #& MODIF COMMANDE DATE 12/09/2001 AUTEUR MCOURTOI M.COURTOIS
3130 # CONFIGURATION MANAGEMENT OF EDF VERSION
3131 # ======================================================================
3132 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3133 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3134 # REDISTRIBUTION OF THIS FILE.
3135 # ======================================================================
3136 CALC_G_LOCAL_T=OPER(nom="CALC_G_LOCAL_T",op=77,sd_prod=tabl_calc_g_loca,
3137 fr="Calcul du taux de restitution local d énergie",docu="U4.82.04-e1",reentrant='n',
3138 MODELE =SIMP(statut='o',typ=modele),
3139 CHAM_MATER =SIMP(statut='o',typ=cham_mater),
3140 FOND =SIMP(statut='o',typ=fond_fiss),
3141 regles=(UN_PARMI('RESULTAT','DEPL'),
3142 UN_PARMI('R_INF','R_INF_FO'),
3143 PRESENT_PRESENT('R_INF','R_SUP'),
3144 PRESENT_PRESENT('R_INF_FO','R_SUP_FO'), ),
3146 DEPL =SIMP(statut='f',typ=cham_no_depl_r),
3147 RESULTAT =SIMP(statut='f',typ=(evol_elas,evol_noli),),
3148 b_extrac =BLOC(condition="RESULTAT != None",fr="extraction d un champ",
3149 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','LIST_ORDRE','INST','LIST_INST'),),
3150 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3151 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
3152 LIST_ORDRE =SIMP(statut='f',typ=listis),
3153 INST =SIMP(statut='f',typ='R',max='**'),
3154 LIST_INST =SIMP(statut='f',typ=listr8),
3156 b_acce_reel =BLOC(condition="(INST != None)or(LIST_INST != None)",
3157 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-6),
3158 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
3162 CHARGE =SIMP(statut='f',typ=char_meca,max='**'),
3163 SYME_CHAR =SIMP(statut='f',typ='TXM',defaut="SANS",into=("SYME","ANTI","SANS") ),
3165 COMP_ELAS =FACT(statut='f',min=01,max=01,
3166 RELATION =SIMP(statut='f',typ='TXM',defaut="ELAS",
3167 into=("ELAS","ELAS_VMIS_LINE","ELAS_VMIS_TRAC") ),
3168 ELAS =SIMP(statut='f',typ='I',defaut=1,into=(1,) ),
3169 ELAS_VMIS_LINE =SIMP(statut='f',typ='I',defaut=1,into=(1,) ),
3170 ELAS_VMIS_TRAC =SIMP(statut='f',typ='I',defaut=1,into=(1,) ),
3171 DEFORMATION =SIMP(statut='f',typ='TXM',defaut="PETIT",into=("PETIT","GREEN") ),
3172 regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
3173 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3174 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
3175 MAILLE =SIMP(statut='f',typ=ma,max='**'),
3178 COMP_INCR =FACT(statut='f',min=01,max=01,
3179 RELATION =SIMP(statut='f',typ='TXM',defaut="ELAS",
3180 into=("ELAS","VMIS_ISOT_TRAC","VMIS_ISOT_LINE","VMIS_CINE_LINE") ),
3181 ELAS =SIMP(statut='f',typ='I',defaut=1,into=(1,) ),
3182 VMIS_ISOT_TRAC =SIMP(statut='f',typ='I',defaut=2,into=(2,) ),
3183 VMIS_ISOT_LINE =SIMP(statut='f',typ='I',defaut=2,into=(2,) ),
3184 VMIS_CINE_LINE =SIMP(statut='f',typ='I',defaut=7,into=(7,) ),
3185 DEFORMATION =SIMP(statut='f',typ='TXM',defaut="PETIT",into=("PETIT","PETIT_REAC") ),
3186 regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
3187 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3188 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
3189 MAILLE =SIMP(statut='f',typ=ma,max='**'),
3192 ETAT_INIT =FACT(statut='f',min=01,max=01,
3193 SIGM =SIMP(statut='f',typ=cham_elem_sief_r),
3194 DEPL =SIMP(statut='f',typ=cham_no_depl_r),
3197 OPTION =SIMP(statut='f',typ='TXM',defaut="CALC_G",
3198 into=("CALC_G","CALC_G_LGLO","G_BILINEAIRE","CALC_G_MAX") ),
3199 b_g =BLOC(condition="OPTION=='CALC_G'",
3200 LISSAGE_THETA =SIMP(statut='f',typ='TXM',defaut="LEGENDRE",into=("LEGENDRE","LAGRANGE") ),
3201 LISSAGE_G =SIMP(statut='f',typ='TXM',defaut="LEGENDRE",into=("LEGENDRE","LAGRANGE","LAGRANGE_NO_NO",) ),
3203 b_g_lglo =BLOC(condition="OPTION=='CALC_G_LGLO'",
3204 PROPAGATION =SIMP(statut='o',typ='R'),
3205 THETA =SIMP(statut='o',typ=theta_geom),
3206 DIRE_THETA =SIMP(statut='f',typ=cham_no_depl_r),
3207 LISSAGE_THETA =SIMP(statut='f',typ='TXM',defaut="LEGENDRE",into=("LEGENDRE","LAGRANGE") ),
3208 LISSAGE_G =SIMP(statut='f',typ='TXM',defaut="LEGENDRE",into=("LEGENDRE","LAGRANGE","LAGRANGE_NO_NO",) ),
3210 b_g_bilin =BLOC(condition="OPTION=='G_BILINEAIRE'",
3211 LISSAGE_THETA =SIMP(statut='f',typ='TXM',defaut="LEGENDRE",into=("LEGENDRE","LAGRANGE") ),
3212 LISSAGE_G =SIMP(statut='f',typ='TXM',defaut="LEGENDRE",into=("LEGENDRE","LAGRANGE") ),
3214 b_calc_g_max =BLOC(condition="OPTION=='CALC_G_MAX'",
3215 BORNES =FACT(statut='o',min=01,max='**',
3216 NUME_ORDRE =SIMP(statut='o',typ='I'),
3217 VALE_MIN =SIMP(statut='o',typ='R'),
3218 VALE_MAX =SIMP(statut='o',typ='R'),
3220 LISSAGE_THETA =SIMP(statut='f',typ='TXM',defaut="LEGENDRE",into=("LEGENDRE","LAGRANGE") ),
3221 LISSAGE_G =SIMP(statut='f',typ='TXM',defaut="LEGENDRE",into=("LEGENDRE","LAGRANGE") ),
3224 DEGRE =SIMP(statut='f',typ='I',defaut=5,into=(0,1,2,3,4,5,6,7) ),
3226 R_INF =SIMP(statut='f',typ='R'),
3227 R_SUP =SIMP(statut='f',typ='R'),
3228 R_INF_FO =SIMP(statut='f',typ=fonction),
3229 R_SUP_FO =SIMP(statut='f',typ=fonction),
3231 TITRE =SIMP(statut='f',typ='TXM',max='**'),
3232 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
3234 #& MODIF COMMANDE DATE 12/09/2001 AUTEUR MCOURTOI M.COURTOIS
3235 # CONFIGURATION MANAGEMENT OF EDF VERSION
3236 # ======================================================================
3237 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3238 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3239 # REDISTRIBUTION OF THIS FILE.
3240 # ======================================================================
3241 CALC_G_THETA_T=OPER(nom="CALC_G_THETA_T",op=53,sd_prod=tabl_calc_g_th,
3242 fr="Calcul du taux de restitution d énergie par la méthode theta en thermo-élasticité en 2D ou en 3D",
3243 docu="U4.82.03-e1",reentrant='n',
3244 regles=(UN_PARMI('RESULTAT','DEPL'),
3245 EXCLUS('COMP_ELAS','COMP_INCR'),),
3246 MODELE =SIMP(statut='o',typ=modele),
3247 CHAM_MATER =SIMP(statut='o',typ=cham_mater),
3248 THETA =SIMP(statut='o',typ=theta_geom),
3249 DEPL =SIMP(statut='f',typ=cham_no_depl_r),
3250 RESULTAT =SIMP(statut='f',typ=(evol_elas,evol_noli),),
3252 b_extrac =BLOC(condition="RESULTAT != None",fr="extraction d un champ",
3253 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','LIST_ORDRE','INST','LIST_INST'),),
3254 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3255 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
3256 LIST_ORDRE =SIMP(statut='f',typ=listis),
3257 INST =SIMP(statut='f',typ='R',max='**'),
3258 LIST_INST =SIMP(statut='f',typ=listr8),
3260 b_acce_reel =BLOC(condition="(INST != None)or(LIST_INST != None)",
3261 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-6),
3262 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
3266 CHARGE =SIMP(statut='f',typ=char_meca,max='**'),
3267 SYME_CHAR =SIMP(statut='f',typ='TXM',defaut="SANS",into=("SYME","ANTI","SANS") ),
3269 COMP_ELAS =FACT(statut='f',min=01,max=01,
3270 RELATION =SIMP(statut='f',typ='TXM',defaut="ELAS",
3271 into=("ELAS","ELAS_VMIS_LINE","ELAS_VMIS_TRAC") ),
3272 ELAS =SIMP(statut='f',typ='I',defaut=1,into=(1,) ),
3273 ELAS_VMIS_LINE =SIMP(statut='f',typ='I',defaut=1,into=(1,) ),
3274 ELAS_VMIS_TRAC =SIMP(statut='f',typ='I',defaut=1,into=(1,) ),
3275 DEFORMATION =SIMP(statut='f',typ='TXM',defaut="PETIT",into=("PETIT","GREEN") ),
3276 regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
3277 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3278 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
3279 MAILLE =SIMP(statut='f',typ=ma,max='**'),
3281 COMP_INCR =FACT(statut='f',min=01,max=01,
3282 RELATION =SIMP(statut='f',typ='TXM',defaut="ELAS",
3283 into=("ELAS","VMIS_ISOT_TRAC","VMIS_ISOT_LINE","VMIS_CINE_LINE") ),
3284 ELAS =SIMP(statut='f',typ='I',defaut=1,into=(1,) ),
3285 VMIS_ISOT_TRAC =SIMP(statut='f',typ='I',defaut=2,into=(2,) ),
3286 VMIS_ISOT_LINE =SIMP(statut='f',typ='I',defaut=2,into=(2,) ),
3287 VMIS_CINE_LINE =SIMP(statut='f',typ='I',defaut=7,into=(7,) ),
3288 DEFORMATION =SIMP(statut='f',typ='TXM',defaut="PETIT",into=("PETIT","PETIT_REAC") ),
3289 regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
3290 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3291 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
3292 MAILLE =SIMP(statut='f',typ=ma,max='**'),
3294 ETAT_INIT =FACT(statut='f',min=01,max=01,
3295 SIGM =SIMP(statut='f',typ=cham_elem_sief_r),
3296 DEPL =SIMP(statut='f',typ=cham_no_depl_r),
3298 OPTION =SIMP(statut='f',typ='TXM',defaut="CALC_G",
3299 into=("CALC_G","CALC_G_LAGR","CALC_K_G","G_BILINEAIRE","CALC_G_MAX","CALC_DG",) ),
3300 b_calc_g_max =BLOC(condition="OPTION=='CALC_G_MAX'",
3301 BORNES =FACT(statut='o',min=01,max='**',
3302 NUME_ORDRE =SIMP(statut='o',typ='I'),
3303 VALE_MIN =SIMP(statut='o',typ='R'),
3304 VALE_MAX =SIMP(statut='o',typ='R'),
3307 b_calc_k_g =BLOC(condition="OPTION=='CALC_K_G'",
3308 FOND =SIMP(statut='o',typ=fond_fiss),
3310 b_calc_g_lagr =BLOC(condition="OPTION=='CALC_G_LAGR'",
3311 PROPAGATION =SIMP(statut='o',typ='R'),
3313 b_calc_dg =BLOC(condition="OPTION=='CALC_DG'",
3314 SENSIBILITE =FACT(statut='f',min=01,max=01,
3315 THETA =SIMP(statut='o',typ=theta_geom ),
3319 TITRE =SIMP(statut='f',typ='TXM',max='**'),
3320 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
3322 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
3323 # CONFIGURATION MANAGEMENT OF EDF VERSION
3324 # ======================================================================
3325 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3326 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3327 # REDISTRIBUTION OF THIS FILE.
3328 # ======================================================================
3329 CALC_INTE_SPEC=OPER(nom="CALC_INTE_SPEC",op= 120,sd_prod=tabl_intsp,
3330 fr="Calcul d une matrice interspectrale d une fonction du temps",
3331 docu="U4.36.03-e",reentrant='n',
3332 INST_INIT =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3333 INST_FIN =SIMP(statut='o',typ='R' ),
3334 DUREE_ANALYSE =SIMP(statut='f',typ='R' ),
3335 DUREE_DECALAGE =SIMP(statut='f',typ='R' ),
3336 NB_POIN =SIMP(statut='o',typ='I' ),
3337 FONCTION =SIMP(statut='o',typ=fonction,max='**' ),
3338 TITRE =SIMP(statut='f',typ='TXM',max='**'),
3339 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
3341 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
3342 # CONFIGURATION MANAGEMENT OF EDF VERSION
3343 # ======================================================================
3344 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3345 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3346 # REDISTRIBUTION OF THIS FILE.
3347 # ======================================================================
3348 CALC_MATR_AJOU=OPER(nom="CALC_MATR_AJOU",op= 152,sd_prod=matr_asse_gene_r,
3349 fr="Calcul des matrices de masse, d amortissement ou de raideur ajoutées",
3350 docu="U4.66.01-c",reentrant='n',
3351 regles=(EXCLUS('MODE_MECA','CHAM_NO','MODELE_GENE'),
3352 PRESENT_ABSENT('NUME_DDL_GENE','CHAM_NO'),
3353 PRESENT_PRESENT('MODELE_GENE','NUME_DDL_GENE'),),
3354 MODELE_FLUIDE =SIMP(statut='o',typ=modele ),
3355 MODELE_INTERFACE=SIMP(statut='o',typ=modele ),
3356 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
3357 CHARGE =SIMP(statut='o',typ=char_ther ),
3358 MODE_MECA =SIMP(statut='f',typ=mode_meca ),
3359 CHAM_NO =SIMP(statut='f',typ=cham_no_depl_r ),
3360 MODELE_GENE =SIMP(statut='f',typ=modele_gene ),
3361 NUME_DDL_GENE =SIMP(statut='f',typ=nume_ddl_gene ),
3362 DIST_REFE =SIMP(statut='f',typ='R',defaut= 1.E-2 ),
3363 AVEC_MODE_STAT =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
3364 NUME_MODE_MECA =SIMP(statut='f',typ='I',max='**'),
3365 OPTION =SIMP(statut='o',typ='TXM',into=("MASS_AJOU","AMOR_AJOU","RIGI_AJOU") ),
3366 POTENTIEL =SIMP(statut='f',typ=evol_ther ),
3367 NOEUD_DOUBLE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
3368 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2 ) ),
3370 SOLVEUR =FACT(statut='d',min=1,max=1,
3371 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
3372 b_mult_front = BLOC ( condition = "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
3373 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
3375 b_ldlt =BLOC( condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
3376 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
3378 b_ldlt_mult =BLOC( condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
3379 fr="Paramètres relatifs à la non iversibilité de la matrice à factorise",
3380 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
3381 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
3383 b_gcpc =BLOC (condition = "METHODE == 'GCPC' ", fr="Paramètres de la méthode du gradient conjugué",
3384 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
3385 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut=0),
3386 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
3387 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
3388 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
3391 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3394 #& MODIF COMMANDE DATE 11/12/2001 AUTEUR DURAND C.DURAND
3395 # CONFIGURATION MANAGEMENT OF EDF VERSION
3396 # ======================================================================
3397 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3398 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3399 # REDISTRIBUTION OF THIS FILE.
3400 # ======================================================================
3401 # RESPONSABLE VABHHTS J.PELLET
3402 def calc_matr_elem_prod(OPTION,**args):
3403 if OPTION == "RIGI_MECA" : return matr_elem_depl_r
3404 if OPTION == "RIGI_FLUI_STRU" : return matr_elem_depl_r
3405 if OPTION == "RIGI_MECA_LAGR" : return matr_elem_depl_r
3406 if OPTION == "MASS_ID_MDEP_R" : return matr_elem_depl_r
3407 if OPTION == "MASS_ID_MDNS_R" : return matr_elem_depl_r
3408 if OPTION == "MASS_ID_MTEM_R" : return matr_elem_temp_r
3409 if OPTION == "MASS_ID_MTNS_R" : return matr_elem_temp_r
3410 if OPTION == "MASS_MECA" : return matr_elem_depl_r
3411 if OPTION == "MASS_FLUI_STRU" : return matr_elem_depl_r
3412 if OPTION == "RIGI_GEOM" : return matr_elem_depl_r
3413 if OPTION == "RIGI_ROTA" : return matr_elem_depl_r
3414 if OPTION == "AMOR_MECA" : return matr_elem_depl_r
3415 if OPTION == "IMPE_MECA" : return matr_elem_depl_r
3416 if OPTION == "ONDE_FLUI" : return matr_elem_depl_r
3417 if OPTION == "RIGI_MECA_HYST" : return matr_elem_depl_c
3418 if OPTION == "RIGI_THER" : return matr_elem_temp_r
3419 if OPTION == "MASS_THER" : return matr_elem_temp_r
3420 if OPTION == "MASS_MECA_DIAG" : return matr_elem_depl_r
3421 if OPTION == "RIGI_ACOU" : return matr_elem_pres_c
3422 if OPTION == "MASS_ACOU" : return matr_elem_pres_c
3423 if OPTION == "AMOR_ACOU" : return matr_elem_pres_c
3424 raise AsException("type de concept resultat non prevu")
3426 CALC_MATR_ELEM=OPER(nom="CALC_MATR_ELEM",op= 9,sd_prod=calc_matr_elem_prod
3427 ,fr="Calcul des matrices élémentaires",docu="U4.61.01-f",reentrant='n',
3428 OPTION =SIMP(statut='o',typ='TXM',
3429 into=("RIGI_MECA","MASS_MECA","RIGI_GEOM",
3430 "AMOR_MECA","RIGI_THER","MASS_THER","IMPE_MECA",
3431 "ONDE_FLUI","MASS_FLUI_STRU","RIGI_FLUI_STRU",
3432 "RIGI_ROTA","MASS_MECA_DIAG","RIGI_ACOU",
3433 "MASS_ID_MDEP_R","MASS_ID_MDNS_R","MASS_ID_MTEM_R","MASS_ID_MTNS_R",
3434 "MASS_ACOU","AMOR_ACOU","RIGI_MECA_HYST",
3435 "RIGI_MECA_LAGR") ),
3437 b_rigi_meca = BLOC( condition = "OPTION=='RIGI_MECA'",
3438 regles=(AU_MOINS_UN('MODELE','CHARGE' ),),
3439 MODELE =SIMP(statut='f',typ=modele ),
3440 b_modele =BLOC(condition = "MODELE != None",
3441 CHAM_MATER =SIMP(statut='f',typ=cham_mater ),
3442 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
3443 MODE_FOURIER =SIMP(statut='f',typ='I',defaut= 0 ),
3445 CHARGE =SIMP(statut='f',typ=char_meca,max='**' ),
3446 b_charge =BLOC (condition = "CHARGE != None",
3447 INST =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3451 b_rigi_meca_lagr =BLOC(condition = "OPTION=='RIGI_MECA_LAGR'",
3452 MODELE =SIMP(statut='o',typ=modele ),
3453 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
3454 CHARGE =SIMP(statut='f',typ=char_meca,max='**' ),
3455 b_charge =BLOC(condition = "CHARGE != None",
3456 INST =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3458 THETA =SIMP(statut='o',typ=theta_geom ),
3459 PROPAGATION =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3462 b_mass_meca =BLOC(condition = "(OPTION=='MASS_MECA') or (OPTION=='MASS_MECA_DIAG')",
3463 regles=(AU_MOINS_UN('MODELE','CHARGE'),),
3464 MODELE =SIMP(statut='f',typ=modele ),
3465 b_modele =BLOC(condition = "MODELE != None",
3466 CHAM_MATER =SIMP(statut='f',typ=cham_mater ),
3467 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
3469 CHARGE =SIMP(statut='f',typ=char_meca,max='**' ),
3470 b_charge =BLOC(condition = "CHARGE != None",
3471 INST =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3475 b_mass_identite =BLOC(condition = "(OPTION in ('MASS_ID_MDEP_R','MASS_ID_MTEM_R','MASS_ID_MDNS_R','MASS_ID_MTNS_R')) ",
3476 MODELE =SIMP(statut='o',typ=modele ),
3477 # j'ajoute ces 2 mot clés inutiles à cause de l'alarme pas assez subtile de MEDOME
3478 CHAM_MATER =SIMP(statut='f',typ=cham_mater ),
3479 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
3482 b_rigi_geom =BLOC(condition = "OPTION=='RIGI_GEOM'",
3483 MODELE =SIMP(statut='o',typ=modele ),
3484 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
3485 SIEF_ELGA =SIMP(statut='o',typ=cham_elem_sief_r ),
3486 MODE_FOURIER =SIMP(statut='f',typ='I',defaut= 0 ),
3489 b_rigi_rota =BLOC(condition = "OPTION=='RIGI_ROTA'",
3490 MODELE =SIMP(statut='o',typ=modele ),
3491 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
3492 CHARGE =SIMP(statut='o',typ=char_meca,max='**' ),
3493 INST =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3496 b_amor_meca =BLOC(condition = "OPTION=='AMOR_MECA'",
3497 regles=(AU_MOINS_UN('CARA_ELEM','RIGI_MECA'),
3498 ENSEMBLE('RIGI_MECA','MASS_MECA','CHAM_MATER'), ),
3499 MODELE =SIMP(statut='o',typ=modele ),
3500 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
3501 CHAM_MATER =SIMP(statut='f',typ=cham_mater ),
3502 RIGI_MECA =SIMP(statut='f',typ=matr_elem_depl_r ),
3503 MASS_MECA =SIMP(statut='f',typ=matr_elem_depl_r ),
3504 CHARGE =SIMP(statut='f',typ=char_meca,max='**' ),
3507 b_rigi_meca_hyst =BLOC( condition = "OPTION=='RIGI_MECA_HYST'",
3508 MODELE =SIMP(statut='o',typ=modele ),
3509 CHARGE =SIMP(statut='o',typ=char_meca ,max='**' ),
3510 CHAM_MATER =SIMP(statut='f',typ=cham_mater ),
3511 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
3512 RIGI_MECA =SIMP(statut='o',typ=matr_elem_depl_r ),
3515 b_rigi_ther =BLOC(condition = "OPTION=='RIGI_THER'",
3516 regles=(AU_MOINS_UN('MODELE','CHARGE' ),),
3517 MODELE =SIMP(statut='f',typ=modele ),
3518 b_modele =BLOC(condition = "MODELE != None",
3519 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
3520 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
3521 MODE_FOURIER =SIMP(statut='f',typ='I',defaut= 0 ),
3523 CHARGE =SIMP(statut='f',typ=char_ther,max='**' ),
3526 b_mass_ther =BLOC(condition = "OPTION=='MASS_THER'",
3527 MODELE =SIMP(statut='o',typ=modele ),
3528 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
3529 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
3532 b_rigi_acou =BLOC(condition = "(OPTION=='RIGI_ACOU') or (OPTION=='MASS_ACOU') or (OPTION=='AMOR_ACOU')",
3533 MODELE =SIMP(statut='o',typ=modele ),
3534 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
3535 CHARGE =SIMP(statut='f',typ=char_acou ,max='**' ),
3538 b_rigi_flui =BLOC(condition = "(OPTION=='RIGI_FLUI_STRU') or (OPTION=='MASS_FLUI_STRU')",
3539 MODELE =SIMP(statut='o',typ=modele ),
3540 CARA_ELEM =SIMP(statut='o',typ=cara_elem ),
3541 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
3542 CHARGE =SIMP(statut='o',typ=char_meca ,max='**' ),
3543 INST =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3546 b_impe_meca =BLOC(condition = "(OPTION=='IMPE_MECA') or (OPTION=='ONDE_FLUI')",
3547 MODELE =SIMP(statut='o',typ=modele ),
3548 CHARGE =SIMP(statut='o',typ=char_meca,max='**' ),
3549 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
3552 #& MODIF COMMANDE DATE 27/06/2001 AUTEUR CIBHHLV L.VIVAN
3553 # CONFIGURATION MANAGEMENT OF EDF VERSION
3554 # ======================================================================
3555 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3556 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3557 # REDISTRIBUTION OF THIS FILE.
3558 # ======================================================================
3559 CALC_META=OPER(nom="CALC_META",op=194,sd_prod=evol_ther,docu="U4.85.01-a",reentrant='o',
3560 fr="Calcule la métallurgie a partir du résultat du calcul thermique",
3561 MODELE =SIMP(statut='o',typ=modele ),
3562 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
3563 RESULTAT =SIMP(statut='o',typ=evol_ther ),
3564 ETAT_INIT =FACT(statut='o',min=01,max=01,
3565 regles=(UN_PARMI('NUME_INIT','META_INIT',),),
3566 EVOL_THER =SIMP(statut='f',typ=evol_ther ),
3567 NUME_INIT =SIMP(statut='f',typ='I' ),
3568 META_INIT =SIMP(statut='f',typ=carte_var2_r ),
3570 COMP_INCR =FACT(statut='o',min=01,max='**',
3571 RELATION =SIMP(statut='o',typ='TXM',into=("ACIER","ZIRC",) ),
3572 ACIER =SIMP(statut='c',typ='I',defaut=7,into=(7,) ),
3573 ZIRC =SIMP(statut='c',typ='I',defaut=3,into=(3,) ),
3574 regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
3575 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3576 GROUP_MA =SIMP(statut='f',typ=grma),
3577 MAILLE =SIMP(statut='f',typ=ma),
3579 OPTION =SIMP(statut='f',typ='TXM'
3580 ,into=("META_ELNO_TEMP",) ),
3582 #& MODIF COMMANDE DATE 04/12/2001 AUTEUR GNICOLAS G.NICOLAS
3583 # CONFIGURATION MANAGEMENT OF EDF VERSION
3584 # ======================================================================
3585 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3586 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3587 # REDISTRIBUTION OF THIS FILE.
3588 # ======================================================================
3589 # RESPONSABLE G8BHHXD X.DESROCHES
3590 def calc_no_prod(RESULTAT,**args):
3591 if AsType(RESULTAT) != None : return AsType(RESULTAT)
3592 raise AsException("type de concept resultat non prevu")
3594 CALC_NO=OPER(nom="CALC_NO",op= 106,sd_prod=calc_no_prod,docu="U4.81.02-e1",reentrant='o',
3595 RESULTAT =SIMP(statut='o',typ=(evol_elas,dyna_trans,dyna_harmo,acou_harmo,mode_meca,
3596 mode_acou,mode_stat,mode_stat_depl,mode_stat_acce,
3597 mode_stat_forc,evol_ther,evol_noli,base_modale,
3598 mult_elas,fourier_elas,mode_flamb ) ),
3599 SENSIBILITE =SIMP(statut='f',typ=(para_sensi,theta_geom),max='**',
3600 fr="Liste des paramètres de sensibilité.",
3601 ang="List of sensitivity parameters"),
3603 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','FREQ','NUME_MODE',
3604 'NOEUD_CMP','LIST_INST','LIST_FREQ','LIST_ORDRE','NOM_CAS'),),
3605 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3606 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
3607 NUME_MODE =SIMP(statut='f',typ='I',max='**'),
3608 NOEUD_CMP =SIMP(statut='f',typ='TXM',max='**'),
3609 NOM_CAS =SIMP(statut='f',typ='TXM' ),
3610 INST =SIMP(statut='f',typ='R',max='**'),
3611 FREQ =SIMP(statut='f',typ='R',max='**'),
3612 LIST_INST =SIMP(statut='f',typ=listr8),
3613 LIST_FREQ =SIMP(statut='f',typ=listr8),
3614 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3 ),
3615 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
3616 LIST_ORDRE =SIMP(statut='f',typ=listis),
3618 OPTION =SIMP(statut='o',typ='TXM',max='**',
3619 into=("FORC_NODA","REAC_NODA",
3626 "EFGE_NOEU_CART","EFGE_NOEU_DEPL",
3631 "EPSG_NOEU" ,"EPSG_NOEU_DEPL",
3632 "EPSI_NOEU_DEPL","EPSI_NOEU_DPGE",
3633 "EPSP_NOEU" ,"EPSP_NOEU_ZAC",
3634 "EQUI_NOEU_EPME","EQUI_NOEU_EPSI","EQUI_NOEU_SIGM",
3639 "INTE_NOEU_ACTI","INTE_NOEU_REAC",
3642 "PRES_NOEU_DBEL","PRES_NOEU_IMAG","PRES_NOEU_REEL",
3644 "SIEF_NOEU" ,"SIEF_NOEU_ELGA",
3645 "SIGM_NOEU_CART","SIGM_NOEU_COQU","SIGM_NOEU_DEPL","SIGM_NOEU_DPGE",
3646 "SIGM_NOEU_SIEF","SIGM_NOEU_VARI","SIGM_NOEU_ZAC",
3647 "SIPO_NOEU_DEPL","SIPO_NOEU_SIEF",
3649 "VARI_NOEU" ,"VARI_NOEU_ELGA",) ),
3651 b_forc_reac =BLOC(condition = """(OPTION == 'FORC_NODA') or (type(OPTION) == type(()) and 'FORC_NODA' in OPTION) or\
3652 (OPTION == 'REAC_NODA') or (type(OPTION) == type(()) and 'REAC_NODA' in OPTION)""",
3653 MODELE =SIMP(statut='o',typ=modele),
3656 CHAM_MATER =SIMP(statut='f',typ=cham_mater),
3657 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
3658 EXCIT =FACT(statut='f',min=1,max='**',
3659 CHARGE =SIMP(statut='f',typ=(char_meca,char_ther,char_acou) ),
3660 FONC_MULT =SIMP(statut='f',typ=fonction),
3661 TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FIXE_CSTE",
3662 into=("FIXE_CSTE","FIXE_PILO","SUIV") ),
3664 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3665 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
3666 MAILLE =SIMP(statut='f',typ=ma,max='**'),
3667 TAILLE_BLOC =SIMP(statut='f',typ='R' ,defaut= 400. ),
3669 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
3670 # CONFIGURATION MANAGEMENT OF EDF VERSION
3671 # ======================================================================
3672 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3673 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3674 # REDISTRIBUTION OF THIS FILE.
3675 # ======================================================================
3676 CALC_THETA=OPER(nom="CALC_THETA",op=54,sd_prod=theta_geom,docu="U4.82.02-d",reentrant='n',
3677 fr="Affectation d un champ sur le maillage (mécanique de la rupture)",
3678 regles=(UN_PARMI('THETA_2D','THETA_3D','THETA_BANDE'),
3679 PRESENT_PRESENT('THETA_3D','FOND_3D'),
3680 PRESENT_ABSENT('THETA_2D','DIRE_THETA'),
3681 EXCLUS('DIRECTION','DIRE_THETA'),),
3682 OPTION =SIMP(statut='f',typ='TXM',defaut="COURONNE",into=("COURONNE","BANDE") ),
3683 MODELE =SIMP(statut='o',typ=(modele) ),
3684 FOND_3D =SIMP(statut='f',typ=(fond_fiss) ),
3685 THETA_3D =FACT(statut='f',min=01,max='**',
3686 regles=(UN_PARMI('TOUT','GROUP_NO','NOEUD'),
3687 UN_PARMI('MODULE','MODULE_FO'),
3688 ENSEMBLE('MODULE','R_INF','R_SUP'),
3689 ENSEMBLE('MODULE_FO','R_INF_FO','R_SUP_FO'),),
3690 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3691 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
3692 NOEUD =SIMP(statut='f',typ=no,max='**'),
3693 MODULE =SIMP(statut='f',typ='R'),
3694 R_INF =SIMP(statut='f',typ='R'),
3695 R_SUP =SIMP(statut='f',typ='R'),
3696 MODULE_FO =SIMP(statut='f',typ=fonction),
3697 R_INF_FO =SIMP(statut='f',typ=fonction),
3698 R_SUP_FO =SIMP(statut='f',typ=fonction),
3700 DIRE_THETA =SIMP(statut='f',typ=(cham_no_depl_r) ),
3701 DIRECTION =SIMP(statut='f',typ='R',max='**'),
3702 THETA_2D =FACT(statut='f',min=01,max='**',
3703 regles=(UN_PARMI('GROUP_NO','NOEUD'),),
3704 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
3705 NOEUD =SIMP(statut='f',typ=no,max='**'),
3706 MODULE =SIMP(statut='o',typ='R'),
3707 R_INF =SIMP(statut='o',typ='R'),
3708 R_SUP =SIMP(statut='o',typ='R'),
3710 THETA_BANDE =FACT(statut='f',min=01,max='**',
3711 MODULE =SIMP(statut='o',typ='R'),
3712 R_INF =SIMP(statut='o',typ='R'),
3713 R_SUP =SIMP(statut='o',typ='R'),
3715 GRAD_NOEU_THETA =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
3716 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
3717 IMPRESSION =FACT(statut='f',min=01,max=01,
3718 FICHIER =SIMP(statut='f',typ='TXM',defaut="RESULTAT",into=("RESULTAT",) ),
3719 FORMAT =SIMP(statut='f',typ='TXM',defaut="EXCEL",into=("EXCEL","AGRAF") ),
3722 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
3723 # CONFIGURATION MANAGEMENT OF EDF VERSION
3724 # ======================================================================
3725 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3726 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3727 # REDISTRIBUTION OF THIS FILE.
3728 # ======================================================================
3729 # RESPONSABLE VABHHTS J.PELLET
3730 def calc_vect_elem_prod(OPTION,**args):
3731 if OPTION == "CHAR_MECA" : return vect_elem_depl_r
3732 if OPTION == "CHAR_MECA_LAGR" : return vect_elem_depl_r
3733 if OPTION == "CHAR_THER" : return vect_elem_temp_r
3734 if OPTION == "CHAR_ACOU" : return vect_elem_pres_c
3735 if OPTION == "FORC_NODA" : return vect_elem_depl_r
3736 raise AsException("type de concept resultat non prevu")
3738 CALC_VECT_ELEM=OPER(nom="CALC_VECT_ELEM",op=8,sd_prod=calc_vect_elem_prod,docu="U4.61.02-f",reentrant='n',
3739 fr="Calcul des seconds membres élémentaires",
3740 OPTION =SIMP(statut='o',typ='TXM',into=("CHAR_MECA","CHAR_THER","CHAR_ACOU",
3741 "FORC_NODA","CHAR_MECA_LAGR") ),
3742 b_char_meca =BLOC(condition = "OPTION=='CHAR_MECA'",
3743 regles=(AU_MOINS_UN('CHARGE','MODELE'),),
3744 CHARGE =SIMP(statut='f',typ=char_meca,max='**'),
3745 MODELE =SIMP(statut='f',typ=modele),
3746 b_charge =BLOC(condition = "CHARGE != None", fr="modèle ne contenant pas de sous-structure",
3747 CHAM_MATER =SIMP(statut='f',typ=cham_mater),
3748 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
3749 INST =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3750 MODE_FOURIER =SIMP(statut='f',typ='I',defaut= 0 ),
3752 b_modele =BLOC(condition = "(MODELE != None)",fr="modèle contenant une sous-structure",
3753 SOUS_STRUC =FACT(statut='o',min=01,
3754 regles=(UN_PARMI('TOUT','MAILLE'),),
3755 CAS_CHARGE =SIMP(statut='o',typ='TXM' ),
3756 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3757 MAILLE =SIMP(statut='f',typ=ma,max='**',),
3761 b_char_ther =BLOC(condition = "OPTION=='CHAR_THER'",
3762 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
3763 CHARGE =SIMP(statut='o',typ=char_ther,max='**'),
3764 INST =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3767 b_char_acou =BLOC(condition = "OPTION=='CHAR_ACOU'",
3768 CHAM_MATER =SIMP(statut='o',typ=cham_mater),
3769 CHARGE =SIMP(statut='o',typ=char_acou,max='**'),
3772 b_forc_noda =BLOC(condition = "OPTION=='FORC_NODA'",
3773 SIEF_ELGA =SIMP(statut='o',typ=cham_elem_sief_r),
3774 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
3775 MODELE =SIMP(statut='f',typ=modele),
3778 b_meca_lagr =BLOC(condition = "OPTION=='CHAR_MECA_LAGR'",
3779 CHAM_MATER =SIMP(statut='o',typ=cham_mater),
3780 THETA =SIMP(statut='o',typ=theta_geom),
3781 PROPAGATION =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3782 CHARGE =SIMP(statut='f',typ=char_meca,max='**'),
3783 INST =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
3786 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
3787 # CONFIGURATION MANAGEMENT OF EDF VERSION
3788 # ======================================================================
3789 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3790 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3791 # REDISTRIBUTION OF THIS FILE.
3792 # ======================================================================
3793 # RESPONSABLE G8BHHXD X.DESROCHES
3794 def comb_cham_elem_prod(COMB_R=None,COMB_C=None,COMB_FOURIER=None,**args):
3797 vale=COMB_R.get_child('CHAM_ELEM').get_valeur()
3798 elif COMB_C != None:
3799 vale=COMB_C.get_child('CHAM_ELEM').get_valeur()
3800 elif COMB_FOURIER != None:
3801 vale=COMB_FOURIER.get_child('CHAM_ELEM').get_valeur()
3803 raise AsException("type de concept resultat non prevu")
3805 if AsType(vale) == cham_elem_sief_r : return cham_elem_sief_r
3806 if AsType(vale) == cham_elem_flux_r : return cham_elem_flux_r
3807 if AsType(vale) == cham_elem_epsi_r : return cham_elem_epsi_r
3808 if AsType(vale) == cham_elem_ener_r : return cham_elem_ener_r
3809 if AsType(vale) == cham_elem_crit_r : return cham_elem_crit_r
3810 if AsType(vale) == cham_elem_dbel_r : return cham_elem_dbel_r
3811 if AsType(vale) == cham_elem_pres_r : return cham_elem_pres_r
3812 if AsType(vale) == cham_elem_sief_c : return cham_elem_sief_c
3813 raise AsException("type de concept resultat non prevu")
3815 COMB_CHAM_ELEM=OPER(nom="COMB_CHAM_ELEM",op= 139,sd_prod=comb_cham_elem_prod,reentrant='f',
3816 fr="Combinaison linéaire de champs par éléments",docu="U4.72.03-e",
3817 regles=(UN_PARMI('COMB_R','COMB_C','COMB_FOURIER'),
3818 PRESENT_PRESENT('COMB_FOURIER','ANGL'),),
3819 COMB_R =FACT(statut='f',min=01,max='**',
3820 PARTIE =SIMP(statut='f',typ='TXM',into=("REEL","IMAG") ),
3821 COEF_R =SIMP(statut='o',typ='R'),
3822 CHAM_ELEM =SIMP(statut='o',
3823 typ=(cham_elem_sief_r,cham_elem_flux_r,cham_elem_epsi_r,
3824 cham_elem_ener_r,cham_elem_crit_r,cham_elem_dbel_r,
3825 cham_elem_pres_r,cham_elem_sief_c ) ),
3827 COMB_C =FACT(statut='f',min=01,max='**',
3828 regles=(UN_PARMI('COEF_R','COEF_C', ),),
3829 COEF_R =SIMP(statut='f',typ='R'),
3830 COEF_C =SIMP(statut='f',typ='C'),
3831 CHAM_ELEM =SIMP(statut='o',typ=(cham_elem_sief_r) ),
3833 COMB_FOURIER =FACT(statut='f',min=01,max='**',
3834 COEF_R =SIMP(statut='f',typ='R',defaut= 1.),
3835 NUME_MODE =SIMP(statut='o',typ='I'),
3836 TYPE_MODE =SIMP(statut='o',typ='TXM',into=("SYME","ANTI") ),
3837 CHAM_ELEM =SIMP(statut='o',typ=(cham_elem_sief_r,cham_elem_flux_r,cham_elem_epsi_r ) ),
3839 ANGL =SIMP(statut='f',typ='R' ),
3842 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
3843 # CONFIGURATION MANAGEMENT OF EDF VERSION
3844 # ======================================================================
3845 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3846 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3847 # REDISTRIBUTION OF THIS FILE.
3848 # ======================================================================
3849 # RESPONSABLE G8BHHXD X.DESROCHES
3850 def comb_cham_no_prod(COMB_R,COMB_C,COMB_FOURIER,**args):
3852 type_mat = AsType(COMB_C.get_child('CHAM_NO').get_valeur())
3853 if type_mat in (cham_no_depl_c,cham_no_depl_r) : return cham_no_depl_c
3854 if type_mat in (cham_no_temp_c,cham_no_temp_r) : return cham_no_temp_c
3855 if type_mat in (cham_no_pres_c,cham_no_pres_r) : return cham_no_pres_c
3856 elif COMB_R != None:
3857 type_mat = AsType(COMB_R.get_child('CHAM_NO').get_valeur())
3858 if type_mat in (cham_no_depl_c,cham_no_depl_r) : return cham_no_depl_r
3859 if type_mat in (cham_no_temp_c,cham_no_temp_r) : return cham_no_temp_r
3860 if type_mat in (cham_no_pres_c,cham_no_pres_r) : return cham_no_pres_r
3861 if type_mat == matr_asse_gene_r : return matr_asse_gene_r
3862 elif COMB_FOURIER != None:
3863 type_mat = AsType(COMB_FOURIER.get_child('CHAM_NO').get_valeur())
3864 if type_mat == cham_no_temp_r : return cham_no_temp_r
3865 if type_mat == cham_no_depl_r : return cham_no_depl_r
3866 raise AsException("type de concept resultat non prevu")
3869 COMB_CHAM_NO=OPER(nom="COMB_CHAM_NO",op= 30,sd_prod=comb_cham_no_prod
3870 ,fr="Combinaison linéaire de champs aux noeuds",
3871 docu="U4.72.02-f",reentrant='f',
3872 regles=(UN_PARMI('COMB_R','COMB_C','COMB_FOURIER'),),
3873 COMB_R =FACT(statut='f',min=01,max='**',
3874 PARTIE =SIMP(statut='f',typ='TXM',into=("REEL","IMAG",) ),
3875 CHAM_NO =SIMP(statut='o',typ=(cham_no_temp_r,cham_no_temp_c,cham_no_depl_r,cham_no_depl_c
3876 ,cham_no_pres_r,cham_no_pres_c ) ),
3877 COEF_R =SIMP(statut='o',typ='R' ),
3879 COMB_C =FACT(statut='f',min=01,max='**',
3880 regles=(UN_PARMI('COEF_R','COEF_C' ),),
3881 CHAM_NO =SIMP(statut='o',typ=(cham_no_temp_r,cham_no_depl_r,cham_no_pres_r,cham_no_temp_c
3882 ,cham_no_depl_c,cham_no_pres_c ) ),
3883 COEF_R =SIMP(statut='f',typ='R' ),
3884 COEF_C =SIMP(statut='f',typ='C' ),
3886 COMB_FOURIER =FACT(statut='f',min=01,max='**',
3887 CHAM_NO =SIMP(statut='o',typ=(cham_no_temp_r,cham_no_depl_r) ),
3888 COEF_R =SIMP(statut='f',typ='R',defaut= 1. ),
3889 NUME_MODE =SIMP(statut='o',typ='I' ),
3890 TYPE_MODE =SIMP(statut='o',typ='TXM',into=("SYME","ANTI") ),
3892 b_angl = BLOC ( condition = "COMB_FOURIER != None",
3893 ANGL =SIMP(statut='o',typ='R' ),
3896 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
3897 # CONFIGURATION MANAGEMENT OF EDF VERSION
3898 # ======================================================================
3899 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3900 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3901 # REDISTRIBUTION OF THIS FILE.
3902 # ======================================================================
3903 # RESPONSABLE G8BHHXD X.DESROCHES
3904 COMB_FOURIER=OPER(nom="COMB_FOURIER",op= 161,sd_prod=comb_fourier,
3905 docu="U4.83.31-c",reentrant='n',
3906 RESULTAT =SIMP(statut='o',typ=fourier_elas ),
3907 ANGL =SIMP(statut='o',typ='R',max='**'),
3908 NOM_CHAM =SIMP(statut='o',typ='TXM',max=05,
3909 into=("DEPL","REAC_NODA","SIEF_ELGA_DEPL","EPSI_ELNO_DEPL","SIGM_ELNO_DEPL") ),
3911 #& MODIF COMMANDE DATE 10/07/2001 AUTEUR ACBHHCD G.DEVESA
3912 # CONFIGURATION MANAGEMENT OF EDF VERSION
3913 # ======================================================================
3914 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3915 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3916 # REDISTRIBUTION OF THIS FILE.
3917 # ======================================================================
3918 # RESPONSABLE VABHHTS J.PELLET
3919 def comb_matr_asse_prod(COMB_R,COMB_C,**args):
3921 type_mat = AsType(COMB_C.get_child('MATR_ASSE').get_valeur())
3922 if type_mat in (matr_asse_depl_c,matr_asse_depl_r) : return matr_asse_depl_c
3923 if type_mat in (matr_asse_gene_c,matr_asse_gene_r) : return matr_asse_gene_c
3924 if type_mat in (matr_asse_temp_c,matr_asse_temp_r) : return matr_asse_temp_c
3925 if type_mat in (matr_asse_pres_c,matr_asse_pres_r) : return matr_asse_pres_c
3926 elif COMB_R != None:
3927 type_mat = AsType(COMB_R.get_child('MATR_ASSE').get_valeur())
3928 if type_mat in (matr_asse_depl_c,matr_asse_depl_r) : return matr_asse_depl_r
3929 if type_mat in (matr_asse_temp_c,matr_asse_temp_r) : return matr_asse_temp_r
3930 if type_mat in (matr_asse_pres_c,matr_asse_pres_r) : return matr_asse_pres_r
3931 if type_mat in (matr_asse_gene_c,matr_asse_gene_r) : return matr_asse_gene_r
3932 raise AsException("type de concept resultat non prevu")
3934 COMB_MATR_ASSE=OPER(nom="COMB_MATR_ASSE",op= 31,sd_prod=comb_matr_asse_prod,
3935 fr="Combinaison linéaire de matrices assemblées",
3936 docu="U4.72.01-f",reentrant='f',
3937 regles=(UN_PARMI('COMB_R','COMB_C' ),),
3938 COMB_R =FACT(statut='f',min=01,max='**',
3939 PARTIE =SIMP(statut='f',typ='TXM',into=("REEL","IMAG") ),
3940 MATR_ASSE =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_depl_c,matr_asse_temp_r,matr_asse_temp_c
3941 ,matr_asse_pres_r,matr_asse_pres_c,matr_asse_gene_r,matr_asse_gene_c ) ),
3942 COEF_R =SIMP(statut='o',typ='R' ),
3944 COMB_C =FACT(statut='f',min=01,max='**',
3945 regles=(UN_PARMI('COEF_R','COEF_C' ),),
3946 MATR_ASSE =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_depl_c,matr_asse_temp_r,matr_asse_temp_c
3947 ,matr_asse_pres_r,matr_asse_pres_c,matr_asse_gene_r,matr_asse_gene_c ) ),
3948 COEF_R =SIMP(statut='f',typ='R' ),
3949 COEF_C =SIMP(statut='f',typ='C' ),
3951 SANS_CMP =SIMP(statut='f',typ='TXM',into=("LAGR",) ),
3953 #& MODIF COMMANDE DATE 28/03/2001 AUTEUR CIBHHLV L.VIVAN
3954 # CONFIGURATION MANAGEMENT OF EDF VERSION
3955 # ======================================================================
3956 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
3957 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
3958 # REDISTRIBUTION OF THIS FILE.
3959 # ======================================================================
3960 COMB_SISM_MODAL=OPER(nom="COMB_SISM_MODAL",op= 109,sd_prod=mode_stat,
3961 fr="Réponse sismique par recombinaison modale par une méthode spectrale",
3962 docu="U4.84.01-d",reentrant='n',
3963 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','FREQ','NUME_MODE','LIST_FREQ','LIST_ORDRE'),
3964 UN_PARMI('AMOR_REDUIT','LIST_AMOR','AMOR_GENE' ),),
3965 MODE_MECA =SIMP(statut='o',typ=mode_meca ),
3966 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3967 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
3968 LIST_ORDRE =SIMP(statut='f',typ=listis ),
3969 NUME_MODE =SIMP(statut='f',typ='I',max='**'),
3970 FREQ =SIMP(statut='f',typ='R',max='**'),
3971 LIST_FREQ =SIMP(statut='f',typ=listr8 ),
3972 b_freq =BLOC(condition = "FREQ != None or LIST_FREQ != None",
3973 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
3974 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
3976 MODE_CORR =SIMP(statut='f',typ=mode_stat_acce ),
3978 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**'),
3979 LIST_AMOR =SIMP(statut='f',typ=listr8 ),
3980 AMOR_GENE =SIMP(statut='f',typ=matr_asse_gene_r ),
3982 MASS_INER =SIMP(statut='f',typ=tabl_mass_iner ),
3983 CORR_FREQ =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
3985 EXCIT =FACT(statut='o',min=01,max='**',
3986 regles=(UN_PARMI('MONO_APPUI','NOEUD','GROUP_NO'),
3987 UN_PARMI('AXE','TRI_AXE','TRI_SPEC' ),),
3989 MONO_APPUI =SIMP(statut='f',typ='TXM',into=("OUI",) ),
3990 NOEUD =SIMP(statut='f',typ=no,max='**'),
3991 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
3992 AXE =SIMP(statut='f',fr="Excitation suivant un seul axe",
3994 TRI_AXE =SIMP(statut='f',fr="Excitation suivant les trois axes mais avec le meme spectre",
3996 TRI_SPEC =SIMP(statut='f',fr="Excitation suivant les trois axes avec trois spectres",
3997 typ='TXM',into=("OUI",) ),
3998 b_axe =BLOC(condition = "AXE != None",fr="Excitation suivant un seul axe",
3999 SPEC_OSCI =SIMP(statut='o',typ=fonction,max=01 ),
4000 ECHELLE =SIMP(statut='f',typ='R',max=01),
4002 b_tri_axe =BLOC(condition = "TRI_AXE != None",fr="Excitation suivant les trois axes mais avec le meme spectre",
4003 SPEC_OSCI =SIMP(statut='o',typ=fonction,max=01 ),
4004 ECHELLE =SIMP(statut='f',typ='R',max=01),
4006 b_tri_spec =BLOC(condition = "TRI_SPEC != None",fr="Excitation suivant les trois axes avec trois spectres",
4007 SPEC_OSCI =SIMP(statut='o',typ=fonction,min=03,max=03 ),
4008 ECHELLE =SIMP(statut='f',typ='R',min=03,max=03),
4010 NATURE =SIMP(statut='f',typ='TXM',defaut="ACCE",into=("ACCE","VITE","DEPL") ),
4012 COMB_MODE =FACT(statut='o',min=01,max=01,
4013 TYPE =SIMP(statut='o',typ='TXM',into=("SRSS","CQC","DSC","ABS","DPC") ),
4014 DUREE =SIMP(statut='f',typ='R' ),
4016 COMB_DIRECTION =FACT(statut='f',min=01,max=01,
4017 TYPE =SIMP(statut='f',typ='TXM',into=("QUAD","NEWMARK") ),
4019 COMB_MULT_APPUI =FACT(statut='f',min=01,max='**',
4020 regles=(UN_PARMI('TOUT','NOEUD','GROUP_NO' ),),
4021 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
4022 NOEUD =SIMP(statut='f',typ=no,max='**'),
4023 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
4024 TYPE =SIMP(statut='o',typ='TXM',into=("QUAD","LINE","ABS") ),
4026 DEPL_MULT_APPUI =FACT(statut='f',min=01,max='**',
4027 regles=(UN_PARMI('NOEUD','GROUP_NO'),
4028 AU_MOINS_UN('DX','DY','DZ' ),),
4029 MODE_STAT =SIMP(statut='f',typ=(mode_stat_depl,), ),
4030 NOEUD_REFE =SIMP(statut='f',typ=no),
4031 NOEUD =SIMP(statut='f',typ=no,max='**'),
4032 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
4033 DX =SIMP(statut='f',typ='R' ),
4034 DY =SIMP(statut='f',typ='R' ),
4035 DZ =SIMP(statut='f',typ='R' ),
4037 OPTION =SIMP(statut='o',typ='TXM',max=9,
4038 into=("DEPL","VITE","ACCE_ABSOLU","SIGM_ELNO_DEPL","SIEF_ELGA_DEPL",
4039 "EFGE_ELNO_DEPL","REAC_NODA","FORC_NODA","EFGE_ELNO_CART",
4040 "SIPO_ELNO_DEPL") ),
4041 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2 ) ),
4042 IMPRESSION =FACT(statut='f',min=01,max='**',
4043 regles=(EXCLUS('TOUT','NIVEAU'),),
4044 TOUT =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
4045 NIVEAU =SIMP(statut='f',typ='TXM',into=("SPEC_OSCI","MASS_EFFE","MAXI_GENE"),max=03 ),
4047 TITRE =SIMP(statut='f',typ='TXM',max='**'),
4049 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
4050 # CONFIGURATION MANAGEMENT OF EDF VERSION
4051 # ======================================================================
4052 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4053 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4054 # REDISTRIBUTION OF THIS FILE.
4055 # ======================================================================
4056 def crea_champ_prod(TYPE_CHAM,**args):
4057 if TYPE_CHAM == "CART_DBEL_R" : return carte_dbel_r
4058 if TYPE_CHAM == "CART_DEPL_C" : return carte_depl_c
4059 if TYPE_CHAM == "CART_DEPL_F" : return carte_depl_f
4060 if TYPE_CHAM == "CART_DEPL_R" : return carte_depl_r
4061 if TYPE_CHAM == "CART_DURT_R" : return carte_durt_r
4062 if TYPE_CHAM == "CART_ENER_R" : return carte_ener_r
4063 if TYPE_CHAM == "CART_EPSI_R" : return carte_epsi_r
4064 if TYPE_CHAM == "CART_ERREUR" : return carte_erreur
4065 if TYPE_CHAM == "CART_FLUX_R" : return carte_flux_r
4066 if TYPE_CHAM == "CART_GEOM_R" : return carte_geom_r
4067 if TYPE_CHAM == "CART_G_DEPL_R" : return carte_g_depl_r
4068 if TYPE_CHAM == "CART_HYDR_R" : return carte_hydr_r
4069 if TYPE_CHAM == "CART_INST_R" : return carte_inst_r
4070 if TYPE_CHAM == "CART_INTE_R" : return carte_inte_r
4071 if TYPE_CHAM == "CART_META_R" : return carte_meta_r
4072 if TYPE_CHAM == "CART_NEUT_F" : return carte_neut_f
4073 if TYPE_CHAM == "CART_NEUT_R" : return carte_neut_r
4074 if TYPE_CHAM == "CART_PRES_R" : return carte_pres_r
4075 if TYPE_CHAM == "CART_SIEF_R" : return carte_sief_r
4076 if TYPE_CHAM == "CART_SOUR_R" : return carte_sour_r
4077 if TYPE_CHAM == "CART_TEMP_F" : return carte_temp_f
4078 if TYPE_CHAM == "CART_TEMP_R" : return carte_temp_r
4079 if TYPE_CHAM == "CART_VAR2_R" : return carte_var2_r
4080 if TYPE_CHAM == "CART_VNOR_C" : return carte_vnor_c
4081 if TYPE_CHAM == "NOEU_DBEL_R" : return cham_no_dbel_r
4082 if TYPE_CHAM == "NOEU_DEPL_C" : return cham_no_depl_c
4083 if TYPE_CHAM == "NOEU_DEPL_F" : return cham_no_depl_f
4084 if TYPE_CHAM == "NOEU_DEPL_R" : return cham_no_depl_r
4085 if TYPE_CHAM == "NOEU_DURT_R" : return cham_no_durt_r
4086 if TYPE_CHAM == "NOEU_ENER_R" : return cham_no_ener_r
4087 if TYPE_CHAM == "NOEU_EPSI_R" : return cham_no_epsi_r
4088 if TYPE_CHAM == "NOEU_ERREUR" : return cham_no_erreur
4089 if TYPE_CHAM == "NOEU_FLUX_R" : return cham_no_flux_r
4090 if TYPE_CHAM == "NOEU_GEOM_R" : return cham_no_geom_r
4091 if TYPE_CHAM == "NOEU_G_DEPL_R" : return cham_no_g_depl_r
4092 if TYPE_CHAM == "NOEU_HYDR_R" : return cham_no_hydr_r
4093 if TYPE_CHAM == "NOEU_INST_R" : return cham_no_inst_r
4094 if TYPE_CHAM == "NOEU_INTE_R" : return cham_no_inte_r
4095 if TYPE_CHAM == "NOEU_META_R" : return cham_no_meta_r
4096 if TYPE_CHAM == "NOEU_NEUT_F" : return cham_no_neut_f
4097 if TYPE_CHAM == "NOEU_NEUT_R" : return cham_no_neut_r
4098 if TYPE_CHAM == "NOEU_PRES_R" : return cham_no_pres_r
4099 if TYPE_CHAM == "NOEU_SIEF_R" : return cham_no_sief_r
4100 if TYPE_CHAM == "NOEU_SOUR_R" : return cham_no_sour_r
4101 if TYPE_CHAM == "NOEU_TEMP_F" : return cham_no_temp_f
4102 if TYPE_CHAM == "NOEU_TEMP_R" : return cham_no_temp_r
4103 if TYPE_CHAM == "NOEU_VAR2_R" : return cham_no_var2_r
4104 if TYPE_CHAM == "NOEU_VNOR_C" : return cham_no_vnor_c
4105 if TYPE_CHAM == "ELEM_DBEL_R" : return cham_elem_dbel_r
4106 if TYPE_CHAM == "ELEM_DEPL_C" : return cham_elem_depl_c
4107 if TYPE_CHAM == "ELEM_DEPL_F" : return cham_elem_depl_f
4108 if TYPE_CHAM == "ELEM_DEPL_R" : return cham_elem_depl_r
4109 if TYPE_CHAM == "ELEM_DURT_R" : return cham_elem_durt_r
4110 if TYPE_CHAM == "ELEM_ENER_R" : return cham_elem_ener_r
4111 if TYPE_CHAM == "ELEM_EPSI_R" : return cham_elem_epsi_r
4112 if TYPE_CHAM == "ELEM_ERREUR" : return cham_elem_erreur
4113 if TYPE_CHAM == "ELEM_FLUX_R" : return cham_elem_flux_r
4114 if TYPE_CHAM == "ELEM_GEOM_R" : return cham_elem_geom_r
4115 if TYPE_CHAM == "ELEM_G_DEPL_R" : return cham_elem_g_depl
4116 if TYPE_CHAM == "ELEM_HYDR_R" : return cham_elem_hydr_r
4117 if TYPE_CHAM == "ELEM_INST_R" : return cham_elem_inst_r
4118 if TYPE_CHAM == "ELEM_INTE_R" : return cham_elem_inte_r
4119 if TYPE_CHAM == "ELEM_META_R" : return cham_elem_meta_r
4120 if TYPE_CHAM == "ELEM_NEUT_F" : return cham_elem_neut_f
4121 if TYPE_CHAM == "ELEM_NEUT_R" : return cham_elem_neut_r
4122 if TYPE_CHAM == "ELEM_PRES_R" : return cham_elem_pres_r
4123 if TYPE_CHAM == "ELEM_SIEF_R" : return cham_elem_sief_r
4124 if TYPE_CHAM == "ELEM_SOUR_R" : return cham_elem_sour_r
4125 if TYPE_CHAM == "ELEM_TEMP_F" : return cham_elem_temp_f
4126 if TYPE_CHAM == "ELEM_TEMP_R" : return cham_elem_temp_r
4127 if TYPE_CHAM == "ELEM_VARI_R" : return cham_elem_vari_r
4128 if TYPE_CHAM == "ELEM_VNOR_C" : return cham_elem_vnor_c
4129 if TYPE_CHAM == "ELNO_DBEL_R" : return cham_elem_dbel_r
4130 if TYPE_CHAM == "ELNO_DEPL_C" : return cham_elem_depl_c
4131 if TYPE_CHAM == "ELNO_DEPL_F" : return cham_elem_depl_f
4132 if TYPE_CHAM == "ELNO_DEPL_R" : return cham_elem_depl_r
4133 if TYPE_CHAM == "ELNO_DURT_R" : return cham_elem_durt_r
4134 if TYPE_CHAM == "ELNO_ENER_R" : return cham_elem_ener_r
4135 if TYPE_CHAM == "ELNO_EPSI_R" : return cham_elem_epsi_r
4136 if TYPE_CHAM == "ELNO_ERREUR" : return cham_elem_erreur
4137 if TYPE_CHAM == "ELNO_FLUX_R" : return cham_elem_flux_r
4138 if TYPE_CHAM == "ELNO_GEOM_R" : return cham_elem_geom_r
4139 if TYPE_CHAM == "ELNO_G_DEPL_R" : return cham_elem_g_depl
4140 if TYPE_CHAM == "ELNO_HYDR_R" : return cham_elem_hydr_r
4141 if TYPE_CHAM == "ELNO_INST_R" : return cham_elem_inst_r
4142 if TYPE_CHAM == "ELNO_INTE_R" : return cham_elem_inte_r
4143 if TYPE_CHAM == "ELNO_META_R" : return cham_elem_meta_r
4144 if TYPE_CHAM == "ELNO_NEUT_F" : return cham_elem_neut_f
4145 if TYPE_CHAM == "ELNO_NEUT_R" : return cham_elem_neut_r
4146 if TYPE_CHAM == "ELNO_PRES_R" : return cham_elem_pres_r
4147 if TYPE_CHAM == "ELNO_SIEF_R" : return cham_elem_sief_r
4148 if TYPE_CHAM == "ELNO_SOUR_R" : return cham_elem_sour_r
4149 if TYPE_CHAM == "ELNO_TEMP_F" : return cham_elem_temp_f
4150 if TYPE_CHAM == "ELNO_TEMP_R" : return cham_elem_temp_r
4151 if TYPE_CHAM == "ELNO_VARI_R" : return cham_elem_vari_r
4152 if TYPE_CHAM == "ELNO_VNOR_C" : return cham_elem_vnor_c
4153 if TYPE_CHAM == "ELGA_DBEL_R" : return cham_elem_dbel_r
4154 if TYPE_CHAM == "ELGA_DEPL_C" : return cham_elem_depl_c
4155 if TYPE_CHAM == "ELGA_DEPL_F" : return cham_elem_depl_f
4156 if TYPE_CHAM == "ELGA_DEPL_R" : return cham_elem_depl_r
4157 if TYPE_CHAM == "ELGA_DURT_R" : return cham_elem_durt_r
4158 if TYPE_CHAM == "ELGA_ENER_R" : return cham_elem_ener_r
4159 if TYPE_CHAM == "ELGA_EPSI_R" : return cham_elem_epsi_r
4160 if TYPE_CHAM == "ELGA_ERREUR" : return cham_elem_erreur
4161 if TYPE_CHAM == "ELGA_FLUX_R" : return cham_elem_flux_r
4162 if TYPE_CHAM == "ELGA_GEOM_R" : return cham_elem_geom_r
4163 if TYPE_CHAM == "ELGA_G_DEPL_R" : return cham_elem_g_depl
4164 if TYPE_CHAM == "ELGA_HYDR_R" : return cham_elem_hydr_r
4165 if TYPE_CHAM == "ELGA_INST_R" : return cham_elem_inst_r
4166 if TYPE_CHAM == "ELGA_INTE_R" : return cham_elem_inte_r
4167 if TYPE_CHAM == "ELGA_META_R" : return cham_elem_meta_r
4168 if TYPE_CHAM == "ELGA_NEUT_F" : return cham_elem_neut_f
4169 if TYPE_CHAM == "ELGA_NEUT_R" : return cham_elem_neut_r
4170 if TYPE_CHAM == "ELGA_PRES_R" : return cham_elem_pres_r
4171 if TYPE_CHAM == "ELGA_SIEF_R" : return cham_elem_sief_r
4172 if TYPE_CHAM == "ELGA_SOUR_R" : return cham_elem_sour_r
4173 if TYPE_CHAM == "ELGA_TEMP_F" : return cham_elem_temp_f
4174 if TYPE_CHAM == "ELGA_TEMP_R" : return cham_elem_temp_r
4175 if TYPE_CHAM == "ELGA_VARI_R" : return cham_elem_vari_r
4176 if TYPE_CHAM == "ELGA_VNOR_C" : return cham_elem_vnor_c
4177 if TYPE_CHAM == "CART_IRRA_R" : return carte_irra_r
4178 if TYPE_CHAM == "NOEU_IRRA_R" : return cham_no_irra_r
4179 if TYPE_CHAM == "ELEM_IRRA_R" : return cham_elem_irra_r
4180 if TYPE_CHAM == "ELNO_IRRA_R" : return cham_elem_irra_r
4181 if TYPE_CHAM == "ELGA_IRRA_R" : return cham_elem_irra_r
4182 raise AsException("type de concept resultat non prevu")
4184 CREA_CHAMP=OPER(nom="CREA_CHAMP",op= 195,sd_prod=crea_champ_prod,
4185 fr=" ",docu="U4.72.04-a1",reentrant='n',
4186 TYPE_CHAM =SIMP(statut='o',typ='TXM',
4187 into=("CART_DBEL_R","NOEU_DBEL_R","ELEM_DBEL_R",
4188 "ELNO_DBEL_R","ELGA_DBEL_R","CART_DEPL_C",
4189 "NOEU_DEPL_C","ELEM_DEPL_C","ELNO_DEPL_C",
4190 "ELGA_DEPL_C","CART_DEPL_F","NOEU_DEPL_F",
4191 "ELEM_DEPL_F","ELNO_DEPL_F","ELGA_DEPL_F",
4192 "CART_DEPL_R","NOEU_DEPL_R","ELEM_DEPL_R",
4193 "ELNO_DEPL_R","ELGA_DEPL_R","CART_DURT_R",
4194 "NOEU_DURT_R","ELEM_DURT_R","ELNO_DURT_R",
4195 "ELGA_DURT_R","CART_ENER_R","NOEU_ENER_R",
4196 "ELEM_ENER_R","ELNO_ENER_R","ELGA_ENER_R",
4197 "CART_EPSI_R","NOEU_EPSI_R","ELEM_EPSI_R",
4198 "ELNO_EPSI_R","ELGA_EPSI_R","CART_ERREUR",
4199 "NOEU_ERREUR","ELEM_ERREUR","ELNO_ERREUR",
4200 "ELGA_ERREUR","CART_FLUX_R","NOEU_FLUX_R",
4201 "ELEM_FLUX_R","ELNO_FLUX_R","ELGA_FLUX_R",
4202 "CART_GEOM_R","NOEU_GEOM_R","ELEM_GEOM_R",
4203 "ELNO_GEOM_R","ELGA_GEOM_R","CART_G_DEPL_R",
4204 "NOEU_G_DEPL_R","ELEM_G_DEPL_R","ELNO_G_DEPL_R",
4205 "ELGA_G_DEPL_R","CART_HYDR_R","NOEU_HYDR_R",
4206 "ELEM_HYDR_R","ELNO_HYDR_R","ELGA_HYDR_R",
4207 "CART_INST_R","NOEU_INST_R","ELEM_INST_R",
4208 "ELNO_INST_R","ELGA_INST_R","CART_INTE_R",
4209 "NOEU_INTE_R","ELEM_INTE_R","ELNO_INTE_R",
4210 "ELGA_INTE_R","CART_META_R","NOEU_META_R",
4211 "ELEM_META_R","ELNO_META_R","ELGA_META_R",
4212 "CART_NEUT_F","NOEU_NEUT_F","ELEM_NEUT_F",
4213 "ELNO_NEUT_F","ELGA_NEUT_F","CART_NEUT_R",
4214 "NOEU_NEUT_R","ELEM_NEUT_R","ELNO_NEUT_R",
4215 "ELGA_NEUT_R","CART_PRES_R","NOEU_PRES_R",
4216 "ELEM_PRES_R","ELNO_PRES_R","ELGA_PRES_R",
4217 "CART_SIEF_R","NOEU_SIEF_R","ELEM_SIEF_R",
4218 "ELNO_SIEF_R","ELGA_SIEF_R","CART_SOUR_R",
4219 "NOEU_SOUR_R","ELEM_SOUR_R","ELNO_SOUR_R",
4220 "ELGA_SOUR_R","CART_TEMP_F","NOEU_TEMP_F",
4221 "ELEM_TEMP_F","ELNO_TEMP_F","ELGA_TEMP_F",
4222 "CART_TEMP_R","NOEU_TEMP_R","ELEM_TEMP_R",
4223 "ELNO_TEMP_R","ELGA_TEMP_R","CART_VAR2_R",
4224 "NOEU_VAR2_R","ELEM_VARI_R","ELNO_VARI_R",
4225 "ELGA_VARI_R","CART_VNOR_C","NOEU_VNOR_C",
4226 "ELEM_VNOR_C","ELNO_VNOR_C","ELGA_VNOR_C",
4227 "CART_IRRA_R","NOEU_IRRA_R","ELEM_IRRA_R",
4228 "ELNO_IRRA_R","ELGA_IRRA_R",) ),
4230 # SI CREATION D'UN CHAM_NO, POUR IMPOSER LA NUMEROTATION DES DDLS :
4231 # ------------------------------------------------------------------
4232 regles=(EXCLUS('NUME_DDL','CHAM_NO',)),
4233 NUME_DDL =SIMP(statut='f',typ=(nume_ddl) ),
4234 CHAM_NO =SIMP(statut='f',typ=(cham_no) ),
4236 OPERATION =SIMP(statut='o',typ='TXM',into=("AFFE","ASSE","EVAL","EXTR","DISC",) ),
4238 b_affe =BLOC(condition = "OPERATION == 'AFFE'",
4239 regles=(UN_PARMI('MAILLAGE','MODELE'),EXCLUS('MAILLAGE','PROL_ZERO'),),
4240 MAILLAGE =SIMP(statut='f',typ=(maillage) ),
4241 MODELE =SIMP(statut='f',typ=(modele) ),
4242 PROL_ZERO =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON",) ),
4243 AFFE =FACT(statut='o',min=01,max='**',
4244 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE','GROUP_NO','NOEUD',),
4245 UN_PARMI('VALE','VALE_I','VALE_C','VALE_F', ),),
4246 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
4247 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4248 MAILLE =SIMP(statut='f',typ=ma,max='**'),
4249 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
4250 NOEUD =SIMP(statut='f',typ=no,max='**'),
4251 NOM_CMP =SIMP(statut='o',typ='TXM',max='**' ),
4252 VALE =SIMP(statut='f',typ='R',max='**' ),
4253 VALE_I =SIMP(statut='f',typ='I',max='**' ),
4254 VALE_C =SIMP(statut='f',typ='C',max='**' ),
4255 VALE_F =SIMP(statut='f',typ=fonction,max='**'),
4258 b_asse =BLOC(condition = "OPERATION == 'ASSE'",
4259 regles=(UN_PARMI('MAILLAGE','MODELE'),EXCLUS('MAILLAGE','PROL_ZERO'),),
4260 MAILLAGE =SIMP(statut='f',typ=(maillage) ),
4261 MODELE =SIMP(statut='f',typ=(modele) ),
4262 PROL_ZERO =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON",) ),
4263 ASSE =FACT(statut='o',min=01,max='**',
4264 regles=(AU_MOINS_UN('TOUT','GROUP_MA','GROUP_NO','MAILLE','NOEUD',),
4265 PRESENT_PRESENT('NOM_CMP_RESU','NOM_CMP', ),),
4266 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
4267 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4268 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
4269 MAILLE =SIMP(statut='f',typ=ma,max='**'),
4270 NOEUD =SIMP(statut='f',typ=no,max='**'),
4271 CHAM_GD =SIMP(statut='o',typ=(cham_gd)),
4272 NOM_CMP =SIMP(statut='f',typ='TXM',max='**' ),
4273 NOM_CMP_RESU =SIMP(statut='f',typ='TXM',max='**' ),
4274 CUMUL =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON",) ),
4275 COEF_R =SIMP(statut='f',typ='R',defaut= 1. ),
4278 b_eval =BLOC(condition = "OPERATION == 'EVAL'",
4279 CHAM_F =SIMP(statut='o',typ=(cham_gd)),
4280 CHAM_PARA =SIMP(statut='o',typ=(cham_gd),max='**'),
4282 b_disc =BLOC(condition = "OPERATION == 'DISC'",
4283 MODELE =SIMP(statut='f',typ=(modele) ),
4284 PROL_ZERO =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON",) ),
4285 CHAM_GD =SIMP(statut='o',typ=(cham_gd)),
4287 b_extr =BLOC(condition = "OPERATION == 'EXTR'",
4288 regles=(UN_PARMI('MAILLAGE','RESULTAT'),),
4289 MAILLAGE =SIMP(statut='f',typ=(maillage) ),
4290 RESULTAT =SIMP(statut='f',typ=(resultat) ),
4291 b_extr_maillage =BLOC(condition = "MAILLAGE != None",
4292 NOM_CHAM =SIMP(statut='o',typ='TXM',into=("GEOMETRIE",)),
4294 b_extr_resultat =BLOC(condition = "RESULTAT != None",
4295 regles=(EXCLUS('TYPE_MAXI','NUME_ORDRE','INST','FREQ','NUME_MODE',
4296 'NOEUD_CMP','NOM_CAS','ANGL', ),),
4297 NOM_CHAM =SIMP(statut='o',typ='TXM',
4298 into=("DEPL","VITE","ACCE",
4299 "DEPL_ABSOLU","VITE_ABSOLU",
4300 "TEMP","IRRA","ACCE_ABSOLU",
4301 "FORC_NODA","REAC_NODA","EFGE_NOEU_DEPL",
4302 "EFGE_NOEU_CART","EPSI_NOEU_DEPL",
4303 "SIGM_NOEU_DEPL","SIGM_NOEU_CART",
4304 "SIPO_NOEU_DEPL","EQUI_NOEU_SIGM",
4305 "EQUI_NOEU_EPSI","FLUX_NOEU_TEMP",
4306 "FLUX_ELGA_TEMP","FLUX_ELNO_TEMP",
4307 "META_ELGA_TEMP","META_ELNO_TEMP",
4308 "META_NOEU_TEMP","DURT_ELGA_META",
4309 "DURT_ELNO_META","DURT_NOEU_META","SIEF_ELGA",
4310 "SIEF_ELNO_ELGA","SIEF_ELGA_DEPL",
4311 "VARI_ELNO_ELGA","VARI_ELGA","EPOT_ELEM_DEPL",
4312 "ECIN_ELEM_DEPL","SOUR_ELGA_ELEC",
4313 "PRES_ELNO_REEL","PRES_ELNO_IMAG",
4314 "PRES_ELNO_DBEL","INTE_ELNO_ACTI",
4315 "INTE_ELNO_REAC","EFGE_ELNO_DEPL",
4316 "SIGM_ELNO_DEPL","EFGE_ELNO_CART",
4317 "SIGM_ELNO_CART","SIPO_ELNO_DEPL",
4318 "EPSI_ELNO_DEPL","EPSI_ELGA_DEPL",
4319 "EPSG_ELNO_DEPL","EPSG_ELGA_DEPL","EPSP_ELNO",
4320 "EPSP_ELGA","EQUI_ELNO_SIGM","EQUI_ELGA_SIGM",
4321 "EQUI_ELNO_EPSI","EQUI_ELGA_EPSI",
4322 "ERRE_ELNO_ELGA","ERRE_ELGA_NORE",
4323 "ERRE_ELEM_NOZ1","ERRE_ELEM_NOZ2",
4324 "SIGM_NOZ1_ELGA","SIGM_NOZ2_ELGA",
4325 "DEGE_ELNO_DEPL","SIRE_ELNO_DEPL",
4326 "VNOR_ELEM_DEPL","SIEF_ELNO","VARI_ELNO",
4327 "SIEF_NOEU_ELGA","VARI_NOEU_ELGA",
4328 "PRES_NOEU_DBEL","PRES_NOEU_REEL",
4329 "PRES_NOEU_IMAG","INTE_NOEU_ACTI",
4330 "INTE_NOEU_REAC","DCHA_ELGA_SIGM",
4331 "DCHA_ELNO_SIGM","RADI_ELGA_SIGM",
4332 "RADI_ELNO_SIGM","ENDO_ELNO_SIGA",
4333 "ENDO_ELNO_SINO","ENDO_ELNO_SIGM",
4334 "SIGM_ELNO_VARI","SIGM_NOEU_VARI",
4335 "EPME_ELNO_DEPL","EPME_ELGA_DEPL",
4336 "EPME_ELNO_DPGE","EPMG_ELNO_DEPL",
4337 "EPMG_ELGA_DEPL","GRAD_ELGA_THETA",
4338 "GTHE_ELNO_ELGA","GRAD_NOEU_THETA",
4339 "HYDR_ELGA","HYDR_ELNO_ELGA","HYDR_NOEU_ELGA",
4340 "THETA","SIGM_ELNO_SIEF","SIPO_ELNO_SIEF",
4342 TYPE_MAXI =SIMP(statut='f',typ='TXM',into=("MAXI","MINI","MAXI_ABS","MINI_ABS","NORM_TRAN",) ),
4343 TYPE_RESU =SIMP(statut='f',typ='TXM',defaut="VALE",into=("VALE","INST",) ),
4344 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
4345 LIST_INST =SIMP(statut='f',typ=(listr8) ),
4346 NUME_ORDRE =SIMP(statut='f',typ='I'),
4347 INST =SIMP(statut='f',typ='R'),
4348 FREQ =SIMP(statut='f',typ='R'),
4349 NUME_MODE =SIMP(statut='f',typ='I'),
4350 NOEUD_CMP =SIMP(statut='f',typ='TXM',max='**'),
4351 NOM_CAS =SIMP(statut='f',typ='TXM'),
4352 ANGL =SIMP(statut='f',typ='R'),
4353 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3),
4354 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU",) ),
4355 INTERPOL =SIMP(statut='f',typ='TXM',defaut="NON",into=("NON","LIN",) ),
4359 # FIN DU CATALOGUE : INFO,TITRE ET TYPAGE DU RESULAT :
4360 #-----------------------------------------------------
4361 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2,) ),
4362 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
4364 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
4365 # CONFIGURATION MANAGEMENT OF EDF VERSION
4366 # ======================================================================
4367 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4368 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4369 # REDISTRIBUTION OF THIS FILE.
4370 # ======================================================================
4371 CREA_MAILLAGE=OPER(nom="CREA_MAILLAGE",op= 167,sd_prod=maillage,
4372 docu="U4.23.02-c",reentrant='n',
4373 regles=(EXCLUS('ECLA_PG','CREA_MAILLE'),
4374 EXCLUS('ECLA_PG','CREA_GROUP_MA'),
4375 EXCLUS('ECLA_PG','DETR_GROUP_MA'),
4376 EXCLUS('ECLA_PG','MODI_MAILLE'),),
4377 MAILLAGE =SIMP(statut='o',typ=maillage ),
4378 CREA_POI1 =FACT(statut='f',min=01,max='**',fr="Création de mailles de type POI1 à partir de noeuds",
4379 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE','GROUP_NO','NOEUD' ),),
4380 NOM_GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4381 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
4382 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4383 MAILLE =SIMP(statut='f',typ=ma,max='**'),
4384 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
4385 NOEUD =SIMP(statut='f',typ=no,max='**'),
4387 CREA_MAILLE =FACT(statut='f',min=01,max='**',fr="Duplication de mailles",
4388 regles=(AU_MOINS_UN('TOUT','MAILLE','GROUP_MA'),),
4389 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
4390 MAILLE =SIMP(statut='f',typ=ma,max='**'),
4391 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4392 PREF_MAILLE =SIMP(statut='o',typ='TXM' ),
4393 PREF_NUME =SIMP(statut='f',typ='I' ),
4395 CREA_GROUP_MA =FACT(statut='f',min=01,max='**',fr="Duplication de mailles et création de groupes de mailles",
4396 regles=(AU_MOINS_UN('TOUT','MAILLE','GROUP_MA' ),),
4397 NOM =SIMP(statut='o',typ='TXM'),
4398 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
4399 MAILLE =SIMP(statut='f',typ=ma,max='**'),
4400 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4401 PREF_MAILLE =SIMP(statut='o',typ='TXM' ),
4402 PREF_NUME =SIMP(statut='f',typ='I' ),
4404 DETR_GROUP_MA =FACT(statut='f',min=01,max=01,fr="Destruction de groupes de mailles",
4405 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4406 NB_MAILLE =SIMP(statut='f',typ='I',defaut= 0,
4407 fr="Nombre minimal de mailles que doit contenir le groupe pour etre détruit", ),
4409 MODI_MAILLE =FACT(statut='f',min=01,max='**',fr="Modification du type de mailles",
4410 regles=(AU_MOINS_UN('TOUT','MAILLE','GROUP_MA' ),),
4411 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
4412 MAILLE =SIMP(statut='f',typ=grma,max='**'),
4413 GROUP_MA =SIMP(statut='f',typ=ma,max='**'),
4414 OPTION =SIMP(statut='o',typ='TXM',into=("TRIA6_7","QUAD8_9","SEG3_4"),fr="Choix de la transformation" ),
4415 PREF_NOEUD =SIMP(statut='f',typ='TXM',defaut="NS"),
4416 PREF_NUME =SIMP(statut='f',typ='I',defaut= 1 ),
4418 REPERE =FACT(statut='f',min=01,max='**',
4419 fr="changement de repère servant à déterminer les caractéristiques d une section de poutre",
4420 TABLE =SIMP(statut='o',typ=tabl_cara_geom,
4421 fr="Nom de la table contenant les caractéristiques de la section de poutre" ),
4422 NOM_ORIG =SIMP(statut='f',typ='TXM',into=("CDG","TORSION"),fr="Origine du nouveau repère" ),
4423 NOM_ROTA =SIMP(statut='f',typ='TXM',into=("INERTIE",),fr="Direction du repére" ),
4424 b_cdg =BLOC(condition = "NOM_ORIG == 'CDG'",
4425 GROUP_MA =SIMP(statut='f',typ=grma,
4426 fr="Nom du groupe de mailles dont le centre de gravité sera l origine du nouveau repère"),
4429 ECLA_PG =FACT(statut='f',min=01,max=01,
4430 fr="Eclatement des mailles en petites mailles contenant chacune un seul point de gauss",
4431 MODELE =SIMP(statut='o',typ=modele ),
4432 SHRINK =SIMP(statut='f',typ='R',defaut= 0.9, fr="Facteur de réduction" ),
4434 TITRE =SIMP(statut='f',typ='TXM',max='**'),
4436 #& MODIF COMMANDE DATE 07/01/2002 AUTEUR D6BHHJP J.P.LEFEBVRE
4437 # CONFIGURATION MANAGEMENT OF EDF VERSION
4438 # ======================================================================
4439 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4440 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4441 # REDISTRIBUTION OF THIS FILE.
4442 # ======================================================================
4443 def crea_resu_prod(TYPE_RESU,**args):
4444 if TYPE_RESU == "EVOL_ELAS" : return evol_elas
4445 if TYPE_RESU == "EVOL_NOLI" : return evol_noli
4446 if TYPE_RESU == "EVOL_THER" : return evol_ther
4447 if TYPE_RESU == "MULT_ELAS" : return mult_elas
4448 if TYPE_RESU == "FOURIER_ELAS" : return fourier_elas
4449 if TYPE_RESU == "EVOL_VARC" : return evol_varc
4450 raise AsException("type de concept resultat non prevu")
4452 CREA_RESU=OPER(nom="CREA_RESU",op=124,sd_prod=crea_resu_prod,docu="U4.44.12-d1",reentrant='f',
4453 fr="Engendrer ou enrichir une structure de donnees en affectant les cham_gd associes",
4455 OPERATION =SIMP(statut='o',typ='TXM',into=("AFFE","ECLA_PG","PERM_CHAM","PROL_RTZ",),
4456 fr="choix de la fonction a activer",),
4458 b_affe =BLOC(condition = "OPERATION == 'AFFE'",
4460 TYPE_RESU =SIMP(statut='o',typ='TXM',into=("MULT_ELAS","EVOL_ELAS","EVOL_NOLI","FOURIER_ELAS",
4461 "EVOL_THER","EVOL_VARC",) ),
4462 NOM_CHAM =SIMP(statut='f',typ='TXM',into=("DEPL","TEMP","IRRA","HYDR_ELGA",),max=1 ),
4463 AFFE =FACT(statut='f',min=01,max='**',
4464 regles=(UN_PARMI('NOM_CAS','NUME_MODE','LIST_INST','INST',),),
4465 CHAM_GD =SIMP(statut='f',typ=(cham_gd)),
4466 NUME_ORDRE_INIT =SIMP(statut='f',typ='I'),
4467 NOM_CAS =SIMP(statut='f',typ='TXM' ),
4468 NUME_MODE =SIMP(statut='f',typ='I'),
4469 TYPE_MODE =SIMP(statut='f',typ='TXM',defaut="SYME",into=("SYME","ANTI","TOUS") ),
4470 INST =SIMP(statut='f',typ='R',max='**'),
4471 LIST_INST =SIMP(statut='f',typ=listr8),
4472 NUME_INIT =SIMP(statut='f',typ='I'),
4473 NUME_FIN =SIMP(statut='f',typ='I'),
4477 b_ecla_pg =BLOC(condition = "OPERATION == 'ECLA_PG'",
4479 TYPE_RESU =SIMP(statut='o',typ='TXM',into=("EVOL_ELAS","EVOL_NOLI","EVOL_THER"), ),
4481 ECLA_PG =FACT(statut='f',min=01,max=01,
4482 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','LIST_INST','LIST_ORDRE'),),
4483 NOM_CHAM =SIMP(statut='o',typ='TXM',max='**',
4484 into=("SIEF_ELGA","VARI_ELGA","SIEF_ELGA_DEPL","FLUX_ELGA_TEMP",) ),
4485 MODELE_INIT =SIMP(statut='o',typ=modele),
4486 RESU_INIT =SIMP(statut='o',typ=resultat),
4487 MAILLAGE =SIMP(statut='o',typ=maillage),
4488 TOUT_ORDRE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI",) ),
4489 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
4490 LIST_ORDRE =SIMP(statut='f',typ=listis),
4491 INST =SIMP(statut='f',typ='R',max='**'),
4492 LIST_INST =SIMP(statut='f',typ=listr8),
4493 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3),
4494 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU",) ),
4498 b_perm_cham =BLOC(condition = "OPERATION == 'PERM_CHAM'",
4500 TYPE_RESU =SIMP(statut='o',typ='TXM',into=("EVOL_NOLI",) ),
4501 NOM_CHAM =SIMP(statut='f',typ='TXM',into=("DEPL","SIEF_ELGA","VARI_ELGA",),max='**' ),
4502 RESU_INIT =SIMP(statut='o',typ=evol_noli),
4503 INST_INIT =SIMP(statut='f',typ='R'),
4504 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3),
4505 CRITERE =SIMP(statut='f',typ='TXM',into=('RELATIF','ABSOLU'),defaut='RELATIF'),
4506 MAILLAGE_INIT =SIMP(statut='o',typ=maillage,),
4507 RESU_FINAL =SIMP(statut='o',typ=evol_noli,),
4508 MAILLAGE_FINAL =SIMP(statut='o',typ=maillage,),
4509 PERM_CHAM =FACT(statut='o',min=01,max=01,
4510 GROUP_MA_FINAL =SIMP(statut='o',typ=grma),
4511 GROUP_MA_INIT =SIMP(statut='o',typ=grma),
4512 TRAN =SIMP(statut='o',typ='R',max='**'),
4513 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3),
4517 b_prol_rtz =BLOC(condition = "OPERATION == 'PROL_RTZ'",
4519 TYPE_RESU =SIMP(statut='o',typ='TXM',into=("EVOL_THER",) ),
4521 PROL_RTZ =FACT(statut='f',min=01,max=01,
4522 regles=(EXCLUS('INST','LIST_INST'),),
4523 MAILLAGE_FINAL =SIMP(statut='o',typ=maillage,),
4524 TABLE =SIMP(statut='o',typ=tabl_post_rele,fr="Table issue de post_releve_t"),
4525 INST =SIMP(statut='f',typ='R',max='**'),
4526 LIST_INST =SIMP(statut='f',typ=listr8),
4527 b_acce_reel =BLOC(condition="(INST != None)or(LIST_INST != None)",
4528 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-6),
4529 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
4531 PROL_DROITE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU",),),
4532 PROL_GAUCHE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU",),),
4533 REPERE =SIMP(statut='o',typ='TXM',into=("CYLINDRIQUE",),),
4534 ORIGINE =SIMP(statut='o',typ='R',min=03,max=03),
4535 AXE_Z =SIMP(statut='o',typ='R',min=03,max=03),
4540 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
4541 # CONFIGURATION MANAGEMENT OF EDF VERSION
4542 # ======================================================================
4543 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4544 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4545 # REDISTRIBUTION OF THIS FILE.
4546 # ======================================================================
4547 DEBUT=MACRO(nom="DEBUT",op=0 ,docu="U4.11.01-f1",repetable='n',
4548 fr="Ouverture d une étude. Allocation des ressources mémoire et disque",
4551 PAR_LOT =SIMP(fr="mode de traitement des commandes",statut='f',typ='TXM',
4552 into=("OUI","NON"),defaut="OUI"),
4553 BASE =FACT(fr="définition des paramètres associés aux bases JEVEUX",
4554 statut='f',min=01,max=03,
4555 FICHIER =SIMP(fr="nom de la base",statut='o',typ='TXM',
4556 into=('GLOBALE','VOLATILE','LOCALE'),),
4557 TITRE =SIMP(statut='f',typ='TXM'),
4558 CAS =SIMP(statut='f',typ='TXM'),
4559 NMAX_ENRE =SIMP(fr="nombre maximum d enregistrements",statut='f',typ='I'),
4560 LONG_ENRE =SIMP(fr="longueur des enregistrements",statut='f',typ='I'),
4561 LONG_REPE =SIMP(fr="longueur du répertoire",statut='f',typ='I'),
4563 IMPRESSION =FACT(statut='f',min=01,max=03,
4564 FICHIER =SIMP(statut='o',typ='TXM'),
4565 UNITE =SIMP(statut='o',typ='I'),
4567 CATALOGUE =FACT(statut='f',min=01,max=10,
4568 FICHIER =SIMP(statut='o',typ='TXM'),
4569 TITRE =SIMP(statut='f',typ='TXM'),
4570 UNITE =SIMP(statut='f',typ='I'),
4572 CODE =FACT("définition d un nom pour l'esemble d'une étude",
4573 statut='f',min=01,max=01,
4574 NOM =SIMP(statut='o',typ='TXM'),
4575 UNITE =SIMP(statut='f',typ='I',defaut=15),
4577 DEBUG =FACT(fr="option de déboggage reservée aux développeurs",
4578 statut='f',min=01,max=01,
4579 JXVERI =SIMP(fr="vérifie l intégrité de la segmentation mémoire",
4580 statut='f',typ='TXM',into=('OUI','NON'),defaut='NON'),
4581 JEVEUX =SIMP(fr="force les déchargement sur disque",
4582 statut='f',typ='TXM',into=('OUI','NON'),defaut='NON'),
4583 ENVIMA =SIMP(fr="imprime les valeurs définies dans ENVIMA",
4584 statut='f',typ='TXM',into=('TEST',)),
4586 MEMOIRE =FACT(fr="mode de gestion mémoire utilisé",statut='f',min=01,max=01,
4587 GESTION =SIMP(statut='f',typ='TXM',into=('COMPACTE','RAPIDE'),defaut='RAPIDE'),
4588 TYPE_ALLOCATION =SIMP(statut='f',typ='I',into=(1,2,3,4),defaut=1),
4589 TAILLE =SIMP(statut='f',typ='I'),
4590 TAILLE_BLOC =SIMP(statut='f',typ='R',defaut=800.),
4591 PARTITION =SIMP(statut='f',typ='R'),
4594 #& MODIF COMMANDE DATE 19/12/2001 AUTEUR CIBHHPD D.NUNEZ
4595 # CONFIGURATION MANAGEMENT OF EDF VERSION
4596 # ======================================================================
4597 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4598 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4599 # REDISTRIBUTION OF THIS FILE.
4600 # ======================================================================
4601 DEFI_BASE_MODALE=OPER(nom="DEFI_BASE_MODALE",op= 99,sd_prod=base_modale,
4602 docu="U4.64.02-e",reentrant='f',
4603 regles=(UN_PARMI('CLASSIQUE','RITZ','DIAG_MASS'),),
4604 CLASSIQUE =FACT(statut='f',min=01,max=01,
4605 INTERF_DYNA =SIMP(statut='o',typ=interf_dyna_clas ),
4606 MODE_MECA =SIMP(statut='o',typ=mode_meca,max='**' ),
4607 NMAX_MODE =SIMP(statut='f',typ='I',defaut= 10 ),
4609 RITZ =FACT(statut='f',min=01,max='**',
4610 regles=(UN_PARMI('MODE_STAT','MODE_MECA','MULT_ELAS','BASE_MODALE'),),
4611 MODE_MECA =SIMP(statut='f',typ=mode_meca,max='**' ),
4612 NMAX_MODE =SIMP(statut='f',typ='I',defaut= 999 ),
4613 MODE_STAT =SIMP(statut='f',typ=(mode_stat_depl,mode_stat_acce,mode_stat_forc,) ),
4614 MULT_ELAS =SIMP(statut='f',typ=mult_elas ),
4615 BASE_MODALE =SIMP(statut='f',typ=base_modale ),
4617 DIAG_MASS =FACT(statut='f',min=01,max='**',
4618 MODE_MECA =SIMP(statut='o',typ=mode_meca,max='**' ),
4619 MODE_STAT =SIMP(statut='o',typ=(mode_stat_depl,mode_stat_acce,mode_stat_forc,) ),
4621 # le bloc conditionnel remplace-t-il PRESENT_PRESENT('RITZ','NUME_REF'),
4622 # PRESENT_ABSENT('INTERF_DYNA','CLASSIQUE'),
4623 b_ritz =BLOC(condition = "RITZ != None",
4624 INTERF_DYNA =SIMP(statut='f',typ=interf_dyna_clas ),
4625 NUME_REF =SIMP(statut='o',typ=nume_ddl ),
4627 TITRE =SIMP(statut='f',typ='TXM',max='**'),
4628 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
4630 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
4631 # CONFIGURATION MANAGEMENT OF EDF VERSION
4632 # ======================================================================
4633 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4634 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4635 # REDISTRIBUTION OF THIS FILE.
4636 # ======================================================================
4637 DEFI_CABLE_BP=OPER(nom="DEFI_CABLE_BP",op= 180,sd_prod=cabl_precont,
4639 docu="U4.42.04-a",reentrant='n',
4640 MODELE =SIMP(statut='o',typ=modele ),
4641 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
4642 CARA_ELEM =SIMP(statut='o',typ=cara_elem ),
4643 GROUP_MA_BETON =SIMP(statut='o',typ=grma),
4644 DEFI_CABLE =FACT(statut='o',min=1,max='**',
4645 regles=(UN_PARMI('MAILLE','GROUP_MA'),
4646 UN_PARMI('NOEUD_ANCRAGE','GROUP_NO_ANCRAGE'),),
4647 MAILLE =SIMP(statut='f',typ=ma,min=2,max='**'),
4648 GROUP_MA =SIMP(statut='f',typ=grma),
4649 NOEUD_ANCRAGE =SIMP(statut='f',typ=no,max=2),
4650 GROUP_NO_ANCRAGE=SIMP(statut='f',typ=grno,max=2),
4651 TYPE_ANCRAGE =SIMP(statut='o',typ='TXM',min=2,max=2,
4652 into=("ACTIF","PASSIF") ),
4654 TENSION_INIT =SIMP(statut='o',typ='R',val_min=0.E+0 ),
4655 RECUL_ANCRAGE =SIMP(statut='o',typ='R',val_min=0.E+0 ),
4656 RELAXATION =FACT(statut='f',min=0,max=1,
4657 R_J =SIMP(statut='o',typ='R',val_min=0.E+0 ),
4659 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
4661 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
4662 # CONFIGURATION MANAGEMENT OF EDF VERSION
4663 # ======================================================================
4664 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4665 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4666 # REDISTRIBUTION OF THIS FILE.
4667 # ======================================================================
4668 DEFI_CONSTANTE=OPER(nom="DEFI_CONSTANTE",op= 2,sd_prod=fonction,
4669 fr="Définition d une fonction constante",
4670 docu="U4.31.01-f",reentrant='n',
4671 NOM_RESU =SIMP(statut='f',typ='TXM',defaut="TOUTRESU"),
4672 VALE =SIMP(statut='o',typ='R',max=01 ),
4673 TITRE =SIMP(statut='f',typ='TXM',max='**'),
4675 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
4676 # CONFIGURATION MANAGEMENT OF EDF VERSION
4677 # ======================================================================
4678 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4679 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4680 # REDISTRIBUTION OF THIS FILE.
4681 # ======================================================================
4682 DEFI_COQU_MULT=OPER(nom="DEFI_COQU_MULT",op=56,sd_prod=mater,docu="U4.42.03-e",reentrant='n',
4683 fr="Définition d une coque composite couche par couche",
4684 COUCHE =FACT(statut='o',min=01,max='**',
4685 EPAIS =SIMP(statut='o',typ='R',val_min=0.E+0 ),
4686 MATER =SIMP(statut='o',typ=(mater) ),
4687 ORIENTATION =SIMP(statut='f',typ='R',defaut= 0.E+0,
4688 val_min=-90.E+0,val_max=90.E+0 ),
4690 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
4691 IMPRESSION =FACT(statut='f',min=01,max=01,
4692 FICHIER =SIMP(statut='f',typ='TXM',defaut="RESULTAT",
4693 into=("RESULTAT",) ),
4696 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
4697 # CONFIGURATION MANAGEMENT OF EDF VERSION
4698 # ======================================================================
4699 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4700 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4701 # REDISTRIBUTION OF THIS FILE.
4702 # ======================================================================
4703 DEFI_FLUI_STRU=OPER(nom="DEFI_FLUI_STRU",op= 143,sd_prod=type_flui_stru,
4704 docu="U4.25.01-d",reentrant='n',
4705 regles=( UN_PARMI('FAISCEAU_TRANS','GRAPPE','FAISCEAU_AXIAL','COQUE_COAX',),),
4706 FAISCEAU_TRANS =FACT(statut='f',min=01,max='**',
4707 COUPLAGE =SIMP(statut='f',typ='TXM',into=("OUI","NON") ),
4708 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
4709 PROF_VITE_FLUI =SIMP(statut='o',typ=fonction ),
4710 PROF_RHO_F_INT =SIMP(statut='f',typ=fonction ),
4711 PROF_RHO_F_EXT =SIMP(statut='f',typ=fonction ),
4712 NOM_CMP =SIMP(statut='f',typ='TXM',into=("DX","DY","DZ") ),
4713 COEF_MASS_AJOU =SIMP(statut='f',typ='R' ),
4714 TYPE_PAS =SIMP(statut='f',typ='TXM',into=("CARRE_LIGN","TRIA_LIGN") ),
4715 TYPE_RESEAU =SIMP(statut='f',typ='I' ),
4716 UNITE_CD =SIMP(statut='f',typ='I',defaut=70),
4717 UNITE_CK =SIMP(statut='f',typ='I',defaut=71),
4718 PAS =SIMP(statut='f',typ='R' ),
4720 GRAPPE =FACT(statut='f',min=00,max=01,
4721 regles=(ENSEMBLE('GRAPPE_2','NOEUD','CARA_ELEM','MODELE','RHO_FLUI',),
4722 PRESENT_PRESENT('COEF_MASS_AJOU','GRAPPE_2', ),),
4723 # peut on créer un bloc a partir de la valeur de couplage
4724 COUPLAGE =SIMP(statut='o',typ='TXM',into=("OUI","NON") ),
4725 GRAPPE_2 =SIMP(statut='f',typ='TXM',
4726 into=("ASC_CEN","ASC_EXC","DES_CEN","DES_EXC") ),
4727 NOEUD =SIMP(statut='f',typ=no),
4728 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
4729 MODELE =SIMP(statut='f',typ=modele ),
4730 COEF_MASS_AJOU =SIMP(statut='f',typ='R' ),
4731 RHO_FLUI =SIMP(statut='f',typ='R' ),
4732 UNITE_CA =SIMP(statut='f',typ='I',defaut=70),
4733 UNITE_KA =SIMP(statut='f',typ='I',defaut=71),
4735 FAISCEAU_AXIAL =FACT(statut='f',min=01,max='**',
4736 regles=(UN_PARMI('GROUP_MA','TRI_GROUP_MA'),
4737 UN_PARMI('CARA_ELEM','RAYON_TUBE'),
4738 ENSEMBLE('RAYON_TUBE','COOR_TUBE'),
4739 PRESENT_ABSENT('RAYON_TUBE','TRI_GROUP_MA'),
4740 ENSEMBLE('CARA_PAROI','VALE_PAROI'),
4741 ENSEMBLE('LONG_TYPG','LARG_TYPG','EPAI_TYPG','RUGO_TYPG','COEF_TRAI_TYPG','COEF_DPOR_TYPG',
4742 'COOR_GRILLE','TYPE_GRILLE', ),),
4743 # on doit pouvoir mettre des blocs conditionnels mais pas assez d infos pour le faire
4744 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4745 TRI_GROUP_MA =SIMP(statut='f',typ='TXM' ),
4746 VECT_X =SIMP(statut='f',typ='R',max=03),
4747 PROF_RHO_FLUI =SIMP(statut='f',typ=fonction ),
4748 PROF_VISC_CINE =SIMP(statut='f',typ=fonction ),
4749 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
4750 RAYON_TUBE =SIMP(statut='f',typ='R' ),
4751 COOR_TUBE =SIMP(statut='f',typ='R',max='**'),
4752 PESANTEUR =SIMP(statut='f',typ='R',min=04,max=04),
4753 RUGO_TUBE =SIMP(statut='f',typ='R' ),
4754 CARA_PAROI =SIMP(statut='f',typ='TXM',max=05,
4755 into=("YC","ZC","R","HY","HZ") ),
4756 VALE_PAROI =SIMP(statut='f',typ='R',max=05),
4757 ANGL_VRIL =SIMP(statut='f',typ='R' ),
4758 LONG_TYPG =SIMP(statut='f',typ='R',max='**',val_min=0.E+0),
4759 LARG_TYPG =SIMP(statut='f',typ='R',max='**',val_min=0.E+0),
4760 EPAI_TYPG =SIMP(statut='f',typ='R',max='**',val_min=0.E+0),
4761 RUGO_TYPG =SIMP(statut='f',typ='R',max='**',val_min=0.E+0),
4762 COEF_TRAI_TYPG =SIMP(statut='f',typ='R',max='**',val_min=0.E+0),
4763 COEF_DPOR_TYPG =SIMP(statut='f',typ='R',max='**'),
4764 COOR_GRILLE =SIMP(statut='f',typ='R',max='**'),
4765 TYPE_GRILLE =SIMP(statut='f',typ='I',max='**'),
4767 COQUE_COAX =FACT(statut='f',min=00,max=01,
4768 MASS_AJOU =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
4769 GROUP_MA_INT =SIMP(statut='o',typ=grma),
4770 GROUP_MA_EXT =SIMP(statut='o',typ=grma),
4771 VECT_X =SIMP(statut='o',typ='R',max='**'),
4772 CARA_ELEM =SIMP(statut='o',typ=cara_elem ),
4773 MATER_INT =SIMP(statut='o',typ=mater ),
4774 MATER_EXT =SIMP(statut='o',typ=mater ),
4775 RHO_FLUI =SIMP(statut='o',typ='R' ),
4776 VISC_CINE =SIMP(statut='o',typ='R' ),
4777 RUGOSITE =SIMP(statut='o',typ='R' ),
4778 PDC_MOY_1 =SIMP(statut='o',typ='R' ),
4779 PDC_DYN_1 =SIMP(statut='o',typ='R' ),
4780 PDC_MOY_2 =SIMP(statut='o',typ='R' ),
4781 PDC_DYN_2 =SIMP(statut='o',typ='R' ),
4783 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
4785 #& MODIF COMMANDE DATE 23/01/2002 AUTEUR DURAND C.DURAND
4786 # CONFIGURATION MANAGEMENT OF EDF VERSION
4787 # ======================================================================
4788 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4789 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4790 # REDISTRIBUTION OF THIS FILE.
4791 # ======================================================================
4792 DEFI_FONC_ELEC=OPER(nom="DEFI_FONC_ELEC",op=64,sd_prod=fonction,docu="U4.MK.10-e",reentrant='n',
4793 fr="Définition d une fonction du temps pour calculer des forces de LAPLACE",
4794 regles=(UN_PARMI('COUR_PRIN','COUR'),
4795 EXCLUS('COUR','COUR_SECO'), ),
4796 FREQ =SIMP(statut='f',typ='R',defaut= 50.),
4797 SIGNAL =SIMP(statut='f',typ='TXM',defaut="COMPLET",into=("COMPLET","CONTINU") ),
4798 COUR =FACT(statut='f',min=1,max='**',
4799 fr="Définition du courant de court-circuit",
4800 regles=(UN_PARMI('PHI_CC_1','INTC_CC_1'),
4801 UN_PARMI('PHI_CC_2','INTC_CC_2'),),
4802 INTE_CC_1 =SIMP(statut='o',typ='R'),
4803 TAU_CC_1 =SIMP(statut='o',typ='R'),
4804 PHI_CC_1 =SIMP(statut='f',typ='R'),
4805 INTC_CC_1 =SIMP(statut='f',typ='R'),
4806 INTE_CC_2 =SIMP(statut='o',typ='R'),
4807 TAU_CC_2 =SIMP(statut='o',typ='R'),
4808 PHI_CC_2 =SIMP(statut='f',typ='R'),
4809 INTC_CC_2 =SIMP(statut='f',typ='R'),
4810 INST_CC_INIT =SIMP(statut='o',typ='R'),
4811 INST_CC_FIN =SIMP(statut='o',typ='R'),
4813 COUR_PRIN =FACT(statut='f',min=1,max=1,
4814 fr="Définition du courant de court-circuit avec réenclenchement",
4815 regles=(UN_PARMI('PHI_CC_1','INTC_CC_1'),),
4816 INTE_CC_1 =SIMP(statut='o',typ='R'),
4817 TAU_CC_1 =SIMP(statut='o',typ='R'),
4818 PHI_CC_1 =SIMP(statut='f',typ='R'),
4819 INTC_CC_1 =SIMP(statut='f',typ='R'),
4820 INTE_RENC_1 =SIMP(statut='f',typ='R'),
4821 TAU_RENC_1 =SIMP(statut='f',typ='R'),
4822 PHI_RENC_1 =SIMP(statut='f',typ='R'),
4823 INST_CC_INIT =SIMP(statut='o',typ='R'),
4824 INST_CC_FIN =SIMP(statut='o',typ='R'),
4825 INST_RENC_INIT =SIMP(statut='f',typ='R',defaut= 0.0E+0),
4826 INST_RENC_FIN =SIMP(statut='f',typ='R',defaut= 0.0E+0),
4828 COUR_SECO =FACT(statut='f',min=1,max='**',
4829 fr="Définition du courant de court-circuit avec un intervalle de temps différent de celui de COUR_PRIN",
4830 regles=(UN_PARMI('PHI_CC_2','INTC_CC_2'),),
4831 INTE_CC_2 =SIMP(statut='o',typ='R'),
4832 TAU_CC_2 =SIMP(statut='o',typ='R'),
4833 PHI_CC_2 =SIMP(statut='f',typ='R'),
4834 INTC_CC_2 =SIMP(statut='f',typ='R'),
4835 INTE_RENC_2 =SIMP(statut='f',typ='R'),
4836 TAU_RENC_2 =SIMP(statut='f',typ='R'),
4837 PHI_RENC_2 =SIMP(statut='f',typ='R'),
4838 DIST =SIMP(statut='f',typ='R',defaut=1.0E+0),
4840 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
4842 #& MODIF COMMANDE DATE 03/10/2001 AUTEUR DURAND C.DURAND
4843 # CONFIGURATION MANAGEMENT OF EDF VERSION
4844 # ======================================================================
4845 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4846 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4847 # REDISTRIBUTION OF THIS FILE.
4848 # ======================================================================
4849 DEFI_FONC_FLUI=OPER(nom="DEFI_FONC_FLUI",op= 142,sd_prod=fonction,
4850 docu="U4.35.01-c",reentrant='n',
4851 MAILLAGE =SIMP(statut='o',typ=(maillage) ),
4852 NOEUD_INIT =SIMP(statut='o',typ=no),
4853 NOEUD_FIN =SIMP(statut='o',typ=no),
4854 VITE =FACT(statut='o',min=1,max=1,
4855 VALE =SIMP(statut='f',typ='R',defaut= 1. ),
4856 PROFIL =SIMP(statut='o',typ='TXM',into=("UNIFORME","LEONARD") ),
4857 NB_BAV =SIMP(statut='f',typ='I',defaut= 0,into=( 0 , 2 , 3 ) ),
4859 INTERPOL =SIMP(statut='f',typ='TXM',max=2,defaut="LIN",
4860 into=("NON","LIN","LOG") ),
4861 PROL_DROITE =SIMP(statut='f',typ='TXM',defaut="EXCLU",
4862 into=("CONSTANT","LINEAIRE","EXCLU") ),
4863 PROL_GAUCHE =SIMP(statut='f',typ='TXM' ,defaut="EXCLU",
4864 into=("CONSTANT","LINEAIRE","EXCLU") ),
4865 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2 ) ),
4866 TITRE =SIMP(statut='f',typ='TXM',max='**'),
4868 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
4869 # CONFIGURATION MANAGEMENT OF EDF VERSION
4870 # ======================================================================
4871 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4872 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4873 # REDISTRIBUTION OF THIS FILE.
4874 # ======================================================================
4875 # RESPONSABLE MCOURTOI M.COURTOIS
4876 def defi_fonction_prod(VALE,VALE_PARA,VALE_C,NOEUD_PARA,**args):
4877 if VALE != None : return fonction
4878 if VALE_C != None : return fonction_c
4879 if VALE_PARA != None : return fonction
4880 if NOEUD_PARA != None : return fonction
4881 raise AsException("type de concept resultat non prevu")
4883 DEFI_FONCTION=OPER(nom="DEFI_FONCTION",op=3,sd_prod=defi_fonction_prod
4884 ,fr="Définition des valeurs réelles ou complexes d une fonction réelle",
4885 docu="U4.31.02-f1",reentrant='n',
4886 regles=(UN_PARMI('VALE','VALE_C','VALE_PARA','NOEUD_PARA'),),
4887 NOM_PARA =SIMP(statut='o',typ='TXM',
4888 into=("DX","DY","DZ","DRX","DRY","DRZ","TEMP",
4889 "INST","X","Y","Z","EPSI","META","FREQ","PULS",
4890 "AMOR","ABSC","SIGM","HYDR","SECH","PORO","SAT",
4891 "PGAZ","PCAP","VITE") ),
4892 NOM_RESU =SIMP(statut='f',typ='TXM',defaut="TOUTRESU"),
4893 VALE =SIMP(statut='f',typ='R',min=2,max='**',
4894 fr ="Fonction réelle définie par une liste de couples (abscisse,ordonnée)"),
4895 VALE_C =SIMP(statut='f',typ='R',min=2,max='**',
4896 fr ="Fonction complexe définie par une liste de couples"),
4897 VALE_PARA =SIMP(statut='f',typ=listr8,
4898 fr ="Fonction réelle définie par deux concepts de type listr8" ),
4899 b_vale_para =BLOC(condition = "VALE_PARA != None",
4900 VALE_FONC =SIMP(statut='o',typ=listr8 ),
4902 NOEUD_PARA =SIMP(statut='f',typ=no,max='**',
4903 fr ="Fonction réelle définie par une liste de noeuds et un maillage"),
4904 b_noeud_para =BLOC(condition = "NOEUD_PARA != None",
4905 MAILLAGE =SIMP(statut='o',typ=maillage ),
4906 VALE_Y =SIMP(statut='o',typ='R',max='**'),
4909 INTERPOL =SIMP(statut='f',typ='TXM',max=2,defaut="LIN",into=("NON","LIN","LOG") ),
4910 PROL_DROITE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU") ),
4911 PROL_GAUCHE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU") ),
4912 VERIF =SIMP(statut='f',typ='TXM',defaut="CROISSANT",into=("CROISSANT","NON") ),
4913 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
4914 TITRE =SIMP(statut='f',typ='TXM',max='**'),
4916 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
4917 # CONFIGURATION MANAGEMENT OF EDF VERSION
4918 # ======================================================================
4919 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4920 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4921 # REDISTRIBUTION OF THIS FILE.
4922 # ======================================================================
4923 DEFI_FOND_FISS=OPER(nom="DEFI_FOND_FISS",op=55,sd_prod=fond_fiss,docu="U4.82.01-e",reentrant='n',
4924 fr="Définition de lèvres et d un fond de fissure en 3D",
4925 regles=(UN_PARMI('FOND','FOND_FERME'),
4926 EXCLUS('FOND_FERME','DTAN_ORIG'),
4927 EXCLUS('FOND_FERME','DTAN_EXTR'),
4928 EXCLUS('FOND_FERME','VECT_GRNO_ORIG'),
4929 EXCLUS('FOND_FERME','VECT_GRNO_EXTR'),
4930 UN_PARMI('LEVRE_SUP','NORMALE'),
4931 EXCLUS('LEVRE_INF','NORMALE'),
4932 ENSEMBLE('DTAN_ORIG','DTAN_EXTR'),
4933 ENSEMBLE('VECT_GRNO_ORIG','VECT_GRNO_EXTR'),
4934 EXCLUS('DTAN_ORIG','VECT_GRNO_ORIG'),
4935 EXCLUS('DTAN_EXTR','VECT_GRNO_EXTR') ,),
4936 MAILLAGE =SIMP(statut='o',typ=maillage ),
4937 FOND =FACT(statut='f',min=01,max=01,
4938 regles=(UN_PARMI('GROUP_NO','NOEUD','GROUP_MA','MAILLE'),
4939 EXCLUS('NOEUD_ORIG','GROUP_NO_ORIG'),
4940 EXCLUS('NOEUD_EXTR','GROUP_NO_EXTR'),),
4941 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
4942 NOEUD =SIMP(statut='f',typ=no,max='**'),
4943 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4944 MAILLE =SIMP(statut='f',typ=ma,max='**'),
4945 # à mettre à jour le max vaut-il 1
4946 NOEUD_ORIG =SIMP(statut='f',typ=no,max=1),
4947 GROUP_NO_ORIG =SIMP(statut='f',typ=grno,max=1),
4948 NOEUD_EXTR =SIMP(statut='f',typ=no,max=1),
4949 GROUP_NO_EXTR =SIMP(statut='f',typ=grno,max=1),
4951 FOND_FERME =FACT(statut='f',min=01,max=01,
4952 regles=(UN_PARMI('GROUP_NO','NOEUD','GROUP_MA','MAILLE'),
4953 EXCLUS('NOEUD_ORIG','GROUP_NO_ORIG'),),
4954 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
4955 NOEUD =SIMP(statut='f',typ=no,max='**'),
4956 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4957 MAILLE =SIMP(statut='f',typ=ma,max='**'),
4958 NOEUD_ORIG =SIMP(statut='f',typ=no,max=1),
4959 GROUP_NO_ORIG =SIMP(statut='f',typ=grno,max=1),
4960 MAILLE_ORIG =SIMP(statut='f',typ=ma,max=1),
4961 GROUP_MA_ORIG =SIMP(statut='f',typ=ma,max=1),
4963 LEVRE_SUP =FACT(statut='f',min=01,max=01,
4964 regles=(UN_PARMI('GROUP_MA','MAILLE'),),
4965 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4966 MAILLE =SIMP(statut='f',typ=ma,max='**'),
4968 LEVRE_INF =FACT(statut='f',min=01,max=01,
4969 regles=(UN_PARMI('GROUP_MA','MAILLE', ),),
4970 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
4971 MAILLE =SIMP(statut='f',typ=ma,max='**'),
4973 NORMALE =SIMP(statut='f',typ='R',max='**'),
4974 DTAN_ORIG =SIMP(statut='f',typ='R',max='**'),
4975 DTAN_EXTR =SIMP(statut='f',typ='R',max='**'),
4976 VECT_GRNO_ORIG =SIMP(statut='f',typ=grno,max=2),
4977 VECT_GRNO_EXTR =SIMP(statut='f',typ=grno,max=2),
4978 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
4980 #& MODIF COMMANDE DATE 30/01/2002 AUTEUR VABHHTS J.TESELET
4981 # CONFIGURATION MANAGEMENT OF EDF VERSION
4982 # ======================================================================
4983 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
4984 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
4985 # REDISTRIBUTION OF THIS FILE.
4986 # ======================================================================
4987 # RESPONSABLE VABHHTS J.PELLET
4988 def defi_group_prod(MAILLAGE,**args):
4989 if AsType(MAILLAGE) == maillage : return maillage
4990 if AsType(MAILLAGE) == squelette : return squelette
4991 raise AsException("type de concept resultat non prevu")
4993 DEFI_GROUP=OPER(nom="DEFI_GROUP",op= 104,sd_prod=defi_group_prod,
4994 fr="Définition de nouveaux groupes de noeuds et/ou de mailles dans un concept maillage",
4995 docu="U4.22.01-e",reentrant='o',
4996 regles=(AU_MOINS_UN('CREA_GROUP_MA','CREA_GROUP_NO'),),
4997 MAILLAGE =SIMP(statut='o',typ=(maillage,squelette) ),
4999 CREA_GROUP_MA =FACT(statut='f',min=01,max='**',
5000 regles=(UN_PARMI('TOUT','GROUP_MA','MAILLE','INTERSEC','UNION','DIFFE','OPTION'),),
5001 # quel est le concept attendu deriere NOM
5002 NOM =SIMP(statut='o',typ=grma),
5003 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
5004 GROUP_MA =SIMP(statut='f',typ=grma),
5005 MAILLE =SIMP(statut='f',typ=ma,max='**'),
5006 INTERSEC =SIMP(statut='f',typ=grma,max='**'),
5007 UNION =SIMP(statut='f',typ=grma,max='**'),
5008 DIFFE =SIMP(statut='f',typ=grma,max='**'),
5009 OPTION =SIMP(statut='f',typ='TXM',into=("FACE_NORMALE","SPHERE","CYLINDRE","BANDE") ),
5010 b_group_ma =BLOC(condition = "GROUP_MA != None",
5011 regles=(EXCLUS('POSITION','NUME_INIT'),),
5012 NUME_INIT =SIMP(statut='f',typ='I',defaut= 1 ),
5013 POSITION =SIMP(statut='f',typ='TXM',into=("INIT","FIN","MILIEU") ),
5014 b_nume_init =BLOC(condition = "NUME_INIT != None",
5015 NUME_FIN =SIMP(statut='f',typ='I' ),
5018 b_face_normale =BLOC(condition = "OPTION == 'FACE_NORMALE'",
5019 regles=(UN_PARMI('ANGL_NAUT','VECT_NORMALE'),),
5020 ANGL_NAUT =SIMP(statut='f',typ='R',max=02),
5021 VECT_NORMALE =SIMP(statut='f',typ='R',max=03),
5022 ANGL_PREC =SIMP(statut='f',typ='R',defaut= 0.5 ),
5023 VERI_SIGNE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
5025 b_sphere =BLOC(condition = "OPTION == 'SPHERE'",
5026 regles=(UN_PARMI('POINT','NOEUD_CENTRE'),),
5027 POINT =SIMP(statut='f',typ='R',max=03),
5028 NOEUD_CENTRE =SIMP(statut='f',typ=no),
5029 RAYON =SIMP(statut='o',typ='R' ),
5031 b_cylindre =BLOC(condition = "OPTION == 'CYLINDRE'",
5032 regles=(UN_PARMI('POINT','NOEUD_CENTRE'),
5033 UN_PARMI('ANGL_NAUT','VECT_NORMALE'),),
5034 POINT =SIMP(statut='f',typ='R',max=03),
5035 NOEUD_CENTRE =SIMP(statut='f',typ=no),
5036 RAYON =SIMP(statut='o',typ='R' ),
5037 ANGL_NAUT =SIMP(statut='f',typ='R',max=02),
5038 VECT_NORMALE =SIMP(statut='f',typ='R',max=03),
5040 b_bande =BLOC(condition = "OPTION == 'BANDE'",
5041 regles=(UN_PARMI('POINT','NOEUD_CENTRE'),
5042 UN_PARMI('ANGL_NAUT','VECT_NORMALE'),),
5043 POINT =SIMP(statut='f',typ='R',max=03),
5044 NOEUD_CENTRE =SIMP(statut='f',typ=no),
5045 DIST =SIMP(statut='o',typ='R' ),
5046 ANGL_NAUT =SIMP(statut='f',typ='R',max=02),
5047 VECT_NORMALE =SIMP(statut='f',typ='R',max=03),
5050 CREA_GROUP_NO =FACT(statut='f',min=01,max='**',
5052 AU_MOINS_UN ('TOUT_GROUP_MA','GROUP_MA','NOEUD',
5053 'INTERSEC','UNION','DIFFE','GROUP_NO','OPTION'),
5054 EXCLUS ('TOUT_GROUP_MA','GROUP_MA','NOEUD','INTERSEC','UNION','DIFFE'),),
5055 TOUT_GROUP_MA =SIMP(statut='f',typ='TXM',into=("OUI",) ),
5056 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
5058 NOEUD =SIMP(statut='f',typ=no,max='**'),
5059 INTERSEC =SIMP(statut='f',typ=grno,max='**'),
5060 UNION =SIMP(statut='f',typ=grno,max='**'),
5061 DIFFE =SIMP(statut='f',typ=grno,max='**'),
5062 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
5063 OPTION =SIMP(statut='f',typ='TXM',into=("ENV_SPHERE","ENV_CYLINDRE","PLAN",
5064 "SEGM_DROI_ORDO","NOEUD_ORDO") ),
5065 b_nom_group_ma =BLOC(condition = "GROUP_MA != None",
5066 NOM =SIMP(statut='f',typ=grma,max='**'),
5068 b_crit_noeud = BLOC(condition = "GROUP_MA != None",
5069 CRIT_NOEUD = SIMP(statut='f',typ='TXM',defaut="TOUS",
5070 into=("TOUS","SOMMET","MILIEU","CENTRE"),),),
5071 b_nom =BLOC(condition = "GROUP_MA == None and TOUT_GROUP_MA == None" ,
5072 NOM =SIMP(statut='o',typ=geom),
5074 b_group_no =BLOC(condition = "GROUP_NO != None",
5075 regles=(EXCLUS('POSITION','NUME_INIT'),),
5076 NUME_INIT =SIMP(statut='f',typ='I',defaut= 1 ),
5077 POSITION =SIMP(statut='f',typ='TXM',into=("INIT","FIN","MILIEU") ),
5078 b_nume_init =BLOC(condition = "NUME_INIT != None",
5079 NUME_FIN =SIMP(statut='f',typ='I' ),
5082 b_env_sphere =BLOC(condition = "OPTION == 'ENV_SPHERE'",
5083 regles=(UN_PARMI('POINT','NOEUD_CENTRE'),),
5084 POINT =SIMP(statut='f',typ='R',max=03),
5085 NOEUD_CENTRE =SIMP(statut='f',typ=no,max=01),
5086 RAYON =SIMP(statut='o',typ='R' ),
5087 PRECISION =SIMP(statut='f',typ='R' ),
5088 CRITERE =SIMP(statut='f',typ='TXM',into=("ABSOLU","RELATIF") ),
5090 b_env_cylindre =BLOC(condition = "OPTION == 'ENV_CYLINDRE'",
5091 regles=(UN_PARMI('POINT','NOEUD_CENTRE'),
5092 UN_PARMI('ANGL_NAUT','VECT_NORMALE'),),
5093 POINT =SIMP(statut='f',typ='R',max=03),
5094 NOEUD_CENTRE =SIMP(statut='f',typ=no,max=01),
5095 RAYON =SIMP(statut='o',typ='R' ),
5096 ANGL_NAUT =SIMP(statut='f',typ='R',max=03),
5097 VECT_NORMALE =SIMP(statut='f',typ='R',max=03),
5098 PRECISION =SIMP(statut='f',typ='R' ),
5099 CRITERE =SIMP(statut='f',typ='TXM',into=("ABSOLU","RELATIF") ),
5101 b_env_plan =BLOC(condition = "OPTION == 'PLAN'",
5102 regles=(UN_PARMI('POINT','NOEUD_CENTRE'),
5103 UN_PARMI('ANGL_NAUT','VECT_NORMALE'),),
5104 POINT =SIMP(statut='f',typ='R',max=03),
5105 NOEUD_CENTRE =SIMP(statut='f',typ=no,max=01),
5106 ANGL_NAUT =SIMP(statut='f',typ='R',max=03),
5107 VECT_NORMALE =SIMP(statut='f',typ='R',max=03),
5108 PRECISION =SIMP(statut='f',typ='R' ),
5109 CRITERE =SIMP(statut='f',typ='TXM',into=("ABSOLU","RELATIF") ),
5111 b_segm_droi_ordo=BLOC(condition = "OPTION == 'SEGM_DROI_ORDO'",
5112 regles=(UN_PARMI('NOEUD_ORIG','GROUP_NO_ORIG'),
5113 UN_PARMI('NOEUD_EXTR','GROUP_NO_EXTR'),),
5114 NOEUD_ORIG =SIMP(statut='f',typ=no),
5115 GROUP_NO_ORIG =SIMP(statut='f',typ=grno),
5116 NOEUD_EXTR =SIMP(statut='f',typ=no),
5117 GROUP_NO_EXTR =SIMP(statut='f',typ=grno),
5118 PRECISION =SIMP(statut='f',typ='R' ),
5119 CRITERE =SIMP(statut='f',typ='TXM',into=("ABSOLU","RELATIF") ),
5121 b_noeud_ordo =BLOC(condition = "OPTION == 'NOEUD_ORDO'",
5122 regles=(UN_PARMI('NOEUD_ORIG','GROUP_NO_ORIG'),
5123 UN_PARMI('NOEUD_EXTR','GROUP_NO_EXTR'),),
5124 NOEUD_ORIG =SIMP(statut='f',typ=no),
5125 GROUP_NO_ORIG =SIMP(statut='f',typ=grno),
5126 NOEUD_EXTR =SIMP(statut='f',typ=no),
5127 GROUP_NO_EXTR =SIMP(statut='f',typ=grno),
5128 PRECISION =SIMP(statut='f',typ='R' ),
5129 CRITERE =SIMP(statut='f',typ='TXM',into=("ABSOLU","RELATIF") ),
5132 INFO =SIMP(statut='f',typ='I',into=( 1 , 2 ) ),
5134 #& MODIF COMMANDE DATE 03/10/2001 AUTEUR DURAND C.DURAND
5135 # CONFIGURATION MANAGEMENT OF EDF VERSION
5136 # ======================================================================
5137 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
5138 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
5139 # REDISTRIBUTION OF THIS FILE.
5140 # ======================================================================
5141 DEFI_INTE_SPEC=OPER(nom="DEFI_INTE_SPEC",op= 115,sd_prod=tabl_intsp,
5142 docu="U4.36.02-e1",reentrant='n',
5144 DIMENSION =SIMP(statut='f',typ='I',defaut= 1 ),
5146 PAR_FONCTION =FACT(statut='f',min=1,max='**',
5147 NUME_ORDRE_I =SIMP(statut='o',typ='I' ),
5148 NUME_ORDRE_J =SIMP(statut='o',typ='I' ),
5149 FONCTION =SIMP(statut='o',typ=fonction_c ),
5151 KANAI_TAJIMI =FACT(statut='f',min=1,max='**',
5152 regles=(EXCLUS('VALE_R','VALE_C'),),
5153 NUME_ORDRE_I =SIMP(statut='o',typ='I' ),
5154 NUME_ORDRE_J =SIMP(statut='o',typ='I' ),
5155 FREQ_MIN =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5156 FREQ_MAX =SIMP(statut='f',typ='R',defaut= 100. ),
5157 PAS =SIMP(statut='f',typ='R',defaut= 1. ),
5158 AMOR_REDUIT =SIMP(statut='f',typ='R',defaut= 0.6 ),
5159 FREQ_MOY =SIMP(statut='f',typ='R',defaut= 5. ),
5160 VALE_R =SIMP(statut='f',typ='R' ),
5161 VALE_C =SIMP(statut='f',typ='C' ),
5162 INTERPOL =SIMP(statut='f',typ='TXM',max=2,defaut="LIN",into=("NON","LIN","LOG") ),
5163 PROL_DROITE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU") ),
5164 PROL_GAUCHE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU") ),
5166 CONSTANT =FACT(statut='f',min=1,max='**',
5167 regles=(EXCLUS('VALE_R','VALE_C'),),
5168 NUME_ORDRE_I =SIMP(statut='o',typ='I' ),
5169 NUME_ORDRE_J =SIMP(statut='o',typ='I' ),
5170 FREQ_MIN =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5171 FREQ_MAX =SIMP(statut='f',typ='R',defaut= 100. ),
5172 PAS =SIMP(statut='f',typ='R',defaut= 1. ),
5173 VALE_R =SIMP(statut='f',typ='R' ),
5174 VALE_C =SIMP(statut='f',typ='C' ),
5175 INTERPOL =SIMP(statut='f',typ='TXM',max=2,defaut="LIN",into=("NON","LIN","LOG") ),
5176 PROL_DROITE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU") ),
5177 PROL_GAUCHE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU") ),
5179 TITRE =SIMP(statut='f',typ='TXM',max='**'),
5180 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
5182 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
5183 # CONFIGURATION MANAGEMENT OF EDF VERSION
5184 # ======================================================================
5185 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
5186 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
5187 # REDISTRIBUTION OF THIS FILE.
5188 # ======================================================================
5189 DEFI_INTERF_DYNA=OPER(nom="DEFI_INTERF_DYNA",op= 98,sd_prod=interf_dyna_clas,
5190 docu="U4.64.01-e",reentrant='n',
5191 NUME_DDL =SIMP(statut='o',typ=nume_ddl ),
5192 INTERFACE =FACT(statut='o',min=01,max='**',
5193 regles=(ENSEMBLE('NOM','TYPE'),
5194 # erreur doc U sur la condition qui suit
5195 UN_PARMI('NOEUD','GROUP_NO'),),
5196 NOM =SIMP(statut='f',typ='TXM' ),
5197 TYPE =SIMP(statut='f',typ='TXM',into=("MNEAL","CRAIGB","CB_HARMO","AUCUN") ),
5198 NOEUD =SIMP(statut='f',typ=no,max='**'),
5199 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
5200 DDL_ACTIF =SIMP(statut='f',typ='TXM',max='**'),
5201 MASQUE =SIMP(statut='f',typ='TXM',max='**'),
5203 FREQ =SIMP(statut='f',typ='R',defaut= 1.),
5204 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
5206 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
5207 # CONFIGURATION MANAGEMENT OF EDF VERSION
5208 # ======================================================================
5209 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
5210 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
5211 # REDISTRIBUTION OF THIS FILE.
5212 # ======================================================================
5213 # RESPONSABLE VABHHTS J.PELLET
5214 DEFI_LIST_ENTI=OPER(nom="DEFI_LIST_ENTI",op=22,sd_prod=listis,
5215 fr="Définition d une suite croissante d entiers",
5216 docu="U4.34.02-f",reentrant='n',
5217 regles=(UN_PARMI('VALE','DEBUT'),
5218 EXCLUS('VALE','INTERVALLE'),),
5219 VALE =SIMP(statut='f',typ='I',max='**'),
5220 DEBUT =SIMP(statut='f',typ='I'),
5221 INTERVALLE =FACT(statut='f',min=01,max='**',
5222 regles=(UN_PARMI('NOMBRE','PAS'),),
5223 JUSQU_A =SIMP(statut='o',typ='I'),
5224 NOMBRE =SIMP(statut='f',typ='I',val_min=1,),
5225 PAS =SIMP(statut='f',typ='I',val_min=1,),
5227 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
5228 TITRE =SIMP(statut='f',typ='TXM',max='**'),
5230 #& MODIF COMMANDE DATE 07/03/2001 AUTEUR VABHHTS J.PELLET
5231 # CONFIGURATION MANAGEMENT OF EDF VERSION
5232 # ======================================================================
5233 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
5234 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
5235 # REDISTRIBUTION OF THIS FILE.
5236 # ======================================================================
5237 # RESPONSABLE VABHHTS J.PELLET
5238 DEFI_LIST_REEL=OPER(nom="DEFI_LIST_REEL",op=24,sd_prod=listr8,
5239 fr="Définition d une suite croissante de réels",
5240 docu="U4.34.01-f",reentrant='n',
5241 regles=(UN_PARMI('VALE','DEBUT',),
5242 EXCLUS('VALE','INTERVALLE'),
5243 ENSEMBLE('DEBUT','INTERVALLE')),
5244 VALE =SIMP(statut='f',typ='R',max='**'),
5245 DEBUT =SIMP(statut='f',typ='R'),
5246 INTERVALLE =FACT(statut='f',min=01,max='**',
5247 regles=(UN_PARMI('NOMBRE','PAS'),),
5248 JUSQU_A =SIMP(statut='o',typ='R'),
5249 NOMBRE =SIMP(statut='f',typ='I'),
5250 PAS =SIMP(statut='f',typ='R'),
5252 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
5253 TITRE =SIMP(statut='f',typ='TXM',max='**'),
5255 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
5256 # CONFIGURATION MANAGEMENT OF EDF VERSION
5257 # ======================================================================
5258 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
5259 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
5260 # REDISTRIBUTION OF THIS FILE.
5261 # ======================================================================
5262 # RESPONSABLE VABHHTS J.PELLET
5263 DEFI_MAILLAGE=OPER(nom="DEFI_MAILLAGE",op= 88,sd_prod=maillage,
5264 fr="Définition d un nouveau maillage à partir de macro éléments",
5265 docu="U4.23.01-e",reentrant='n',
5266 DEFI_MAILLE =FACT(statut='o',min=01,max='**',
5267 MACR_ELEM_STAT =SIMP(statut='o',typ=macr_elem_stat,max='**' ),
5268 MAILLE =SIMP(statut='f',typ=ma,max='**'),
5269 TRAN =SIMP(statut='f',typ='R',max=03),
5270 ANGL_NAUT =SIMP(statut='f',typ='R',max=03),
5271 b_angl_naut =BLOC(condition = "ANGL_NAUT != None",
5272 CENTRE =SIMP(statut='f',typ='R',max=03),
5275 RECO_GLOBAL =FACT(statut='f',min=01,max='**',
5276 regles=(UN_PARMI('TOUT','MAILLE'),),
5277 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
5278 MAILLE =SIMP(statut='f',typ=ma,max='**'),
5279 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
5280 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
5282 RECO_MAILLE =FACT(statut='f',min=01,max='**',
5283 MAILLE =SIMP(statut='o',typ=ma,max='**'),
5284 GROUP_NO =SIMP(statut='o',typ=grno,max='**'),
5285 OPTION =SIMP(statut='f',typ='TXM',defaut="GEOMETRIQUE",into=("GEOMETRIQUE","NOEUD_A_NOEUD","INVERSE") ),
5286 geometrique =BLOC(condition = "OPTION == 'GEOMETRIQUE'",
5287 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
5288 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
5291 DEFI_NOEUD =FACT(statut='f',min=01,max='**',
5292 regles=(UN_PARMI('TOUT','NOEUD_INIT'),),
5293 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",),
5294 fr="Renommage de tous les noeuds" ),
5295 NOEUD_INIT =SIMP(statut='f',typ=no,
5296 fr="Renommage d un seul noeud"),
5297 b_tout =BLOC(condition = "TOUT != None",
5298 PREFIXE =SIMP(statut='f',typ='TXM' ),
5299 INDEX =SIMP(statut='o',typ='I',max='**'),
5301 b_noeud_init =BLOC(condition = "NOEUD_INIT != None",
5302 MAILLE =SIMP(statut='o',typ=ma),
5303 NOEUD_FIN =SIMP(statut='o',typ=no),
5306 DEFI_GROUP_NO =FACT(statut='f',min=01,max='**',
5307 regles=(UN_PARMI('TOUT','MAILLE'),
5308 AU_MOINS_UN('INDEX','GROUP_NO_FIN'),
5309 ENSEMBLE('GROUP_NO_INIT','GROUP_NO_FIN'),),
5310 # la regle ancien catalogue AU_MOINS_UN__: ( INDEX , GROUP_NO_FIN ) incoherente avec doc U
5311 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",),
5312 fr="Création de plusieurs groupes de noeuds" ),
5313 MAILLE =SIMP(statut='f',typ=ma,
5314 fr="Création de plusieurs groupes de noeuds"),
5315 GROUP_NO_INIT =SIMP(statut='f',typ=grno,
5316 fr="Création d un seul groupe de noeuds"),
5317 PREFIXE =SIMP(statut='f',typ='TXM' ),
5318 INDEX =SIMP(statut='f',typ='I',max='**'),
5319 GROUP_NO_FIN =SIMP(statut='f',typ=grno),
5322 #& MODIF COMMANDE DATE 30/01/2002 AUTEUR VABHHTS J.TESELET
5323 # CONFIGURATION MANAGEMENT OF EDF VERSION
5324 # ======================================================================
5325 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
5326 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
5327 # REDISTRIBUTION OF THIS FILE.
5328 # ======================================================================
5329 DEFI_MATERIAU=OPER(nom="DEFI_MATERIAU",op=5,sd_prod=mater,
5330 fr="Définition des paramètres décrivant le comportement d un matériau",
5331 docu="U4.43.01-f1",reentrant='n',
5332 regles=(EXCLUS('ELAS','ELAS_FO','ELAS_FLUI','ELAS_ISTR','ELAS_ISTR_FO','ELAS_ORTH',
5333 'ELAS_ORTH_FO','ELAS_COQUE','ELAS_COQUE_FO',
5334 'SURF_ETAT_SATU','CAM_CLAY_THM','SURF_ETAT_NSAT'),
5335 EXCLUS('THER','THER_FO','THER_ORTH','THER_NL'),
5336 EXCLUS('ECRO_LINE','ECRO_LINE_FO'),
5337 EXCLUS('TAHERI','TAHERI_FO'),
5338 EXCLUS('ROUSSELIER','ROUSSELIER_FO'),
5339 PRESENT_PRESENT('ROUSSELIER','TRACTION'),
5340 PRESENT_PRESENT('ROUSSELIER_FO','TRACTION'),
5341 EXCLUS('CIN1_CHAB','CIN1_CHAB_FO'),
5342 EXCLUS('CIN2_CHAB','CIN2_CHAB_FO'),
5343 EXCLUS('VISCOCHAB','VISCOCHAB_FO'),
5344 EXCLUS('POLY_CFC','POLY_CFC_FO'),
5345 EXCLUS('LEMAITRE','LEMAITRE_FO','ZIRC_CYRA2','ZIRC_EPRI'),
5346 EXCLUS('OHNO','OHNO_FO'),
5347 EXCLUS('LMARC','LMARC_FO'),
5348 EXCLUS('VMIS_POUTRE','VMIS_POUTRE_FO'),
5349 EXCLUS('VENDOCHAB','VENDOCHAB_FO'),
5350 PRESENT_PRESENT('BPEL_BETON','ELAS'),
5351 PRESENT_PRESENT('BPEL_ACIER','ELAS'),
5352 EXCLUS('RCCM','RCCM_FO'),
5353 EXCLUS('WEIBULL','WEIBULL_FO'),),
5355 # comportement élastique
5357 ELAS =FACT(statut='f',min=0,max=1,
5358 E =SIMP(statut='o',typ='R',val_min=0.E+0),
5359 NU =SIMP(statut='o',typ='R',val_min=-1.E+0,val_max=0.5E+0),
5360 RHO =SIMP(statut='f',typ='R'),
5361 ALPHA =SIMP(statut='f',typ='R'),
5362 AMOR_ALPHA =SIMP(statut='f',typ='R'),
5363 AMOR_BETA =SIMP(statut='f',typ='R'),
5364 AMOR_HYST =SIMP(statut='f',typ='R'),
5366 ELAS_FO =FACT(statut='f',min=0,max=1,
5367 E =SIMP(statut='o',typ=fonction),
5368 NU =SIMP(statut='o',typ=fonction),
5369 RHO =SIMP(statut='f',typ='R'),
5370 TEMP_DEF_ALPHA =SIMP(statut='f',typ='R'),
5371 PRECISION =SIMP(statut='f',typ='R',defaut= 1.),
5372 ALPHA =SIMP(statut='f',typ=fonction),
5373 AMOR_ALPHA =SIMP(statut='f',typ=fonction),
5374 AMOR_BETA =SIMP(statut='f',typ=fonction),
5375 AMOR_HYST =SIMP(statut='f',typ=fonction),
5376 K_DESSIC =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5377 B_ENDOGE =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5378 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP","INST",) ),
5379 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="INST",into=("TEMP","INST",) ),
5380 VERI_P3 =SIMP(statut='c',typ='TXM',defaut="HYDR",into=("HYDR",) ),
5381 VERI_P4 =SIMP(statut='c',typ='TXM',defaut="SECH",into=("SECH",) ),
5383 ELAS_FLUI =FACT(statut='f',min=0,max=1,
5384 E =SIMP(statut='o',typ='R'),
5385 NU =SIMP(statut='o',typ='R'),
5386 RHO =SIMP(statut='o',typ='R'),
5387 PROF_RHO_F_INT =SIMP(statut='o',typ=fonction),
5388 PROF_RHO_F_EXT =SIMP(statut='o',typ=fonction),
5389 COEF_MASS_AJOU =SIMP(statut='o',typ=fonction),
5390 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="ABSC",into=("ABSC",) ),
5392 ELAS_ISTR =FACT(statut='f',min=0,max=1,
5393 E_L =SIMP(statut='o',typ='R'),
5394 E_N =SIMP(statut='o',typ='R'),
5395 NU_LT =SIMP(statut='o',typ='R'),
5396 NU_LN =SIMP(statut='o',typ='R'),
5397 G_LN =SIMP(statut='o',typ='R'),
5398 RHO =SIMP(statut='f',typ='R'),
5399 ALPHA_L =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5400 ALPHA_N =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5402 ELAS_ISTR_FO =FACT(statut='f',min=0,max=1,
5403 E_L =SIMP(statut='o',typ=fonction),
5404 E_N =SIMP(statut='o',typ=fonction),
5405 NU_LT =SIMP(statut='o',typ=fonction),
5406 NU_LN =SIMP(statut='o',typ=fonction),
5407 G_LN =SIMP(statut='o',typ=fonction),
5408 RHO =SIMP(statut='f',typ='R'),
5409 TEMP_DEF_ALPHA =SIMP(statut='f',typ='R'),
5410 PRECISION =SIMP(statut='f',typ='R',defaut= 1.),
5411 ALPHA_L =SIMP(statut='f',typ=fonction),
5412 ALPHA_N =SIMP(statut='f',typ=fonction),
5413 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP","INST")),
5415 ELAS_ORTH =FACT(statut='f',min=0,max=1,
5416 E_L =SIMP(statut='o',typ='R'),
5417 E_T =SIMP(statut='o',typ='R'),
5418 E_N =SIMP(statut='f',typ='R'),
5419 NU_LT =SIMP(statut='o',typ='R'),
5420 NU_LN =SIMP(statut='f',typ='R'),
5421 NU_TN =SIMP(statut='f',typ='R'),
5422 G_LT =SIMP(statut='o',typ='R'),
5423 G_LN =SIMP(statut='f',typ='R'),
5424 G_TN =SIMP(statut='f',typ='R'),
5425 RHO =SIMP(statut='f',typ='R'),
5426 ALPHA_L =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5427 ALPHA_T =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5428 ALPHA_N =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5429 XT =SIMP(statut='f',typ='R',defaut= 1. ),
5430 XC =SIMP(statut='f',typ='R',defaut= 1. ),
5431 YT =SIMP(statut='f',typ='R',defaut= 1. ),
5432 YC =SIMP(statut='f',typ='R',defaut= 1. ),
5433 S_LT =SIMP(statut='f',typ='R',defaut= 1. ),
5435 ELAS_ORTH_FO =FACT(statut='f',min=0,max=1,
5436 E_L =SIMP(statut='o',typ=fonction),
5437 E_T =SIMP(statut='o',typ=fonction),
5438 E_N =SIMP(statut='o',typ=fonction),
5439 NU_LT =SIMP(statut='o',typ=fonction),
5440 NU_LN =SIMP(statut='o',typ=fonction),
5441 NU_TN =SIMP(statut='o',typ=fonction),
5442 G_LT =SIMP(statut='o',typ=fonction),
5443 G_LN =SIMP(statut='o',typ=fonction),
5444 G_TN =SIMP(statut='o',typ=fonction),
5445 RHO =SIMP(statut='f',typ='R'),
5446 TEMP_DEF_ALPHA =SIMP(statut='f',typ='R'),
5447 PRECISION =SIMP(statut='f',typ='R',defaut= 1. ),
5448 ALPHA_L =SIMP(statut='f',typ=fonction),
5449 ALPHA_T =SIMP(statut='f',typ=fonction),
5450 ALPHA_N =SIMP(statut='f',typ=fonction),
5451 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP","INST",) ),
5453 ELAS_THM =FACT(statut='f',min=0,max=1,
5454 RHO_S =SIMP(statut='o',typ='R'),
5455 UN_SUR_KS =SIMP(statut='o',typ='R'),
5456 E =SIMP(statut='f',typ='R'),
5457 KB =SIMP(statut='f',typ='R'),
5458 D_KB_T =SIMP(statut='f',typ='R'),
5459 ALPHA_S =SIMP(statut='f',typ='R'),
5460 ALPHA_D =SIMP(statut='f',typ='R'),
5462 SURF_ETAT_SATU =FACT(statut='f',min=0,max=1,
5463 E_CHAR =SIMP(statut='o',typ='R'),
5464 E_DECHAR =SIMP(statut='o',typ='R'),
5465 XN =SIMP(statut='f',typ='R'),
5466 RF =SIMP(statut='f',typ='R'),
5467 EV_KB =SIMP(statut='f',typ='R'),
5468 EV_XM =SIMP(statut='f',typ='R'),
5469 D_E_T =SIMP(statut='f',typ='R'),
5470 ALPHA0 =SIMP(statut='f',typ='R'),
5471 ALPHA1 =SIMP(statut='f',typ='R'),
5472 ALPHA2 =SIMP(statut='f',typ='R'),
5473 ALPHA3 =SIMP(statut='f',typ='R'),
5474 ALPHA_S =SIMP(statut='f',typ='R'),
5475 ANG_FRT =SIMP(statut='o',typ='R'),
5476 COHE =SIMP(statut='o',typ='R'),
5477 RESI_TRAC =SIMP(statut='o',typ='R'),
5479 CAM_CLAY_THM =FACT(statut='f',min=0,max=1,
5480 NU =SIMP(statut='f',typ='R'),
5481 LAMBDA =SIMP(statut='o',typ='R'),
5482 KAPA =SIMP(statut='o',typ='R'),
5483 M =SIMP(statut='f',typ='R'),
5484 PRES_CRIT =SIMP(statut='f',typ='R'),
5485 GAMA =SIMP(statut='o',typ='R'),
5486 A0_PC =SIMP(statut='o',typ='R'),
5487 A1_PC =SIMP(statut='f',typ='R'),
5488 A2_PC =SIMP(statut='f',typ='R'),
5489 ALPHA0_PC =SIMP(statut='f',typ='R'),
5490 ALPHA1_PC =SIMP(statut='f',typ='R'),
5491 ALPHA2_PC =SIMP(statut='f',typ='R'),
5492 ALPHA3_PC =SIMP(statut='f',typ='R'),
5493 ALPHA_S =SIMP(statut='f',typ='R'),
5495 SURF_ETAT_NSAT =FACT(statut='f',min=0,max=1,
5496 E_CHAR =SIMP(statut='o',typ='R'),
5497 E_DECHAR =SIMP(statut='o',typ='R'),
5498 XN =SIMP(statut='f',typ='R'),
5499 RF =SIMP(statut='f',typ='R'),
5500 EV_KB =SIMP(statut='f',typ='R'),
5501 EV_XM =SIMP(statut='f',typ='R'),
5502 EV_A =SIMP(statut='f',typ='R'),
5503 EV_B =SIMP(statut='f',typ='R'),
5504 EV_CT =SIMP(statut='f',typ='R'),
5505 EV_SIGB =SIMP(statut='f',typ='R'),
5506 D_E_T =SIMP(statut='f',typ='R'),
5507 D_E_SUCC =SIMP(statut='f',typ='R'),
5508 ANG_FRT =SIMP(statut='o',typ='R'),
5509 COHE =SIMP(statut='o',typ='R'),
5510 D_COEH_SUCC =SIMP(statut='f',typ='R'),
5511 ANG_FRT_ULT =SIMP(statut='f',typ='R'),
5512 SUCC_ULTM =SIMP(statut='f',typ='R'),
5513 RESI_TRAC =SIMP(statut='f',typ='R'),
5514 A_SURF_SATU =SIMP(statut='f',typ='R'),
5515 B_SURF_SATU =SIMP(statut='f',typ='R'),
5516 C_SURF_SATU =SIMP(statut='f',typ='R'),
5517 D_SURF_SATU =SIMP(statut='f',typ='R'),
5519 ELAS_COQUE =FACT(statut='f',min=0,max=1,
5520 regles=(EXCLUS('MEMB_L','M_LLLL',),
5521 PRESENT_PRESENT('MEMB_L','MEMB_LT', 'MEMB_T','MEMB_G_LT','FLEX_L','FLEX_LT',
5522 'FLEX_T','FLEX_G_LT','CISA_L','CISA_T',),
5523 PRESENT_PRESENT('M_LLLL','M_LLTT','M_LLLT','M_TTTT','M_TTLT','M_LTLT','F_LLLL',
5524 'F_LLTT','F_LLLT','F_TTTT','F_TTLT','F_LTLT','MF_LLLL',
5525 'MF_LLTT','MF_LLLT','MF_TTTT','MF_TTLT','MF_LTLT','MC_LLLZ',
5526 'MC_LLTZ','MC_TTLZ','MC_TTTZ','MC_LTLZ','MC_LTTZ','FC_LLLZ',
5527 'FC_LLTZ','FC_TTLZ','FC_TTTZ','FC_LTLZ','FC_LTTZ','C_LZLZ',
5528 'C_LZTZ','C_TZTZ'),),
5529 MEMB_L =SIMP(statut='f',typ='R'),
5530 MEMB_LT =SIMP(statut='f',typ='R'),
5531 MEMB_T =SIMP(statut='f',typ='R'),
5532 MEMB_G_LT =SIMP(statut='f',typ='R'),
5533 FLEX_L =SIMP(statut='f',typ='R'),
5534 FLEX_LT =SIMP(statut='f',typ='R'),
5535 FLEX_T =SIMP(statut='f',typ='R'),
5536 FLEX_G_LT =SIMP(statut='f',typ='R'),
5537 CISA_L =SIMP(statut='f',typ='R'),
5538 CISA_T =SIMP(statut='f',typ='R'),
5539 M_LLLL =SIMP(statut='f',typ='R'),
5540 M_LLTT =SIMP(statut='f',typ='R'),
5541 M_LLLT =SIMP(statut='f',typ='R'),
5542 M_TTTT =SIMP(statut='f',typ='R'),
5543 M_TTLT =SIMP(statut='f',typ='R'),
5544 M_LTLT =SIMP(statut='f',typ='R'),
5545 F_LLLL =SIMP(statut='f',typ='R'),
5546 F_LLTT =SIMP(statut='f',typ='R'),
5547 F_LLLT =SIMP(statut='f',typ='R'),
5548 F_TTTT =SIMP(statut='f',typ='R'),
5549 F_TTLT =SIMP(statut='f',typ='R'),
5550 F_LTLT =SIMP(statut='f',typ='R'),
5551 MF_LLLL =SIMP(statut='f',typ='R'),
5552 MF_LLTT =SIMP(statut='f',typ='R'),
5553 MF_LLLT =SIMP(statut='f',typ='R'),
5554 MF_TTTT =SIMP(statut='f',typ='R'),
5555 MF_TTLT =SIMP(statut='f',typ='R'),
5556 MF_LTLT =SIMP(statut='f',typ='R'),
5557 MC_LLLZ =SIMP(statut='f',typ='R'),
5558 MC_LLTZ =SIMP(statut='f',typ='R'),
5559 MC_TTLZ =SIMP(statut='f',typ='R'),
5560 MC_TTTZ =SIMP(statut='f',typ='R'),
5561 MC_LTLZ =SIMP(statut='f',typ='R'),
5562 MC_LTTZ =SIMP(statut='f',typ='R'),
5563 FC_LLLZ =SIMP(statut='f',typ='R'),
5564 FC_LLTZ =SIMP(statut='f',typ='R'),
5565 FC_TTLZ =SIMP(statut='f',typ='R'),
5566 FC_TTTZ =SIMP(statut='f',typ='R'),
5567 FC_LTLZ =SIMP(statut='f',typ='R'),
5568 FC_LTTZ =SIMP(statut='f',typ='R'),
5569 C_LZLZ =SIMP(statut='f',typ='R'),
5570 C_LZTZ =SIMP(statut='f',typ='R'),
5571 C_TZTZ =SIMP(statut='f',typ='R'),
5572 RHO =SIMP(statut='f',typ='R'),
5573 ALPHA =SIMP(statut='f',typ='R'),
5575 ELAS_COQUE_FO =FACT(statut='f',min=0,max=1,
5576 regles=(EXCLUS('MEMB_L','M_LLLL',),
5577 PRESENT_PRESENT('MEMB_L','MEMB_LT','MEMB_T','MEMB_G_LT','FLEX_L','FLEX_LT',
5578 'FLEX_T','FLEX_G_LT','CISA_L','CISA_T',),
5579 PRESENT_PRESENT('M_LLLL','M_LLTT','M_LLLT','M_TTTT','M_TTLT','M_LTLT','F_LLLL',
5580 'F_LLTT','F_LLLT','F_TTTT','F_TTLT','F_LTLT','MF_LLLL','MF_LLTT',
5581 'MF_LLLT','MF_TTTT','MF_TTLT','MF_LTLT','MC_LLLZ','MC_LLTZ',
5582 'MC_TTLZ','MC_TTTZ','MC_LTLZ','MC_LTTZ','FC_LLLZ','FC_LLTZ',
5583 'FC_TTLZ','FC_TTTZ','FC_LTLZ','FC_LTTZ','C_LZLZ','C_LZTZ','C_TZTZ'),),
5584 MEMB_L =SIMP(statut='f',typ=fonction),
5585 MEMB_LT =SIMP(statut='f',typ=fonction),
5586 MEMB_T =SIMP(statut='f',typ=fonction),
5587 MEMB_G_LT =SIMP(statut='f',typ=fonction),
5588 FLEX_L =SIMP(statut='f',typ=fonction),
5589 FLEX_LT =SIMP(statut='f',typ=fonction),
5590 FLEX_T =SIMP(statut='f',typ=fonction),
5591 FLEX_G_LT =SIMP(statut='f',typ=fonction),
5592 CISA_L =SIMP(statut='f',typ=fonction),
5593 CISA_T =SIMP(statut='f',typ=fonction),
5594 M_LLLL =SIMP(statut='f',typ=fonction),
5595 M_LLTT =SIMP(statut='f',typ=fonction),
5596 M_LLLT =SIMP(statut='f',typ=fonction),
5597 M_TTTT =SIMP(statut='f',typ=fonction),
5598 M_TTLT =SIMP(statut='f',typ=fonction),
5599 M_LTLT =SIMP(statut='f',typ=fonction),
5600 F_LLLL =SIMP(statut='f',typ=fonction),
5601 F_LLTT =SIMP(statut='f',typ=fonction),
5602 F_LLLT =SIMP(statut='f',typ=fonction),
5603 F_TTTT =SIMP(statut='f',typ=fonction),
5604 F_TTLT =SIMP(statut='f',typ=fonction),
5605 F_LTLT =SIMP(statut='f',typ=fonction),
5606 MF_LLLL =SIMP(statut='f',typ=fonction),
5607 MF_LLTT =SIMP(statut='f',typ=fonction),
5608 MF_LLLT =SIMP(statut='f',typ=fonction),
5609 MF_TTTT =SIMP(statut='f',typ=fonction),
5610 MF_TTLT =SIMP(statut='f',typ=fonction),
5611 MF_LTLT =SIMP(statut='f',typ=fonction),
5612 MC_LLLZ =SIMP(statut='f',typ=fonction),
5613 MC_LLTZ =SIMP(statut='f',typ=fonction),
5614 MC_TTLZ =SIMP(statut='f',typ=fonction),
5615 MC_TTTZ =SIMP(statut='f',typ=fonction),
5616 MC_LTLZ =SIMP(statut='f',typ=fonction),
5617 MC_LTTZ =SIMP(statut='f',typ=fonction),
5618 FC_LLLZ =SIMP(statut='f',typ=fonction),
5619 FC_LLTZ =SIMP(statut='f',typ=fonction),
5620 FC_TTLZ =SIMP(statut='f',typ=fonction),
5621 FC_TTTZ =SIMP(statut='f',typ=fonction),
5622 FC_LTLZ =SIMP(statut='f',typ=fonction),
5623 FC_LTTZ =SIMP(statut='f',typ=fonction),
5624 C_LZLZ =SIMP(statut='f',typ=fonction),
5625 C_LZTZ =SIMP(statut='f',typ=fonction),
5626 C_TZTZ =SIMP(statut='f',typ=fonction),
5627 RHO =SIMP(statut='f',typ='R'),
5628 ALPHA =SIMP(statut='f',typ=fonction),
5629 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP","INST") ),
5631 APPUI_ELAS =FACT(statut='f',min=0,max=1,
5632 E_N =SIMP(statut='o',typ='R'),
5633 E_TAN =SIMP(statut='f',typ='R',defaut= 0.E+0),
5635 CABLE =FACT(statut='f',min=0,max=1,
5636 E =SIMP(statut='o',typ='R'),
5637 EC_SUR_E =SIMP(statut='f',typ='R',defaut= 1.E-4 ),
5638 RHO =SIMP(statut='f',typ='R'),
5639 ALPHA =SIMP(statut='f',typ='R'),
5640 AMOR_ALPHA =SIMP(statut='f',typ='R'),
5641 AMOR_BETA =SIMP(statut='f',typ='R'),
5644 # comportement mécanique non linéaire
5646 TRACTION =FACT(statut='f',min=0,max=1,
5647 SIGM =SIMP(statut='o',typ=fonction),
5648 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="EPSI",into=("EPSI",) ),
5649 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
5650 VERI_P3 =SIMP(statut='c',typ='TXM',defaut="HYDR",into=("HYDR",) ),
5651 VERI_P4 =SIMP(statut='c',typ='TXM',defaut="SECH",into=("SECH",) ),
5653 ECRO_LINE =FACT(statut='f',min=0,max=1,
5654 D_SIGM_EPSI =SIMP(statut='o',typ='R'),
5655 SY =SIMP(statut='o',typ='R'),
5657 ECRO_LINE_FO =FACT(statut='f',min=0,max=1,
5658 D_SIGM_EPSI =SIMP(statut='o',typ=fonction),
5659 SY =SIMP(statut='o',typ=fonction),
5660 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
5662 PRAGER =FACT(statut='f',min=0,max=1,
5663 C =SIMP(statut='o',typ='R'),
5665 PRAGER_FO =FACT(statut='f',min=0,max=1,
5666 C =SIMP(statut='o',typ=fonction),
5667 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
5669 ECRO_FLEJOU =FACT(statut='f',min=0,max=1,
5670 EP =SIMP(statut='o',typ='R'),
5671 SY =SIMP(statut='o',typ='R'),
5672 SU =SIMP(statut='o',typ='R'),
5673 PUISS =SIMP(statut='o',typ='R'),
5675 TAHERI =FACT(statut='f',min=0,max=1,
5676 R_0 =SIMP(statut='o',typ='R'),
5677 ALPHA =SIMP(statut='o',typ='R'),
5678 M =SIMP(statut='o',typ='R'),
5679 A =SIMP(statut='o',typ='R'),
5680 B =SIMP(statut='o',typ='R'),
5681 C1 =SIMP(statut='o',typ='R'),
5682 C_INF =SIMP(statut='o',typ='R'),
5683 S =SIMP(statut='o',typ='R'),
5685 TAHERI_FO =FACT(statut='f',min=0,max=1,
5686 R_0 =SIMP(statut='o',typ=fonction),
5687 ALPHA =SIMP(statut='o',typ=fonction),
5688 M =SIMP(statut='o',typ=fonction),
5689 A =SIMP(statut='o',typ=fonction),
5690 B =SIMP(statut='o',typ=fonction),
5691 C1 =SIMP(statut='o',typ=fonction),
5692 C_INF =SIMP(statut='o',typ=fonction),
5693 S =SIMP(statut='o',typ=fonction),
5694 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
5696 ROUSSELIER =FACT(statut='f',min=0,max=1,
5697 D =SIMP(statut='o',typ='R'),
5698 SIGM_1 =SIMP(statut='o',typ='R'),
5699 PORO_INIT =SIMP(statut='o',typ='R'),
5700 PORO_CRIT =SIMP(statut='f',typ='R',defaut= 1. ),
5701 PORO_ACCE =SIMP(statut='f',typ='R',defaut= 1. ),
5702 PORO_LIMI =SIMP(statut='f',typ='R',defaut= 0.999 ),
5703 D_SIGM_EPSI_NORM=SIMP(statut='f',typ='R',defaut= 1. ),
5704 AN =SIMP(statut='f',typ='R',defaut= 0. ),
5706 ROUSSELIER_FO =FACT(statut='f',min=0,max=1,
5707 D =SIMP(statut='o',typ=fonction),
5708 SIGM_1 =SIMP(statut='o',typ=fonction),
5709 PORO_INIT =SIMP(statut='o',typ=fonction),
5710 PORO_CRIT =SIMP(statut='f',typ='R',defaut= 1. ),
5711 PORO_ACCE =SIMP(statut='f',typ='R',defaut= 1. ),
5712 PORO_LIMI =SIMP(statut='f',typ='R',defaut= 0.999 ),
5713 D_SIGM_EPSI_NORM=SIMP(statut='f',typ='R',defaut= 1. ),
5714 AN =SIMP(statut='f',typ='R',defaut= 0. ),
5715 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
5717 ROUSS_VISC =FACT(statut='f',min=0,max=1,
5718 SIGM_0 =SIMP(statut='o',typ='R'),
5719 EPSI_0 =SIMP(statut='o',typ='R'),
5720 M =SIMP(statut='o',typ='R'),
5722 CHABOCHE =FACT(statut='f',min=0,max=1,
5723 R_I =SIMP(statut='o',typ='R'),
5724 R_0 =SIMP(statut='o',typ='R'),
5725 B =SIMP(statut='o',typ='R'),
5726 K =SIMP(statut='o',typ='R'),
5727 W =SIMP(statut='o',typ='R'),
5728 A1 =SIMP(statut='o',typ='R'),
5729 A2 =SIMP(statut='o',typ='R'),
5730 C1 =SIMP(statut='o',typ='R'),
5731 C2 =SIMP(statut='o',typ='R'),
5733 CIN1_CHAB =FACT(statut='f',min=0,max=1,
5734 R_0 =SIMP(statut='o',typ='R'),
5735 R_I =SIMP(statut='f',typ='R'),
5736 B =SIMP(statut='f',typ='R',defaut= 0.0E+0),
5737 C_I =SIMP(statut='o',typ='R'),
5738 K =SIMP(statut='f',typ='R',defaut= 1.0E+0),
5739 W =SIMP(statut='f',typ='R',defaut= 0.0E+0),
5740 G_0 =SIMP(statut='o',typ='R'),
5741 A_I =SIMP(statut='f',typ='R',defaut= 1.0E+0),
5743 CIN1_CHAB_FO =FACT(statut='f',min=0,max=1,
5744 R_0 =SIMP(statut='o',typ=fonction),
5745 R_I =SIMP(statut='o',typ=fonction),
5746 B =SIMP(statut='o',typ=fonction),
5747 C_I =SIMP(statut='o',typ=fonction),
5748 K =SIMP(statut='o',typ=fonction),
5749 W =SIMP(statut='o',typ=fonction),
5750 G_0 =SIMP(statut='o',typ=fonction),
5751 A_I =SIMP(statut='o',typ=fonction),
5752 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",)),
5754 CIN2_CHAB =FACT(statut='f',min=0,max=1,
5755 R_0 =SIMP(statut='o',typ='R'),
5756 R_I =SIMP(statut='f',typ='R'),
5757 B =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5758 C1_I =SIMP(statut='o',typ='R'),
5759 C2_I =SIMP(statut='o',typ='R'),
5760 K =SIMP(statut='f',typ='R',defaut= 1.),
5761 W =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5762 G1_0 =SIMP(statut='o',typ='R'),
5763 G2_0 =SIMP(statut='o',typ='R'),
5764 A_I =SIMP(statut='f',typ='R',defaut= 1.E+0 ),
5766 CIN2_CHAB_FO =FACT(statut='f',min=0,max=1,
5767 R_0 =SIMP(statut='o',typ=fonction),
5768 R_I =SIMP(statut='o',typ=fonction),
5769 B =SIMP(statut='o',typ=fonction),
5770 C1_I =SIMP(statut='o',typ=fonction),
5771 C2_I =SIMP(statut='o',typ=fonction),
5772 K =SIMP(statut='o',typ=fonction),
5773 W =SIMP(statut='o',typ=fonction),
5774 G1_0 =SIMP(statut='o',typ=fonction),
5775 G2_0 =SIMP(statut='o',typ=fonction),
5776 A_I =SIMP(statut='o',typ=fonction),
5777 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
5779 VISCOCHAB =FACT(statut='f',min=0,max=1,
5780 K_0 =SIMP(statut='o',typ='R'),
5781 A_K =SIMP(statut='o',typ='R'),
5782 A_R =SIMP(statut='o',typ='R'),
5783 K =SIMP(statut='o',typ='R'),
5784 N =SIMP(statut='o',typ='R'),
5785 ALP =SIMP(statut='o',typ='R'),
5786 B =SIMP(statut='o',typ='R'),
5787 M_R =SIMP(statut='o',typ='R'),
5788 G_R =SIMP(statut='o',typ='R'),
5789 MU =SIMP(statut='o',typ='R'),
5790 Q_M =SIMP(statut='o',typ='R'),
5791 Q_0 =SIMP(statut='o',typ='R'),
5792 QR_0 =SIMP(statut='o',typ='R'),
5793 ETA =SIMP(statut='o',typ='R'),
5794 C1 =SIMP(statut='o',typ='R'),
5795 M_1 =SIMP(statut='o',typ='R'),
5796 D1 =SIMP(statut='o',typ='R'),
5797 G_X1 =SIMP(statut='o',typ='R'),
5798 G1_0 =SIMP(statut='o',typ='R'),
5799 C2 =SIMP(statut='o',typ='R'),
5800 M_2 =SIMP(statut='o',typ='R'),
5801 D2 =SIMP(statut='o',typ='R'),
5802 G_X2 =SIMP(statut='o',typ='R'),
5803 G2_0 =SIMP(statut='o',typ='R'),
5804 A_I =SIMP(statut='o',typ='R'),
5806 VISCOCHAB_FO =FACT(statut='f',min=0,max=1,
5807 K_0 =SIMP(statut='o',typ=fonction),
5808 A_K =SIMP(statut='o',typ=fonction),
5809 A_R =SIMP(statut='o',typ=fonction),
5810 K =SIMP(statut='o',typ=fonction),
5811 N =SIMP(statut='o',typ=fonction),
5812 ALP =SIMP(statut='o',typ=fonction),
5813 B =SIMP(statut='o',typ=fonction),
5814 M_R =SIMP(statut='o',typ=fonction),
5815 G_R =SIMP(statut='o',typ=fonction),
5816 MU =SIMP(statut='o',typ=fonction),
5817 Q_M =SIMP(statut='o',typ=fonction),
5818 Q_0 =SIMP(statut='o',typ=fonction),
5819 QR_0 =SIMP(statut='o',typ=fonction),
5820 ETA =SIMP(statut='o',typ=fonction),
5821 C1 =SIMP(statut='o',typ=fonction),
5822 M_1 =SIMP(statut='o',typ=fonction),
5823 D1 =SIMP(statut='o',typ=fonction),
5824 G_X1 =SIMP(statut='o',typ=fonction),
5825 G1_0 =SIMP(statut='o',typ=fonction),
5826 C2 =SIMP(statut='o',typ=fonction),
5827 M_2 =SIMP(statut='o',typ=fonction),
5828 D2 =SIMP(statut='o',typ=fonction),
5829 G_X2 =SIMP(statut='o',typ=fonction),
5830 G2_0 =SIMP(statut='o',typ=fonction),
5831 A_I =SIMP(statut='o',typ=fonction),
5832 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
5834 POLY_CFC =FACT(statut='f',min=0,max=1,
5835 TEXTURE =SIMP(statut='o',typ=(tabl_texture) ),
5836 DL =SIMP(statut='f',typ='R'),
5837 DA =SIMP(statut='f',typ='R'),
5838 N =SIMP(statut='o',typ='R'),
5839 K =SIMP(statut='o',typ='R'),
5840 TAU_0 =SIMP(statut='o',typ='R'),
5841 Q1 =SIMP(statut='o',typ='R'),
5842 B1 =SIMP(statut='o',typ='R'),
5843 HL =SIMP(statut='o',typ='R'),
5844 Q2 =SIMP(statut='o',typ='R'),
5845 B2 =SIMP(statut='o',typ='R'),
5846 C1 =SIMP(statut='o',typ='R'),
5847 D1 =SIMP(statut='o',typ='R'),
5848 C2 =SIMP(statut='o',typ='R'),
5850 POLY_CFC_FO =FACT(statut='f',min=0,max=1,
5851 TEXTURE =SIMP(statut='o',typ=(tabl_texture) ),
5852 DL =SIMP(statut='o',typ=fonction),
5853 DA =SIMP(statut='o',typ=fonction),
5854 N =SIMP(statut='o',typ=fonction),
5855 K =SIMP(statut='o',typ=fonction),
5856 TAU_0 =SIMP(statut='o',typ=fonction),
5857 Q1 =SIMP(statut='o',typ=fonction),
5858 B1 =SIMP(statut='o',typ=fonction),
5859 HL =SIMP(statut='o',typ=fonction),
5860 Q2 =SIMP(statut='o',typ=fonction),
5861 B2 =SIMP(statut='o',typ=fonction),
5862 C1 =SIMP(statut='o',typ=fonction),
5863 D1 =SIMP(statut='o',typ=fonction),
5864 C2 =SIMP(statut='o',typ=fonction),
5865 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
5867 NORTON_HOFF =FACT(statut='f',min=0,max=1,
5868 SY =SIMP(statut='o',typ='R'),
5870 LEMAITRE =FACT(statut='f',min=0,max=1,
5871 N =SIMP(statut='o',typ='R'),
5872 UN_SUR_K =SIMP(statut='o',typ='R'),
5873 UN_SUR_M =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5875 ZIRC_CYRA2 =FACT(statut='f',min=0,max=1,
5876 EPSI_FAB =SIMP(statut='o',typ=fonction),
5877 TEMP_RECUIT =SIMP(statut='o',typ=fonction),
5878 FLUX_PHI =SIMP(statut='o',typ=fonction),
5879 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="INST",into=("INST",) ),
5881 ZIRC_EPRI =FACT(statut='f',min=0,max=1,
5882 FLUX_PHI =SIMP(statut='o',typ='R'),
5883 R_P =SIMP(statut='o',typ='R'),
5884 THETA_MAX =SIMP(statut='o',typ='R'),
5886 LEMAITRE_FO =FACT(statut='f',min=0,max=1,
5887 N =SIMP(statut='o',typ=fonction),
5888 UN_SUR_K =SIMP(statut='o',typ=fonction),
5889 UN_SUR_M =SIMP(statut='f',typ=fonction),
5890 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
5892 GRAN_IRRA =FACT(statut='f',min=0,max=1,
5893 A =SIMP(statut='f',typ='R',defaut= 0.E+0),
5894 B =SIMP(statut='f',typ='R',defaut= 0.E+0),
5895 S =SIMP(statut='f',typ='R',defaut= 0.E+0),
5897 FLU_IRRA =FACT(statut='f',min=0,max=1,
5898 QSR_K =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5899 BETA =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5900 PHI_ZERO =SIMP(statut='f',typ='R',defaut= 1.E+20),
5901 L =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
5903 OHNO =FACT(statut='f',min=0,max=1,
5904 R_I =SIMP(statut='o',typ='R'),
5905 R_0 =SIMP(statut='o',typ='R'),
5906 B =SIMP(statut='o',typ='R'),
5907 PHI =SIMP(statut='o',typ='R'),
5908 A1 =SIMP(statut='o',typ='R'),
5909 A2 =SIMP(statut='o',typ='R'),
5910 A3 =SIMP(statut='o',typ='R'),
5911 A4 =SIMP(statut='o',typ='R'),
5912 A5 =SIMP(statut='o',typ='R'),
5913 GAMMA1 =SIMP(statut='o',typ='R'),
5914 GAMMA2 =SIMP(statut='o',typ='R'),
5915 GAMMA3 =SIMP(statut='o',typ='R'),
5916 GAMMA4 =SIMP(statut='o',typ='R'),
5917 GAMMA5 =SIMP(statut='o',typ='R'),
5918 M1 =SIMP(statut='o',typ='R'),
5919 M2 =SIMP(statut='o',typ='R'),
5920 M3 =SIMP(statut='o',typ='R'),
5921 M4 =SIMP(statut='o',typ='R'),
5922 M5 =SIMP(statut='o',typ='R'),
5924 OHNO_FO =FACT(statut='f',min=0,max=1,
5925 R_I =SIMP(statut='o',typ=fonction),
5926 R_0 =SIMP(statut='o',typ=fonction),
5927 B =SIMP(statut='o',typ=fonction),
5928 PHI =SIMP(statut='o',typ=fonction),
5929 A1 =SIMP(statut='o',typ=fonction),
5930 A2 =SIMP(statut='o',typ=fonction),
5931 A3 =SIMP(statut='o',typ=fonction),
5932 A4 =SIMP(statut='o',typ=fonction),
5933 A5 =SIMP(statut='o',typ=fonction),
5934 GAMMA1 =SIMP(statut='o',typ=fonction),
5935 GAMMA2 =SIMP(statut='o',typ=fonction),
5936 GAMMA3 =SIMP(statut='o',typ=fonction),
5937 GAMMA4 =SIMP(statut='o',typ=fonction),
5938 GAMMA5 =SIMP(statut='o',typ=fonction),
5939 M1 =SIMP(statut='o',typ=fonction),
5940 M2 =SIMP(statut='o',typ=fonction),
5941 M3 =SIMP(statut='o',typ=fonction),
5942 M4 =SIMP(statut='o',typ=fonction),
5943 M5 =SIMP(statut='o',typ=fonction),
5944 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
5946 LMARC =FACT(statut='f',min=0,max=1,
5947 DE_0 =SIMP(statut='o',typ='R'),
5948 R_0 =SIMP(statut='o',typ='R'),
5949 N =SIMP(statut='o',typ='R'),
5950 K =SIMP(statut='o',typ='R'),
5951 Y_I =SIMP(statut='o',typ='R'),
5952 Y_0 =SIMP(statut='o',typ='R'),
5953 B =SIMP(statut='o',typ='R'),
5954 A_0 =SIMP(statut='o',typ='R'),
5955 RM =SIMP(statut='o',typ='R'),
5956 M =SIMP(statut='o',typ='R'),
5957 P =SIMP(statut='o',typ='R'),
5958 P1 =SIMP(statut='o',typ='R'),
5959 P2 =SIMP(statut='o',typ='R'),
5960 M11 =SIMP(statut='o',typ='R'),
5961 M22 =SIMP(statut='o',typ='R'),
5962 M33 =SIMP(statut='o',typ='R'),
5963 M66 =SIMP(statut='o',typ='R'),
5964 N11 =SIMP(statut='o',typ='R'),
5965 N22 =SIMP(statut='o',typ='R'),
5966 N33 =SIMP(statut='o',typ='R'),
5967 N66 =SIMP(statut='o',typ='R'),
5968 Q11 =SIMP(statut='o',typ='R'),
5969 Q22 =SIMP(statut='o',typ='R'),
5970 Q33 =SIMP(statut='o',typ='R'),
5971 Q66 =SIMP(statut='o',typ='R'),
5972 R11 =SIMP(statut='o',typ='R'),
5973 R22 =SIMP(statut='o',typ='R'),
5974 R33 =SIMP(statut='o',typ='R'),
5975 R66 =SIMP(statut='o',typ='R'),
5977 LMARC_FO =FACT(statut='f',min=0,max=1,
5978 DE_0 =SIMP(statut='o',typ=fonction),
5979 R_0 =SIMP(statut='o',typ=fonction),
5980 N =SIMP(statut='o',typ=fonction),
5981 K =SIMP(statut='o',typ=fonction),
5982 Y_I =SIMP(statut='o',typ=fonction),
5983 Y_0 =SIMP(statut='o',typ=fonction),
5984 B =SIMP(statut='o',typ=fonction),
5985 A_0 =SIMP(statut='o',typ=fonction),
5986 RM =SIMP(statut='o',typ=fonction),
5987 M =SIMP(statut='o',typ=fonction),
5988 P =SIMP(statut='o',typ=fonction),
5989 P1 =SIMP(statut='o',typ=fonction),
5990 P2 =SIMP(statut='o',typ=fonction),
5991 M11 =SIMP(statut='o',typ=fonction),
5992 M22 =SIMP(statut='o',typ=fonction),
5993 M33 =SIMP(statut='o',typ=fonction),
5994 M66 =SIMP(statut='o',typ=fonction),
5995 N11 =SIMP(statut='o',typ=fonction),
5996 N22 =SIMP(statut='o',typ=fonction),
5997 N33 =SIMP(statut='o',typ=fonction),
5998 N66 =SIMP(statut='o',typ=fonction),
5999 Q11 =SIMP(statut='o',typ=fonction),
6000 Q22 =SIMP(statut='o',typ=fonction),
6001 Q33 =SIMP(statut='o',typ=fonction),
6002 Q66 =SIMP(statut='o',typ=fonction),
6003 R11 =SIMP(statut='o',typ=fonction),
6004 R22 =SIMP(statut='o',typ=fonction),
6005 R33 =SIMP(statut='o',typ=fonction),
6006 R66 =SIMP(statut='o',typ=fonction),
6007 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
6009 VMIS_POUTRE =FACT(statut='f',min=0,max=1,
6010 NP =SIMP(statut='o',typ='R'),
6011 MEY =SIMP(statut='o',typ='R'),
6012 MPY =SIMP(statut='o',typ='R'),
6013 CAY =SIMP(statut='o',typ='R'),
6014 CBY =SIMP(statut='o',typ='R'),
6015 MEZ =SIMP(statut='o',typ='R'),
6016 MPZ =SIMP(statut='o',typ='R'),
6017 CAZ =SIMP(statut='o',typ='R'),
6018 CBZ =SIMP(statut='o',typ='R'),
6019 MPX =SIMP(statut='o',typ='R'),
6021 VMIS_POUTRE_FO =FACT(statut='f',min=0,max=1,
6022 NP =SIMP(statut='o',typ=fonction),
6023 MEY =SIMP(statut='o',typ=fonction),
6024 MPY =SIMP(statut='o',typ=fonction),
6025 CAY =SIMP(statut='o',typ=fonction),
6026 CBY =SIMP(statut='o',typ=fonction),
6027 MEZ =SIMP(statut='o',typ=fonction),
6028 MPZ =SIMP(statut='o',typ=fonction),
6029 CAZ =SIMP(statut='o',typ=fonction),
6030 CBZ =SIMP(statut='o',typ=fonction),
6031 MPX =SIMP(statut='o',typ=fonction),
6032 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
6034 ARME =FACT(statut='f',min=0,max=1,
6035 KYE =SIMP(statut='o',typ='R'),
6036 DLE =SIMP(statut='o',typ='R'),
6037 KYP =SIMP(statut='o',typ='R'),
6038 DLP =SIMP(statut='o',typ='R'),
6039 KYG =SIMP(statut='o',typ='R'),
6041 ASSE_CORN =FACT(statut='f',min=0,max=1,
6042 NU_1 =SIMP(statut='o',typ='R'),
6043 MU_1 =SIMP(statut='o',typ='R'),
6044 DXU_1 =SIMP(statut='o',typ='R'),
6045 DRYU_1 =SIMP(statut='o',typ='R'),
6046 C_1 =SIMP(statut='o',typ='R'),
6047 NU_2 =SIMP(statut='o',typ='R'),
6048 MU_2 =SIMP(statut='o',typ='R'),
6049 DXU_2 =SIMP(statut='o',typ='R'),
6050 DRYU_2 =SIMP(statut='o',typ='R'),
6051 C_2 =SIMP(statut='o',typ='R'),
6052 KY =SIMP(statut='o',typ='R'),
6053 KZ =SIMP(statut='o',typ='R'),
6054 KRX =SIMP(statut='o',typ='R'),
6055 KRZ =SIMP(statut='o',typ='R'),
6057 DIS_CONTACT =FACT(statut='f',min=0,max=1,
6058 RIGI_NOR =SIMP(statut='f',typ='R' ),
6059 DIST_1 =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6060 DIST_2 =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6061 RIGI_TAN =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6062 AMOR_NOR =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6063 AMOR_TAN =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6064 COULOMB =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6065 JEU =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6066 KT_ULTM =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6067 EFFO_N_INIT =SIMP(statut='f',typ='R'),
6068 regles=(EXCLUS('RIGI_N_FO','RIGI_N_IRRA',),),
6069 RIGI_N_IRRA =SIMP(statut='f',typ=fonction),
6070 RIGI_N_FO =SIMP(statut='f',typ=fonction),
6071 RELA_MZ =SIMP(statut='f',typ=fonction),
6072 C_PRAGER_MZ =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6073 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="DRZ",into=("DRZ",) ),
6074 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="INST",into=("INST",) ),
6076 NADAI_B =FACT(statut='f',min=0,max=1,
6077 F_C =SIMP(statut='o',typ='R'),
6078 F_T =SIMP(statut='o',typ='R'),
6079 CRIT_E_C =SIMP(statut='o',typ='R'),
6080 EPSP_P_C =SIMP(statut='o',typ='R'),
6081 EPSP_R_C =SIMP(statut='o',typ='R'),
6082 EPSI_R_T =SIMP(statut='o',typ='R'),
6083 FAC_T_C =SIMP(statut='o',typ='R'),
6085 BETON_DOUBLE_DP =FACT(statut='f',min=0,max=1,
6086 F_C =SIMP(statut='o',typ=fonction),
6087 F_T =SIMP(statut='o',typ=fonction),
6088 COEF_BIAX =SIMP(statut='o',typ=fonction),
6089 ENER_COMP_RUPT =SIMP(statut='o',typ=fonction),
6090 ENER_TRAC_RUPT =SIMP(statut='o',typ=fonction),
6091 COEF_ELAS_COMP =SIMP(statut='o',typ='R'),
6092 LONG_CARA =SIMP(statut='f',typ='R'),
6093 ECRO_COMP_P_PIC =SIMP(statut='f',typ='TXM',defaut="LINEAIRE",into=("LINEAIRE","PARABOLE") ),
6094 ECRO_TRAC_P_PIC =SIMP(statut='f',typ='TXM',defaut="LINEAIRE",into=("LINEAIRE","EXPONENT") ),
6095 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP","INST",) ),
6096 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="INST",into=("TEMP","INST",) ),
6097 VERI_P3 =SIMP(statut='c',typ='TXM',defaut="HYDR",into=("HYDR",) ),
6098 VERI_P4 =SIMP(statut='c',typ='TXM',defaut="SECH",into=("SECH",) ),
6100 LABORD_1D=FACT(statut='f',min=0 ,max=1,
6101 Y01 =SIMP(statut='o',typ='R'),
6102 Y02 =SIMP(statut='o',typ='R'),
6103 A1 =SIMP(statut='o',typ='R'),
6104 A2 =SIMP(statut='o',typ='R'),
6105 B1 =SIMP(statut='o',typ='R'),
6106 B2 =SIMP(statut='o',typ='R'),
6107 BETA1 =SIMP(statut='o',typ='R'),
6108 BETA2 =SIMP(statut='o',typ='R'),
6109 SIGF =SIMP(statut='o',typ='R'),
6112 VENDOCHAB =FACT(statut='f',min=0,max=1,
6113 S_VP =SIMP(statut='o',typ='R'),
6114 SEDVP1 =SIMP(statut='o',typ='R'),
6115 SEDVP2 =SIMP(statut='o',typ='R'),
6116 N_VP =SIMP(statut='o',typ='R'),
6117 M_VP =SIMP(statut='o',typ='R'),
6118 K_VP =SIMP(statut='o',typ='R'),
6119 R_D =SIMP(statut='o',typ='R'),
6120 A_D =SIMP(statut='o',typ='R'),
6121 K_D =SIMP(statut='o',typ='R'),
6123 VENDOCHAB_FO =FACT(statut='f',min=0,max=1,
6124 S_VP =SIMP(statut='o',typ=fonction),
6125 SEDVP1 =SIMP(statut='o',typ=fonction),
6126 SEDVP2 =SIMP(statut='o',typ=fonction),
6127 N_VP =SIMP(statut='o',typ=fonction),
6128 M_VP =SIMP(statut='o',typ=fonction),
6129 K_VP =SIMP(statut='o',typ=fonction),
6130 R_D =SIMP(statut='o',typ=fonction),
6131 A_D =SIMP(statut='o',typ=fonction),
6132 K_D =SIMP(statut='o',typ=fonction),
6133 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
6134 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="X",into=("X",) ),
6136 PINTO_MENEGOTTO =FACT(statut='f',min=0,max=1,
6137 SY =SIMP(statut='o',typ='R'),
6138 EPSI_ULTM =SIMP(statut='o',typ='R'),
6139 SIGM_ULTM =SIMP(statut='o',typ='R'),
6140 ELAN =SIMP(statut='f',typ='R',defaut= 4. ),
6141 EPSP_HARD =SIMP(statut='o',typ='R'),
6142 R_PM =SIMP(statut='f',typ='R',defaut= 20. ),
6143 EP_SUR_E =SIMP(statut='f',typ='R'),
6144 A1_PM =SIMP(statut='f',typ='R',defaut= 18.5 ),
6145 A2_PM =SIMP(statut='f',typ='R',defaut= 0.15 ),
6146 A6_PM =SIMP(statut='f',typ='R',defaut= 620. ),
6147 C_PM =SIMP(statut='f',typ='R',defaut= 0.5 ),
6148 A_PM =SIMP(statut='f',typ='R',defaut= 6.0E-3 ),
6150 BPEL_BETON =FACT(statut='f',min=0,max=1,
6151 PERT_FLUA =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6152 PERT_RETR =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6154 BPEL_ACIER =FACT(statut='f',min=0,max=1,
6155 RELAX_1000 =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6156 MU0_RELAX =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6157 SY =SIMP(statut='o',typ='R'),
6158 FROT_COURB =SIMP(statut='o',typ='R'),
6159 FROT_LINE =SIMP(statut='o',typ='R'),
6161 CJS =FACT(statut='f',min=0,max=1,
6162 regles=(ENSEMBLE('B_CJS','C_CJS','MU_CJS','PCO',),
6163 ENSEMBLE('N_CJS','KP','RC',),
6164 PRESENT_ABSENT('A_CJS','B_CJS',),
6165 PRESENT_PRESENT('A_CJS','N_CJS',),
6166 PRESENT_PRESENT('B_CJS','N_CJS', ),),
6167 BETA_CJS =SIMP(statut='o',typ='R'),
6168 RM =SIMP(statut='o',typ='R'),
6169 N_CJS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6170 KP =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6171 RC =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6172 A_CJS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6173 B_CJS =SIMP(statut='f',typ='R',defaut= 1.0E+25 ),
6174 C_CJS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6175 GAMMA_CJS =SIMP(statut='o',typ='R'),
6176 MU_CJS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6177 PCO =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6178 PA =SIMP(statut='o',typ='R'),
6179 Q_INIT =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6180 R_INIT =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
6182 ECRO_ASYM_LINE =FACT(statut='f',min=0,max=1,
6183 DC_SIGM_EPSI =SIMP(statut='o',typ='R'),
6184 SY_C =SIMP(statut='o',typ='R'),
6185 DT_SIGM_EPSI =SIMP(statut='o',typ='R'),
6186 SY_T =SIMP(statut='o',typ='R'),
6188 GRANGER_FP =FACT(statut='f',min=0,max=1,
6189 J1 =SIMP(statut='f',typ='R'),
6190 J2 =SIMP(statut='f',typ='R'),
6191 J3 =SIMP(statut='f',typ='R'),
6192 J4 =SIMP(statut='f',typ='R'),
6193 J5 =SIMP(statut='f',typ='R'),
6194 J6 =SIMP(statut='f',typ='R'),
6195 J7 =SIMP(statut='f',typ='R'),
6196 J8 =SIMP(statut='f',typ='R'),
6197 TAUX_1 =SIMP(statut='f',typ='R'),
6198 TAUX_2 =SIMP(statut='f',typ='R'),
6199 TAUX_3 =SIMP(statut='f',typ='R'),
6200 TAUX_4 =SIMP(statut='f',typ='R'),
6201 TAUX_5 =SIMP(statut='f',typ='R'),
6202 TAUX_6 =SIMP(statut='f',typ='R'),
6203 TAUX_7 =SIMP(statut='f',typ='R'),
6204 TAUX_8 =SIMP(statut='f',typ='R'),
6205 FONC_DESORP =SIMP(statut='f',typ=fonction),
6206 QSR_K =SIMP(statut='f',typ='R'),
6207 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="SECH",into=("SECH",) ),
6209 V_GRANGER_FP =FACT(statut='f',min=0,max=1,
6210 QSR_VEIL =SIMP(statut='f',typ='R'),
6211 FONC_V =SIMP(statut='f',typ=fonction),
6212 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="INST",into=("INST",) ),
6215 # comportement thermique
6217 THER_NL =FACT(statut='f',min=0,max=1,
6218 regles=(UN_PARMI('BETA','RHO_CP', ),),
6219 LAMBDA =SIMP(statut='o',typ=fonction),
6220 BETA =SIMP(statut='f',typ=fonction),
6221 RHO_CP =SIMP(statut='f',typ=fonction),
6222 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
6224 THER_HYDR =FACT(statut='f',min=0,max=1,
6225 LAMBDA =SIMP(statut='o',typ=fonction),
6226 BETA =SIMP(statut='f',typ=fonction),
6227 AFFINITE =SIMP(statut='o',typ=fonction),
6228 CHALHYDR =SIMP(statut='o',typ='R'),
6229 QSR_K =SIMP(statut='o',typ='R'),
6230 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("HYDR",) ),
6231 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="HYDR",into=("HYDR",) ),
6233 THER =FACT(statut='f',min=0,max=1,
6234 LAMBDA =SIMP(statut='o',typ='R'),
6235 RHO_CP =SIMP(statut='f',typ='R'),
6237 THER_FO =FACT(statut='f',min=0,max=1,
6238 LAMBDA =SIMP(statut='o',typ=fonction),
6239 RHO_CP =SIMP(statut='f',typ=fonction),
6240 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="INST",into=("INST",) ),
6242 THER_ORTH =FACT(statut='f',min=0,max=1,
6243 LAMBDA_L =SIMP(statut='o',typ='R'),
6244 LAMBDA_T =SIMP(statut='o',typ='R'),
6245 LAMBDA_N =SIMP(statut='f',typ='R'),
6246 RHO_CP =SIMP(statut='f',typ='R'),
6248 THER_COQUE =FACT(statut='f',min=0,max=1,
6249 COND_LMM =SIMP(statut='o',typ='R'),
6250 COND_TMM =SIMP(statut='o',typ='R'),
6251 COND_LMP =SIMP(statut='o',typ='R'),
6252 COND_TMP =SIMP(statut='o',typ='R'),
6253 COND_LPP =SIMP(statut='o',typ='R'),
6254 COND_TPP =SIMP(statut='o',typ='R'),
6255 COND_LSI =SIMP(statut='o',typ='R'),
6256 COND_TSI =SIMP(statut='o',typ='R'),
6257 COND_NMM =SIMP(statut='o',typ='R'),
6258 COND_NMP =SIMP(statut='o',typ='R'),
6259 COND_NPP =SIMP(statut='o',typ='R'),
6260 COND_NSI =SIMP(statut='o',typ='R'),
6261 CMAS_MM =SIMP(statut='f',typ='R'),
6262 CMAS_MP =SIMP(statut='f',typ='R'),
6263 CMAS_PP =SIMP(statut='f',typ='R'),
6264 CMAS_SI =SIMP(statut='f',typ='R'),
6266 THER_COQUE_FO =FACT(statut='f',min=0,max=1,
6267 COND_LMM =SIMP(statut='o',typ=fonction),
6268 COND_TMM =SIMP(statut='o',typ=fonction),
6269 COND_LMP =SIMP(statut='o',typ=fonction),
6270 COND_TMP =SIMP(statut='o',typ=fonction),
6271 COND_LPP =SIMP(statut='o',typ=fonction),
6272 COND_TPP =SIMP(statut='o',typ=fonction),
6273 COND_LSI =SIMP(statut='o',typ=fonction),
6274 COND_TSI =SIMP(statut='o',typ=fonction),
6275 COND_NMM =SIMP(statut='o',typ=fonction),
6276 COND_NMP =SIMP(statut='o',typ=fonction),
6277 COND_NPP =SIMP(statut='o',typ=fonction),
6278 COND_NSI =SIMP(statut='o',typ=fonction),
6279 CMAS_MM =SIMP(statut='f',typ=fonction),
6280 CMAS_MP =SIMP(statut='f',typ=fonction),
6281 CMAS_PP =SIMP(statut='f',typ=fonction),
6282 CMAS_SI =SIMP(statut='f',typ=fonction),
6284 SECH_GRANGER =FACT(statut='f',min=0,max=1,
6285 A =SIMP(statut='o',typ='R'),
6286 B =SIMP(statut='o',typ='R'),
6287 QSR_K =SIMP(statut='o',typ='R'),
6288 TEMP_0_C =SIMP(statut='o',typ='R'),
6290 SECH_MENSI =FACT(statut='f',min=0,max=1,
6291 A =SIMP(statut='o',typ='R'),
6292 B =SIMP(statut='o',typ='R'),
6294 SECH_BAZANT =FACT(statut='f',min=0,max=1,
6295 D1 =SIMP(statut='o',typ='R'),
6296 ALPHA_BAZANT =SIMP(statut='o',typ='R'),
6297 N =SIMP(statut='o',typ='R'),
6298 FONC_DESORP =SIMP(statut='o',typ=fonction),
6299 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
6301 SECH_NAPPE =FACT(statut='f',min=0,max=1,
6302 FONCTION =SIMP(statut='o',typ=fonction),
6303 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
6304 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="TSEC",into=("TSEC",) ),
6307 # comportement métallurgique
6309 META_ACIER =FACT(statut='f',min=0,max=1,
6310 TRC =SIMP(statut='o',typ=(tabl_trc) ),
6311 AR3 =SIMP(statut='o',typ='R'),
6312 ALPHA =SIMP(statut='o',typ='R'),
6313 MS0 =SIMP(statut='o',typ='R'),
6314 AC1 =SIMP(statut='o',typ='R'),
6315 AC3 =SIMP(statut='o',typ='R'),
6316 TAUX_1 =SIMP(statut='o',typ='R'),
6317 TAUX_3 =SIMP(statut='o',typ='R'),
6318 LAMBDA0 =SIMP(statut='f',typ='R'),
6319 QSR_K =SIMP(statut='f',typ='R'),
6320 D10 =SIMP(statut='f',typ='R'),
6321 WSR_K =SIMP(statut='f',typ='R'),
6323 META_ZIRC =FACT(statut='f',min=0,max=1,
6324 TDEQ =SIMP(statut='o',typ='R'),
6325 N =SIMP(statut='o',typ='R'),
6326 K =SIMP(statut='o',typ='R'),
6327 TDC =SIMP(statut='o',typ='R'),
6328 AC =SIMP(statut='o',typ='R'),
6329 M =SIMP(statut='o',typ='R'),
6330 QSR_K =SIMP(statut='f',typ='R'),
6331 TDR =SIMP(statut='o',typ='R'),
6332 AR =SIMP(statut='o',typ='R'),
6333 BR =SIMP(statut='o',typ='R'),
6335 DURT_META =FACT(statut='f',min=0,max=1,
6336 F1_DURT =SIMP(statut='o',typ='R'),
6337 F2_DURT =SIMP(statut='o',typ='R'),
6338 F3_DURT =SIMP(statut='o',typ='R'),
6339 F4_DURT =SIMP(statut='o',typ='R'),
6340 C_DURT =SIMP(statut='o',typ='R'),
6342 ELAS_META =FACT(statut='f',min=0,max=1,
6343 E =SIMP(statut='o',typ='R'),
6344 NU =SIMP(statut='o',typ='R'),
6345 F_ALPHA =SIMP(statut='o',typ='R'),
6346 C_ALPHA =SIMP(statut='o',typ='R'),
6347 PHASE_REFE =SIMP(statut='o',typ='TXM',into=("CHAUD","FROID")),
6348 EPSF_EPSC_TREF =SIMP(statut='o',typ='R'),
6349 TEMP_DEF_ALPHA =SIMP(statut='f',typ='R'),
6350 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E+0),
6351 F1_SY =SIMP(statut='f',typ='R'),
6352 F2_SY =SIMP(statut='f',typ='R'),
6353 F3_SY =SIMP(statut='f',typ='R'),
6354 F4_SY =SIMP(statut='f',typ='R'),
6355 C_SY =SIMP(statut='f',typ='R'),
6356 SY_MELANGE =SIMP(statut='f',typ=fonction),
6357 F1_S_VP =SIMP(statut='f',typ='R'),
6358 F2_S_VP =SIMP(statut='f',typ='R'),
6359 F3_S_VP =SIMP(statut='f',typ='R'),
6360 F4_S_VP =SIMP(statut='f',typ='R'),
6361 C_S_VP =SIMP(statut='f',typ='R' ),
6362 S_VP_MELANGE =SIMP(statut='f',typ=fonction),
6363 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="META",into=("META",)),
6365 ELAS_META_FO =FACT(statut='f',min=0,max=1,
6366 E =SIMP(statut='o',typ=fonction),
6367 NU =SIMP(statut='o',typ=fonction),
6368 F_ALPHA =SIMP(statut='o',typ=fonction),
6369 C_ALPHA =SIMP(statut='o',typ=fonction),
6370 PHASE_REFE =SIMP(statut='o',typ='TXM',into=("CHAUD","FROID")),
6371 EPSF_EPSC_TREF =SIMP(statut='o',typ='R'),
6372 TEMP_DEF_ALPHA =SIMP(statut='f',typ='R'),
6373 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E+0),
6374 F1_SY =SIMP(statut='f',typ=fonction),
6375 F2_SY =SIMP(statut='f',typ=fonction),
6376 F3_SY =SIMP(statut='f',typ=fonction),
6377 F4_SY =SIMP(statut='f',typ=fonction),
6378 C_SY =SIMP(statut='f',typ=fonction),
6379 SY_MELANGE =SIMP(statut='f',typ=fonction),
6380 F1_S_VP =SIMP(statut='f',typ=fonction),
6381 F2_S_VP =SIMP(statut='f',typ=fonction),
6382 F3_S_VP =SIMP(statut='f',typ=fonction),
6383 F4_S_VP =SIMP(statut='f',typ=fonction),
6384 C_S_VP =SIMP(statut='f',typ=fonction),
6385 S_VP_MELANGE =SIMP(statut='f',typ=fonction),
6386 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",)),
6387 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="META",into=("META",)),
6389 META_ECRO_LINE =FACT(statut='f',min=0,max=1,
6390 F1_D_SIGM_EPSI =SIMP(statut='f',typ=fonction),
6391 F2_D_SIGM_EPSI =SIMP(statut='f',typ=fonction),
6392 F3_D_SIGM_EPSI =SIMP(statut='f',typ=fonction),
6393 F4_D_SIGM_EPSI =SIMP(statut='f',typ=fonction),
6394 C_D_SIGM_EPSI =SIMP(statut='f',typ=fonction),
6395 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",)),
6397 META_TRACTION =FACT(statut='f',min=0,max=1,
6398 SIGM_F1 =SIMP(statut='f',typ=fonction),
6399 SIGM_F2 =SIMP(statut='f',typ=fonction),
6400 SIGM_F3 =SIMP(statut='f',typ=fonction),
6401 SIGM_F4 =SIMP(statut='f',typ=fonction),
6402 SIGM_C =SIMP(statut='f',typ=fonction),
6403 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="EPSI",into=("EPSI",)),
6404 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",)),
6406 META_VISC_FO =FACT(statut='f',min=0,max=1,
6407 F1_ETA =SIMP(statut='f',typ=fonction),
6408 F1_N =SIMP(statut='f',typ=fonction),
6409 F1_C =SIMP(statut='f',typ=fonction),
6410 F1_M =SIMP(statut='f',typ=fonction),
6411 F2_ETA =SIMP(statut='f',typ=fonction),
6412 F2_N =SIMP(statut='f',typ=fonction),
6413 F2_C =SIMP(statut='f',typ=fonction),
6414 F2_M =SIMP(statut='f',typ=fonction),
6415 F3_ETA =SIMP(statut='f',typ=fonction),
6416 F3_N =SIMP(statut='f',typ=fonction),
6417 F3_C =SIMP(statut='f',typ=fonction),
6418 F3_M =SIMP(statut='f',typ=fonction),
6419 F4_ETA =SIMP(statut='f',typ=fonction),
6420 F4_N =SIMP(statut='f',typ=fonction),
6421 F4_C =SIMP(statut='f',typ=fonction),
6422 F4_M =SIMP(statut='f',typ=fonction),
6423 C_ETA =SIMP(statut='f',typ=fonction),
6424 C_N =SIMP(statut='f',typ=fonction),
6425 C_C =SIMP(statut='f',typ=fonction),
6426 C_M =SIMP(statut='f',typ=fonction),
6427 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
6429 META_PT =FACT(statut='f',min=0,max=1,
6430 F1_K =SIMP(statut='f',typ='R'),
6431 F2_K =SIMP(statut='f',typ='R'),
6432 F3_K =SIMP(statut='f',typ='R'),
6433 F4_K =SIMP(statut='f',typ='R'),
6434 F1_D_F_META =SIMP(statut='f',typ=fonction),
6435 F2_D_F_META =SIMP(statut='f',typ=fonction),
6436 F3_D_F_META =SIMP(statut='f',typ=fonction),
6437 F4_D_F_META =SIMP(statut='f',typ=fonction),
6438 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
6439 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="META",into=("META",) ),
6441 META_RE =FACT(statut='f',min=0,max=1,
6442 C_F1_THETA =SIMP(statut='f',typ='R'),
6443 C_F2_THETA =SIMP(statut='f',typ='R'),
6444 C_F3_THETA =SIMP(statut='f',typ='R'),
6445 C_F4_THETA =SIMP(statut='f',typ='R'),
6446 F1_C_THETA =SIMP(statut='f',typ='R'),
6447 F2_C_THETA =SIMP(statut='f',typ='R'),
6448 F3_C_THETA =SIMP(statut='f',typ='R'),
6449 F4_C_THETA =SIMP(statut='f',typ='R'),
6452 # comportement fluide
6454 FLUIDE =FACT(statut='f',min=0,max=1,
6455 regles=(EXCLUS('CELE_C','CELE_R'),),
6456 RHO =SIMP(statut='o',typ='R'),
6457 CELE_C =SIMP(statut='f',typ='C'),
6458 CELE_R =SIMP(statut='f',typ='R'),
6460 PORO_JOINT =FACT(statut='f',min=0,max=1,
6461 RHO_FLUI =SIMP(statut='o',typ='R'),
6462 ENTRO_FLUI =SIMP(statut='o',typ='R'),
6463 BIOT_M =SIMP(statut='o',typ='R'),
6464 C_0 =SIMP(statut='o',typ='R'),
6465 T_R =SIMP(statut='o',typ='R'),
6466 ALPHA_M =SIMP(statut='o',typ='R'),
6467 LAMBDA_T =SIMP(statut='o',typ='R'),
6468 LAMBDA_H =SIMP(statut='o',typ='R'),
6469 SOURCE_INIT =SIMP(statut='o',typ='R'),
6470 OMEGA_0 =SIMP(statut='o',typ='R'),
6472 THM_LIQU =FACT(statut='f',min=0,max=1,
6473 RHO =SIMP(statut='o',typ='R'),
6474 UN_SUR_K =SIMP(statut='f',typ='R'),
6475 ALPHA =SIMP(statut='f',typ='R'),
6476 CP =SIMP(statut='f',typ='R'),
6477 VISC =SIMP(statut='f',typ=fonction),
6478 D_VISC_TEMP =SIMP(statut='f',typ=fonction),
6479 LAMBDA =SIMP(statut='f',typ=fonction),
6480 D_LAMBDA_TEMP =SIMP(statut='f',typ=fonction),
6481 COEF_HENRY =SIMP(statut='f',typ='R'),
6482 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",)),
6484 THM_GAZ =FACT(statut='f',min=0,max=1,
6485 MASS_MOL =SIMP(statut='f',typ='R'),
6486 CP =SIMP(statut='f',typ='R'),
6487 VISC =SIMP(statut='f',typ=fonction),
6488 D_VISC_TEMP =SIMP(statut='f',typ=fonction),
6489 LAMBDA =SIMP(statut='f',typ=fonction),
6490 D_LAMBDA_TEMP =SIMP(statut='f',typ=fonction),
6491 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",)),
6493 THM_VAPE_GAZ =FACT(statut='f',min=0,max=1,
6494 MASS_MOL =SIMP(statut='f',typ='R'),
6495 CP =SIMP(statut='f',typ='R'),
6496 VISC =SIMP(statut='f',typ=fonction),
6497 D_VISC_TEMP =SIMP(statut='f',typ=fonction),
6498 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",)),
6500 THM_INIT =FACT(statut='f',min=0,max=1,
6501 TEMP =SIMP(statut='o',typ='R'),
6502 PRE1 =SIMP(statut='o',typ='R'),
6503 PRE2 =SIMP(statut='o',typ='R'),
6504 PORO =SIMP(statut='o',typ='R'),
6505 PRES_VAPE =SIMP(statut='o',typ='R'),
6506 DEGR_SATU =SIMP(statut='f',typ='R'),
6507 PRES_ATMO =SIMP(statut='f',typ='R'),
6509 THM_DIFFU =FACT(statut='f',min=0,max=1,
6510 R_GAZ =SIMP(statut='o',typ='R'),
6511 RHO =SIMP(statut='f',typ='R'),
6512 CP =SIMP(statut='f',typ='R'),
6513 BIOT_COEF =SIMP(statut='f',typ='R'),
6514 SATU_PRES =SIMP(statut='f',typ=fonction),
6515 D_SATU_PRES =SIMP(statut='f',typ=fonction),
6516 PESA_X =SIMP(statut='f',typ='R'),
6517 PESA_Y =SIMP(statut='f',typ='R'),
6518 PESA_Z =SIMP(statut='f',typ='R'),
6519 PERM_IN =SIMP(statut='f',typ=fonction),
6520 PERM_LIQU =SIMP(statut='f',typ=fonction),
6521 D_PERM_LIQU_SATU=SIMP(statut='f',typ=fonction),
6522 PERM_GAZ =SIMP(statut='f',typ=fonction),
6523 D_PERM_SATU_GAZ =SIMP(statut='f',typ=fonction),
6524 D_PERM_PRES_GAZ =SIMP(statut='f',typ=fonction),
6525 FICK =SIMP(statut='f',typ=fonction),
6526 D_FICK_TEMP =SIMP(statut='f',typ=fonction),
6527 D_FICK_GAZ_PRES =SIMP(statut='f',typ=fonction),
6528 LAMBDA =SIMP(statut='f',typ=fonction),
6529 D_LAMBDA_TEMP =SIMP(statut='f',typ=fonction),
6530 SIGMA_T =SIMP(statut='f',typ=fonction),
6531 D_SIGMA_T =SIMP(statut='f',typ=fonction),
6532 PERM_G_INTR =SIMP(statut='f',typ=fonction),
6533 CHAL_VAPO =SIMP(statut='f',typ=fonction),
6534 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
6535 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="SAT",into=("SAT",) ),
6536 VERI_P3 =SIMP(statut='c',typ='TXM',defaut="PORO",into=("PORO",) ),
6537 VERI_P4 =SIMP(statut='c',typ='TXM',defaut="PGAZ",into=("PGAZ",) ),
6538 VERI_P5 =SIMP(statut='c',typ='TXM',defaut="PGAP",into=("PGAP",) ),
6541 # courbes et coefficients associés à la fatigue et au dommage
6543 FATIGUE =FACT(statut='f',min=0,max=1,
6544 regles=(PRESENT_ABSENT('WOHLER','A_BASQUIN','BETA_BASQUIN'),
6545 PRESENT_ABSENT('WOHLER','A0','A1','A2','A3','SL'),
6546 PRESENT_ABSENT('A_BASQUIN','A0','A1','A2','A3','SL'),
6547 ENSEMBLE('A_BASQUIN','BETA_BASQUIN'),
6548 ENSEMBLE('A0','A1','A2','A3','SL'),
6549 PRESENT_PRESENT('A0','E_REFE'),
6550 ENSEMBLE('D0','TAU0'),),
6551 WOHLER =SIMP(statut='f',typ=fonction),
6552 A_BASQUIN =SIMP(statut='f',typ='R'),
6553 BETA_BASQUIN =SIMP(statut='f',typ='R'),
6554 A0 =SIMP(statut='f',typ='R'),
6555 A1 =SIMP(statut='f',typ='R'),
6556 A2 =SIMP(statut='f',typ='R'),
6557 A3 =SIMP(statut='f',typ='R'),
6558 SL =SIMP(statut='f',typ='R'),
6559 MANSON_COFFIN =SIMP(statut='f',typ=fonction),
6560 E_REFE =SIMP(statut='f',typ='R'),
6561 D0 =SIMP(statut='f',typ='R'),
6562 TAU0 =SIMP(statut='f',typ='R'),
6563 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="SIGM",into=("SIGM",) ),
6564 VERI_P2 =SIMP(statut='c',typ='TXM',defaut="EPSI",into=("EPSI",) ),
6566 DOMMA_LEMAITRE =FACT(statut='f',min=0,max=1,
6567 S =SIMP(statut='o',typ=fonction),
6568 EPSP_SEUIL =SIMP(statut='o',typ='R'),
6569 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
6572 # autres comportements ...
6574 WEIBULL =FACT(statut='f',min=0,max=1,
6575 M =SIMP(statut='o',typ='R'),
6576 VOLU_REFE =SIMP(statut='o',typ='R'),
6577 SIGM_REFE =SIMP(statut='o',typ='R'),
6578 SEUIL_EPSP_CUMU =SIMP(statut='f',typ='R',defaut= 1.0E-6),
6580 WEIBULL_FO =FACT(statut='f',min=0,max=1,
6581 M =SIMP(statut='o',typ='R'),
6582 VOLU_REFE =SIMP(statut='o',typ='R'),
6583 SIGM_CNV =SIMP(statut='o',typ='R'),
6584 SIGM_REFE =SIMP(statut='o',typ=fonction),
6585 SEUIL_EPSP_CUMU =SIMP(statut='f',typ='R',defaut= 1.0E-6),
6586 VERI_P1 =SIMP(statut='c',typ='TXM',defaut="TEMP",into=("TEMP",) ),
6588 CONTACT =FACT(statut='f',min=0,max=1,
6589 E_N =SIMP(statut='o',typ='R'),
6590 E_T =SIMP(statut='f',typ='R',defaut= 0.E+0),
6591 COULOMB =SIMP(statut='f',typ='R',defaut= 0.E+0),
6593 NON_LOCAL =FACT(statut='f',min=0,max=1,
6594 LONG_CARA =SIMP(statut='o',typ='R'),
6595 COEF_RIGI_MINI =SIMP(statut='f',typ='R'),
6597 RUPT_FRAG =FACT(statut='f',min=0,max=1,
6598 GC =SIMP(statut='o',typ='R'),
6600 RCCM =FACT(statut='f',min=0,max=1,
6601 SY_02 =SIMP(statut='f',typ='R'),
6602 SM =SIMP(statut='f',typ='R'),
6603 SU =SIMP(statut='f',typ='R'),
6604 SC =SIMP(statut='f',typ='R'),
6605 SH =SIMP(statut='f',typ='R'),
6606 N_KE =SIMP(statut='f',typ='R'),
6607 M_KE =SIMP(statut='f',typ='R'),
6609 RCCM_FO =FACT(statut='f',min=0,max=1,
6610 SY_02 =SIMP(statut='f',typ=fonction),
6611 SM =SIMP(statut='f',typ=fonction),
6612 SU =SIMP(statut='f',typ=fonction),
6613 S =SIMP(statut='f',typ=fonction),
6614 N_KE =SIMP(statut='f',typ=fonction),
6615 M_KE =SIMP(statut='f',typ=fonction),
6617 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
6619 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
6620 # CONFIGURATION MANAGEMENT OF EDF VERSION
6621 # ======================================================================
6622 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
6623 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6624 # REDISTRIBUTION OF THIS FILE.
6625 # ======================================================================
6626 DEFI_MODELE_GENE=OPER(nom="DEFI_MODELE_GENE",op= 126,sd_prod=modele_gene,
6627 docu="U4.65.02-d",reentrant='n',
6628 SOUS_STRUC =FACT(statut='o',min=01,max='**',
6629 NOM =SIMP(statut='o',typ='TXM' ),
6630 MACR_ELEM_DYNA =SIMP(statut='o',typ=macr_elem_dyna ),
6631 ANGL_NAUT =SIMP(statut='f',typ='R',max=03),
6632 TRANS =SIMP(statut='f',typ='R',max=03),
6634 LIAISON =FACT(statut='o',min=01,max='**',
6635 SOUS_STRUC_1 =SIMP(statut='o',typ='TXM' ),
6636 INTERFACE_1 =SIMP(statut='o',typ='TXM' ),
6637 SOUS_STRUC_2 =SIMP(statut='o',typ='TXM' ),
6638 INTERFACE_2 =SIMP(statut='o',typ='TXM' ),
6640 VERIF =FACT(statut='f',min=01,max='**',
6641 # dans la doc U stop_erreur est obligatoire
6642 STOP_ERREUR =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
6643 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
6644 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
6647 #& MODIF COMMANDE DATE 03/10/2001 AUTEUR DURAND C.DURAND
6648 # CONFIGURATION MANAGEMENT OF EDF VERSION
6649 # ======================================================================
6650 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
6651 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6652 # REDISTRIBUTION OF THIS FILE.
6653 # ======================================================================
6654 DEFI_NAPPE=OPER(nom="DEFI_NAPPE",op= 4,sd_prod=fonction,
6655 fr="Définition des valeurs d une fonction de deux variables réelles",
6656 docu="U4.31.03-f1",reentrant='n',
6657 regles=(UN_PARMI('FONCTION','DEFI_FONCTION'),
6658 EXCLUS('FONCTION','NOM_PARA_FONC',),
6659 ENSEMBLE('NOM_PARA_FONC','DEFI_FONCTION'),),
6660 NOM_PARA =SIMP(statut='o',typ='TXM',into=("TEMP","INST","X","Y","Z","FREQ","PULS",
6661 "AMOR","EPAIS","TSEC","HYDR","SECH") ),
6662 NOM_RESU =SIMP(statut='f',typ='TXM',defaut="TOUTRESU"),
6663 PARA =SIMP(statut='o',typ='R',max='**'),
6664 FONCTION =SIMP(statut='f',typ=fonction,max='**' ),
6665 NOM_PARA_FONC =SIMP(statut='f',typ='TXM',into=("TEMP","INST","X","Y","Z","EPSI","FREQ",
6666 "PULS","AMOR","EPAIS") ),
6667 DEFI_FONCTION =FACT(statut='f',max='**',
6668 VALE =SIMP(statut='o',typ='R',max='**'),
6669 INTERPOL =SIMP(statut='f',typ='TXM',max=2,defaut="LIN",into=("NON","LIN","LOG") ),
6670 PROL_DROITE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU") ),
6671 PROL_GAUCHE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU") ),
6673 INTERPOL =SIMP(statut='f',typ='TXM',max=2,defaut="LIN",into=("NON","LIN","LOG") ),
6674 PROL_DROITE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU") ),
6675 PROL_GAUCHE =SIMP(statut='f',typ='TXM',defaut="EXCLU",into=("CONSTANT","LINEAIRE","EXCLU") ),
6676 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
6677 VERIF =SIMP(statut='f',typ='TXM',into=("CROISSANT",) ),
6678 TITRE =SIMP(statut='f',typ='TXM',max='**'),
6680 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
6681 # CONFIGURATION MANAGEMENT OF EDF VERSION
6682 # ======================================================================
6683 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
6684 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6685 # REDISTRIBUTION OF THIS FILE.
6686 # ======================================================================
6687 DEFI_OBSTACLE=OPER(nom="DEFI_OBSTACLE",op= 73,sd_prod=obstacle
6688 ,fr="Définition d un obstacle plan perpendiculaire à une structure filaire",
6689 docu="U4.44.21-e",reentrant='n',
6690 TYPE =SIMP(statut='o',typ='TXM',defaut="CERCLE",
6691 into=("CERCLE","PLAN_Y","PLAN_Z","DISCRET",
6692 "BI_CERCLE","BI_PLAN_Y","BI_PLAN_Z","BI_CERC_INT",
6693 "CRAYON_900","CRAYON_1300","GUID_A_CARTE_900",
6694 "GUID_B_CARTE_900","GUID_C_CARTE_900",
6695 "GUID_D_CARTE_900","GUID_E_CARTE_900",
6696 "GUID_F_CARTE_900","GUID_A_CARTE_1300",
6697 "GUID_B_CARTE_1300","GUID_C_CARTE_1300",
6698 "GUID_D_CARTE_1300","GUID_E_CARTE_1300",
6699 "GUID_F_CARTE_1300","GUID_A_CARSP_900",
6700 "GUID_B_CARSP_900","GUID_C_CARSP_900",
6701 "GUID_D_CARSP_900","GUID_E_CARSP_900",
6702 "GUID_F_CARSP_900","GUID_A_CARSP_1300",
6703 "GUID_B_CARSP_1300","GUID_C_CARSP_1300",
6704 "GUID_D_CARSP_1300","GUID_E_CARSP_1300",
6705 "GUID_F_CARSP_1300","GUID_A_GCONT_900",
6706 "GUID_B_GCONT_900","GUID_C_GCONT_900",
6707 "GUID_D_GCONT_900","GUID_E_GCONT_900",
6708 "GUID_F_GCONT_900","GUID_A_GCONT_1300",
6709 "GUID_B_GCONT_1300","GUID_C_GCONT_1300",
6710 "GUID_D_GCONT_1300","GUID_E_GCONT_1300",
6711 "GUID_F_GCONT_1300","GUID_A_GCOMB_900",
6712 "GUID_B_GCOMB_900","GUID_C_GCOMB_900",
6713 "GUID_D_GCOMB_900","GUID_E_GCOMB_900",
6714 "GUID_F_GCOMB_900","GUID_A_GCOMB_1300",
6715 "GUID_B_GCOMB_1300","GUID_C_GCOMB_1300",
6716 "GUID_D_GCOMB_1300","GUID_E_GCOMB_1300",
6717 "GUID_F_GCOMB_1300",) ),
6718 VALE =SIMP(statut='f',typ='R',max='**'),
6719 VERIF =SIMP(statut='f',typ='TXM',defaut="FERME"),
6721 #& MODIF COMMANDE DATE 10/10/2001 AUTEUR DURAND C.DURAND
6722 # CONFIGURATION MANAGEMENT OF EDF VERSION
6723 # ======================================================================
6724 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
6725 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6726 # REDISTRIBUTION OF THIS FILE.
6727 # ======================================================================
6728 # RESPONSABLE GNICOLAS G.NICOLAS
6729 DEFI_PARA_SENSI=OPER(nom="DEFI_PARA_SENSI",op= 2,sd_prod=para_sensi,
6730 fr="Définition d'un paramètre de sensibilité",
6731 ang="Definition of a sensitive parameter",
6732 docu="U4.31.xx-a",reentrant='n',
6733 NOM_RESU =SIMP(statut='c',typ='TXM',into=("TOUTRESU",),defaut="TOUTRESU",
6734 fr="Nom du concept créé",
6735 ang="Name of the concept"),
6736 VALE =SIMP(statut='o',typ='R',max=01,
6737 fr="Valeur du parametre",
6738 ang="Value of the parameter"),
6739 TITRE =SIMP(statut='f',typ='TXM',max='**'),
6741 #& MODIF COMMANDE DATE 07/03/2001 AUTEUR VABHHTS J.PELLET
6742 # CONFIGURATION MANAGEMENT OF EDF VERSION
6743 # ======================================================================
6744 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
6745 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6746 # REDISTRIBUTION OF THIS FILE.
6747 # ======================================================================
6748 DEFI_SPEC_TURB=OPER(nom="DEFI_SPEC_TURB",op= 145,sd_prod=spectre,
6749 fr="Définition d'un spectre d'excitation turbulente",
6750 docu="U4.44.31-c",reentrant='n',
6751 regles=(UN_PARMI('SPEC_LONG_COR_1','SPEC_LONG_COR_2','SPEC_LONG_COR_3',
6752 'SPEC_LONG_COR_4','SPEC_CORR_CONV_1','SPEC_CORR_CONV_2',
6753 'SPEC_FONC_FORME','SPEC_EXCI_POINT'),),
6754 SPEC_LONG_COR_1 =FACT(statut='f',min=00,max=01,
6755 LONG_COR =SIMP(statut='o',typ='R' ),
6756 PROF_VITE_FLUI =SIMP(statut='o',typ=fonction ),
6757 VISC_CINE =SIMP(statut='o',typ='R' ),
6759 SPEC_LONG_COR_2 =FACT(statut='f',min=00,max=01,
6760 regles=(ENSEMBLE('FREQ_COUP','PHI0','BETA' ),),
6761 LONG_COR =SIMP(statut='o',typ='R' ),
6762 PROF_VITE_FLUI =SIMP(statut='o',typ=fonction ),
6763 FREQ_COUP =SIMP(statut='f',typ='R',defaut= 0.1 ),
6764 PHI0 =SIMP(statut='f',typ='R',defaut= 1.5E-3 ),
6765 BETA =SIMP(statut='f',typ='R',defaut= 2.7 ),
6767 SPEC_LONG_COR_3 =FACT(statut='f',min=00,max=01,
6768 regles=(ENSEMBLE('PHI0_1','BETA_1','PHI0_2','BETA_2','FREQ_COUP'),),
6769 LONG_COR =SIMP(statut='o',typ='R' ),
6770 PROF_VITE_FLUI =SIMP(statut='o',typ=fonction ),
6771 FREQ_COUP =SIMP(statut='f',typ='R',defaut= 0.2 ),
6772 PHI0_1 =SIMP(statut='f',typ='R',defaut= 5.E-3 ),
6773 BETA_1 =SIMP(statut='f',typ='R',defaut= 0.5 ),
6774 PHI0_2 =SIMP(statut='f',typ='R',defaut= 4.E-5 ),
6775 BETA_2 =SIMP(statut='f',typ='R',defaut= 3.5 ),
6777 SPEC_LONG_COR_4 =FACT(statut='f',min=00,max=01,
6778 regles=(ENSEMBLE('BETA','GAMMA'),),
6779 LONG_COR =SIMP(statut='o',typ='R' ),
6780 PROF_VITE_FLUI =SIMP(statut='o',typ=fonction ),
6781 TAUX_VIDE =SIMP(statut='o',typ='R' ),
6782 BETA =SIMP(statut='f',typ='R',defaut= 2. ),
6783 GAMMA =SIMP(statut='f',typ='R',defaut= 4. ),
6785 SPEC_CORR_CONV_1=FACT(statut='f',min=00,max=01,
6786 LONG_COR_1 =SIMP(statut='o',typ='R' ),
6787 LONG_COR_2 =SIMP(statut='f',typ='R' ),
6788 VITE_FLUI =SIMP(statut='o',typ='R' ),
6789 RHO_FLUI =SIMP(statut='o',typ='R' ),
6790 FREQ_COUP =SIMP(statut='f',typ='R' ),
6791 K =SIMP(statut='f',typ='R',defaut= 5.8E-3 ),
6792 D_FLUI =SIMP(statut='o',typ='R' ),
6793 COEF_VITE_FLUI_A=SIMP(statut='f',typ='R' ),
6794 COEF_VITE_FLUI_O=SIMP(statut='f',typ='R' ),
6795 METHODE =SIMP(statut='f',typ='TXM',defaut="GENERALE",
6796 into=("AU_YANG","GENERALE","CORCOS") ),
6798 SPEC_CORR_CONV_2=FACT(statut='f',min=00,max=01,
6799 FONCTION =SIMP(statut='o',typ=fonction ),
6800 VITE_FLUI =SIMP(statut='o',typ='R' ),
6801 FREQ_COUP =SIMP(statut='f',typ='R' ),
6802 METHODE =SIMP(statut='f',typ='TXM',defaut="GENERALE",
6803 into=("AU_YANG","GENERALE","CORCOS",) ),
6804 COEF_VITE_FLUI_A=SIMP(statut='f',typ='R' ),
6805 COEF_VITE_FLUI_O=SIMP(statut='f',typ='R' ),
6807 SPEC_FONC_FORME =FACT(statut='f',min=00,max=01,
6808 regles=(UN_PARMI('INTE_SPEC','GRAPPE_1'),
6809 ENSEMBLE('INTE_SPEC','FONCTION'),),
6810 INTE_SPEC =SIMP(statut='f',typ=tabl_intsp ),
6811 FONCTION =SIMP(statut='f',typ=fonction,max='**'),
6812 GRAPPE_1 =SIMP(statut='f',typ='TXM',into=("DEBIT_180","DEBIT_300",) ),
6813 NOEUD =SIMP(statut='o',typ=no),
6814 CARA_ELEM =SIMP(statut='o',typ=cara_elem ),
6815 MODELE =SIMP(statut='o',typ=modele ),
6817 SPEC_EXCI_POINT =FACT(statut='f',min=00,max=01,
6818 regles=(UN_PARMI('INTE_SPEC','GRAPPE_2'),),
6819 INTE_SPEC =SIMP(statut='f',typ=tabl_intsp ),
6820 GRAPPE_2 =SIMP(statut='f',typ='TXM',
6821 into=("ASC_CEN","ASC_EXC","DES_CEN","DES_EXC",) ),
6822 # Quels sont les statuts des mots cles à l interieur des deux blocs qui suivent
6823 b_inte_spec =BLOC(condition = "INTE_SPEC != None",
6824 NATURE =SIMP(statut='o',typ='TXM',max='**',into=("FORCE","MOMENT",) ),
6825 ANGL =SIMP(statut='o',typ='R',max='**'),
6826 NOEUD =SIMP(statut='o',typ=no,max='**'),
6828 b_grappe_2 =BLOC(condition = "GRAPPE_2 != None",
6829 RHO_FLUI =SIMP(statut='o',typ='R' ),
6830 NOEUD =SIMP(statut='o',typ=no),
6832 CARA_ELEM =SIMP(statut='o',typ=cara_elem ),
6833 MODELE =SIMP(statut='o',typ=modele ),
6835 TITRE =SIMP(statut='f',typ='TXM',max='**'),
6837 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
6838 # CONFIGURATION MANAGEMENT OF EDF VERSION
6839 # ======================================================================
6840 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
6841 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6842 # REDISTRIBUTION OF THIS FILE.
6843 # ======================================================================
6844 DEFI_SQUELETTE=OPER(nom="DEFI_SQUELETTE",op= 110,sd_prod=squelette,
6845 fr="Définition d un maillage de visualisation",
6846 docu="U4.24.01-e",reentrant='n',
6847 regles=(UN_PARMI('MODE_CYCL','MODELE_GENE','MAILLAGE'),
6848 PRESENT_PRESENT('MODE_CYCL','SECTEUR'),
6849 EXCLUS('SOUS_STRUC','SECTEUR'),
6850 PRESENT_PRESENT('NOM_GROUP_MA','MODELE_GENE'),
6851 PRESENT_PRESENT('NOM_GROUP_MA','SOUS_STRUC'),),
6852 MODE_CYCL =SIMP(statut='f',typ=mode_cycl ),
6853 MODELE_GENE =SIMP(statut='f',typ=modele_gene ),
6854 SQUELETTE =SIMP(statut='f',typ=squelette ),
6855 RECO_GLOBAL =FACT(statut='f',min=01,max='**',
6856 regles=(EXCLUS('TOUT','GROUP_NO_1'),
6857 PRESENT_PRESENT('GROUP_NO_1','GROUP_NO_2'),
6858 PRESENT_PRESENT('GROUP_NO_1','SOUS_STRUC_1'),
6859 PRESENT_PRESENT('GROUP_NO_2','SOUS_STRUC_2'),
6860 PRESENT_PRESENT('SOUS_STRUC_1','SOUS_STRUC_2'),),
6861 TOUT =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI",) ),
6862 GROUP_NO_1 =SIMP(statut='f',typ=grno),
6863 SOUS_STRUC_1 =SIMP(statut='f',typ='TXM' ),
6864 GROUP_NO_2 =SIMP(statut='f',typ=grno),
6865 SOUS_STRUC_2 =SIMP(statut='f',typ='TXM' ),
6866 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
6867 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
6868 DIST_REFE =SIMP(statut='f',typ='R' ),
6870 NOM_GROUP_MA =FACT(statut='f',min=01,max='**',
6871 NOM =SIMP(statut='o',typ='TXM' ),
6872 SOUS_STRUC =SIMP(statut='o',typ='TXM' ),
6873 GROUP_MA =SIMP(statut='o',typ=grma),
6875 EXCLUSIF =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
6876 MAILLAGE =SIMP(statut='f',typ=maillage ),
6877 MAILLE =SIMP(statut='f',typ=ma,max='**'),
6878 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
6879 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
6880 TRANS =SIMP(statut='f',typ='R',min=3,max=3),
6881 ANGL_NAUT =SIMP(statut='f',typ='R',min=3,max=3),
6882 SOUS_STRUC =FACT(statut='f',min=01,max='**',
6883 NOM =SIMP(statut='f',typ='TXM' ),
6884 MAILLE =SIMP(statut='f',typ=ma,max='**'),
6885 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
6886 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
6888 SECTEUR =FACT(statut='f',min=01,max='**',
6889 MAILLE =SIMP(statut='f',typ=ma,max='**'),
6890 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
6891 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
6893 TITRE =SIMP(statut='f',typ='TXM',max='**'),
6895 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
6896 # CONFIGURATION MANAGEMENT OF EDF VERSION
6897 # ======================================================================
6898 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
6899 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6900 # REDISTRIBUTION OF THIS FILE.
6901 # ======================================================================
6902 DEFI_TEXTURE=OPER(nom="DEFI_TEXTURE",op= 181,sd_prod=tabl_texture,
6903 fr=" ",docu="U4.43.05-a",reentrant='n',
6904 SYST_GLISSEMENT =FACT(statut='o',min=3,max=3,
6905 N =SIMP(statut='o',typ='R',min=12,max=12 ),
6906 L =SIMP(statut='o',typ='R',max='**' ),
6908 PLAN =FACT(statut='o',min=40,max=40,
6909 ANGL_NAUT =SIMP(statut='o',typ='R',max='**' ),
6910 PROPORTION =SIMP(statut='o',typ='R' ),
6912 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
6914 #& MODIF COMMANDE DATE 03/10/2001 AUTEUR DURAND C.DURAND
6915 # CONFIGURATION MANAGEMENT OF EDF VERSION
6916 # ======================================================================
6917 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
6918 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6919 # REDISTRIBUTION OF THIS FILE.
6920 # ======================================================================
6921 DEFI_THER_JOULE=OPER(nom="DEFI_THER_JOULE",op= 121,sd_prod=fonction,docu="U4.MK.20-d",reentrant='n',
6922 fr="Calculer la fonction d évolution temporelle de température due à l effet JOULE dans un cable",
6923 LIST_INST =SIMP(statut='o',typ=listr8),
6924 INST_CC_INIT =SIMP(statut='f',typ='R',defaut= 0.0E+0 ),
6925 INST_CC_FIN =SIMP(statut='f',typ='R',defaut= 1.0E+10),
6926 INST_RENC_INIT =SIMP(statut='f',typ='R',defaut= 1.0E+10),
6927 INST_RENC_FIN =SIMP(statut='f',typ='R',defaut= 1.0E+10),
6928 TEMP_EXT_POSE =SIMP(statut='f',typ='R',defaut= 15.0E+0),
6929 TEMP_EXT =SIMP(statut='f',typ='R',defaut= 15.0E+0),
6930 TEMP_RESI_REF =SIMP(statut='f',typ='R',defaut= 20.0E+0),
6931 PARA_COND_1D =FACT(statut='f',min=01,max='**',
6932 INTE_CC =SIMP(statut='f',typ='R',defaut= 0.0E+0),
6933 INTE_RENC =SIMP(statut='f',typ='R',defaut= 0.0E+0),
6934 A =SIMP(statut='f',typ='R',defaut= 1.0E+0),
6935 SECTION =SIMP(statut='f',typ='TXM',defaut="CERCLE",into=("CERCLE",) ),
6936 RESI_R0 =SIMP(statut='f',typ='R',defaut= 0.0E+0),
6937 RESI_R1 =SIMP(statut='f',typ='R',defaut= 0.E+0),
6938 RHO_CP =SIMP(statut='f',typ='R',defaut= 1.0E+0),
6939 COEF_H =SIMP(statut='f',typ='R',defaut= 40.0E+0),
6940 TEMP_INIT =SIMP(statut='f',typ='R',defaut= 15.0E+0),
6944 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
6945 # CONFIGURATION MANAGEMENT OF EDF VERSION
6946 # ======================================================================
6947 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
6948 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6949 # REDISTRIBUTION OF THIS FILE.
6950 # ======================================================================
6951 DEFI_TRC=OPER(nom="DEFI_TRC",op=94,sd_prod=tabl_trc,docu="U4.43.04-e",reentrant='n',
6952 fr="Définition d un diagramme de transformations en refroidissement continu d un acier",
6953 HIST_EXP =FACT(statut='o',min=01,max='**',
6954 VALE =SIMP(statut='o',typ='R',max='**'),
6956 TEMP_MS =FACT(statut='o',min=01,max='**',
6957 SEUIL =SIMP(statut='o',typ='R'),
6958 AKM =SIMP(statut='o',typ='R'),
6959 BKM =SIMP(statut='o',typ='R'),
6960 TPLM =SIMP(statut='o',typ='R'),
6962 GRAIN_AUST =FACT(statut='f',min=01,max='**',
6963 DREF =SIMP(statut='f',typ='R'),
6964 A =SIMP(statut='f',typ='R'),
6967 #& MODIF COMMANDE DATE 12/09/2001 AUTEUR MCOURTOI M.COURTOIS
6968 # CONFIGURATION MANAGEMENT OF EDF VERSION
6969 # ======================================================================
6970 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
6971 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6972 # REDISTRIBUTION OF THIS FILE.
6973 # ======================================================================
6974 def defi_valeur_prod(self,IS=None,R8=None,TX=None,C8=None,LS=None):
6975 if IS != None : return entier
6976 if R8 != None : return reel
6977 if TX != None : return chaine
6978 if C8 != None : return complexe
6979 if LS != None : return liste
6980 raise AsException("type de concept resultat non prevu")
6982 DEFI_VALEUR=MACRO(nom="DEFI_VALEUR",op=-4,sd_prod=defi_valeur_prod,
6983 fr="Affectation d une valeur à une variable Superviseur",
6984 docu="U4.31.04-e1",reentrant='f',
6985 regles=(UN_PARMI('IS','R8','TX','C8','LS'),),
6986 IS =SIMP(statut='f',typ='I',max='**'),
6987 R8 =SIMP(statut='f',typ='R',max='**'),
6988 TX =SIMP(statut='f',typ='TXM',max='**'),
6989 C8 =SIMP(statut='f',typ='C',max='**'),
6990 LS =SIMP(statut='f',typ='L',max='**'),
6992 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
6993 # CONFIGURATION MANAGEMENT OF EDF VERSION
6994 # ======================================================================
6995 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
6996 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
6997 # REDISTRIBUTION OF THIS FILE.
6998 # ======================================================================
6999 DEFUFI=PROC(nom="DEFUFI",op=21,docu="U4.12.01-d",
7000 fr="Modification / ajout d une unité logique en sortie en complément de celles définies dans DEBUT",
7001 IMPRESSION =FACT(statut='o',min=01,max='**',
7002 NOM =SIMP(statut='o',typ='TXM',max='**'),
7003 UNITE =SIMP(statut='o',typ='I' ),
7006 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
7007 # CONFIGURATION MANAGEMENT OF EDF VERSION
7008 # ======================================================================
7009 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7010 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
7011 # REDISTRIBUTION OF THIS FILE.
7012 # ======================================================================
7013 DEPL_INTERNE=OPER(nom="DEPL_INTERNE",op=89,sd_prod=cham_no_depl_r,docu="U4.62.02-e",reentrant='n',
7014 fr="Récupération du champ de déplacement interne à une sous-structure",
7015 DEPL_GLOBAL =SIMP(statut='o',typ=cham_no_depl_r),
7016 MAILLE =SIMP(statut='o',typ=ma,max=1),
7017 NOM_CAS =SIMP(statut='f',typ='TXM',defaut=" "),
7019 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
7020 # CONFIGURATION MANAGEMENT OF EDF VERSION
7021 # ======================================================================
7022 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7023 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
7024 # REDISTRIBUTION OF THIS FILE.
7025 # ======================================================================
7026 DETRUIRE=PROC(nom="DETRUIRE",op=-7,docu="U4.14.01-d",
7027 fr="Destruction d un concept utilisateur dans la base GLOBALE",
7028 op_init=ops.detruire,
7029 CONCEPT =FACT(statut='o',min=01,
7030 NOM =SIMP(statut='o',typ=assd,max='**'),
7033 #& MODIF COMMANDE DATE 03/10/2001 AUTEUR DURAND C.DURAND
7034 # CONFIGURATION MANAGEMENT OF EDF VERSION
7035 # ======================================================================
7036 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7037 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
7038 # REDISTRIBUTION OF THIS FILE.
7039 # ======================================================================
7040 DIST_LIGN_3D=OPER(nom="DIST_LIGN_3D",op= 133,sd_prod=fonction,docu="U4.MK.30-d",reentrant='n',
7041 fr="Calcul sous forme d une fonction du temps de la distance minimale entre deux structures filaires",
7042 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','LIST_ORDRE','INST','LIST_INST'),
7043 UN_PARMI('GROUP_MA_2','POIN_FIXE'),),
7044 MODELE =SIMP(statut='o',typ=modele),
7045 RESULTAT =SIMP(statut='o',typ=(evol_elas,dyna_trans,evol_noli) ),
7046 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",)),
7047 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
7048 INST =SIMP(statut='f',typ='R',max='**'),
7049 LIST_INST =SIMP(statut='f',typ=listr8),
7050 LIST_ORDRE =SIMP(statut='f',typ=listis),
7051 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
7052 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
7053 GROUP_MA_1 =SIMP(statut='o',typ=grma,max='**'),
7054 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
7055 POIN_FIXE =SIMP(statut='f',typ='R',min=3,max=3),
7056 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
7058 #& MODIF COMMANDE DATE 28/03/2001 AUTEUR CIBHHLV L.VIVAN
7059 # CONFIGURATION MANAGEMENT OF EDF VERSION
7060 # ======================================================================
7061 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7062 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
7063 # REDISTRIBUTION OF THIS FILE.
7064 # ======================================================================
7065 DYNA_ALEA_MODAL=OPER(nom="DYNA_ALEA_MODAL",op= 131,sd_prod=tabl_intsp
7066 ,fr="Calcule la réponse spectrale d une structure linéaire sous une excitation connue par sa DSP",
7067 docu="U4.53.22-d",reentrant='n',
7068 BASE_MODALE =FACT(statut='o',min=01,max=01,
7069 regles=(UN_PARMI('NUME_ORDRE','BANDE'),),
7070 MODE_MECA =SIMP(statut='o',typ=mode_meca ),
7071 BANDE =SIMP(statut='f',typ='R',max=02),
7072 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
7073 b_bande =BLOC(condition = "BANDE != None",
7074 AMOR_UNIF =SIMP(statut='o',typ='R' ),
7076 b_nume_ordre =BLOC(condition = "NUME_ORDRE != None",
7077 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**'),
7080 MODE_STAT =SIMP(statut='f',typ=(mode_stat_depl,mode_stat_acce,mode_stat_forc,)),
7081 EXCIT =FACT(statut='o',min=01,max=01,
7082 regles=(UN_PARMI('NOEUD_I','NUME_ORDRE_I'),
7083 EXCLUS('CHAM_NO','NOEUD'),),
7084 DERIVATION =SIMP(statut='f',typ='I',defaut= 0,into=( 0 , 1 , 2 ) ),
7085 MODAL =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
7086 # dans la doc U il y a plus de choix pour GRANDEUR
7087 GRANDEUR =SIMP(statut='f',typ='TXM',defaut="DEPL_R",
7088 into=("DEPL_R","EFFO","SOUR_DEBI_VOLU","SOUR_DEBI_MASS","SOUR_PRESS","SOUR_FORCE")),
7089 INTE_SPEC =SIMP(statut='o',typ=tabl_intsp ),
7090 NUME_VITE_FLUI =SIMP(statut='f',typ='I' ),
7091 OPTION =SIMP(statut='f',typ='TXM',defaut="TOUT",into=("TOUT","DIAG",) ),
7092 # Toutes les regles ne semblent pas avoir été ecrites dans la doc U
7093 NUME_ORDRE_I =SIMP(statut='f',typ='I',max='**'),
7094 NOEUD_I =SIMP(statut='f',typ=no,max='**'),
7095 b_nume_ordre_i =BLOC(condition = "NUME_ORDRE_I != None",
7096 NUME_ORDRE_J =SIMP(statut='o',typ='I',max='**'),
7098 b_noeud_i =BLOC(condition = "NOEUD_I != None",
7099 NOEUD_J =SIMP(statut='o',typ=no,max='**'),
7100 NOM_CMP_I =SIMP(statut='o',typ='TXM',max='**'),
7101 NOM_CMP_J =SIMP(statut='o',typ='TXM',max='**'),
7103 CHAM_NO =SIMP(statut='f',typ=cham_no),
7104 NOEUD =SIMP(statut='f',typ=no,max='**'),
7105 b_noeud =BLOC(condition = "NOEUD != None",
7106 NOM_CMP =SIMP(statut='o',typ='TXM',max='**'),
7109 REPONSE =FACT(statut='f',min=01,max=01,
7110 regles=(EXCLUS('FREQ_MIN','NB_POIN_MODE'),
7111 EXCLUS('FREQ_MIN','FREQ_EXCIT'),
7112 ENSEMBLE('FREQ_MIN','FREQ_MAX'),),
7113 # Toutes les regles ne semblent pas avoir été ecrites dans la doc U
7114 DERIVATION =SIMP(statut='f',typ='I',defaut= 0,into=( 0 , 1 , 2 ,) ),
7115 OPTION =SIMP(statut='f',typ='TXM',defaut="TOUT",into=("TOUT","DIAG") ),
7116 FREQ_MIN =SIMP(statut='f',typ='R' ),
7117 FREQ_MAX =SIMP(statut='f',typ='R' ),
7118 PAS =SIMP(statut='f',typ='R' ),
7119 FREQ_EXCIT =SIMP(statut='f',typ='TXM',defaut="AVEC",into=("AVEC","SANS") ),
7120 NB_POIN_MODE =SIMP(statut='f',typ='I',defaut= 50 ),
7122 TITRE =SIMP(statut='f',typ='TXM',max='**'),
7123 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
7125 #& MODIF COMMANDE DATE 10/07/2001 AUTEUR ACBHHCD G.DEVESA
7126 # CONFIGURATION MANAGEMENT OF EDF VERSION
7127 # ======================================================================
7128 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7129 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
7130 # REDISTRIBUTION OF THIS FILE.
7131 # ======================================================================
7132 def dyna_line_harm_prod(MATR_MASS,**args):
7133 if AsType(MATR_MASS) == matr_asse_depl_r : return dyna_harmo
7134 if AsType(MATR_MASS) == matr_asse_depl_c : return dyna_harmo
7135 if AsType(MATR_MASS) == matr_asse_pres_c : return acou_harmo
7136 if AsType(MATR_MASS) == matr_asse_gene_r : return harm_gene
7137 raise AsException("type de concept resultat non prevu")
7139 DYNA_LINE_HARM=OPER(nom="DYNA_LINE_HARM",op= 60,sd_prod=dyna_line_harm_prod,
7140 fr="Réponse dynamique complexe d un système à une excitation harmonique",
7141 docu="U4.53.11-e",reentrant='n',
7142 regles=(PRESENT_ABSENT('AMOR_REDUIT','MATR_AMOR'),
7143 PRESENT_ABSENT('AMOR_REDUIT','LIST_AMOR'),
7144 PRESENT_ABSENT('MATR_AMOR','LIST_AMOR'),
7145 UN_PARMI('FREQ','LIST_FREQ'),),
7146 MODELE =SIMP(statut='f',typ=modele ),
7147 CHAM_MATER =SIMP(statut='f',typ=cham_mater ),
7148 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
7149 MATR_MASS =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_pres_c,matr_asse_gene_r ) ),
7150 MATR_RIGI =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_depl_c,matr_asse_pres_c
7151 ,matr_asse_gene_r,matr_asse_gene_c ) ),
7152 MATR_AMOR =SIMP(statut='f',typ=(matr_asse_depl_r,matr_asse_pres_c,matr_asse_gene_r ) ),
7153 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**'),
7154 LIST_AMOR =SIMP(statut='f',typ=listr8 ),
7155 MATR_IMPE_PHI =SIMP(statut='f',typ=(matr_asse_depl_r,matr_asse_gene_r) ),
7156 FREQ =SIMP(statut='f',typ='R',max='**'),
7157 LIST_FREQ =SIMP(statut='f',typ=listr8 ),
7158 TOUT_CHAM =SIMP(statut='f',typ='TXM',into=("OUI",)),
7159 NOM_CHAM =SIMP(statut='f',typ='TXM',max=03,into=("DEPL","VITE","ACCE") ),
7160 EXCIT =FACT(statut='o',min=01,max='**',
7161 regles=(UN_PARMI('VECT_ASSE','CHARGE'),
7162 UN_PARMI('FONC_MULT','FONC_MULT_C','COEF_MULT','COEF_MULT_C'),),
7163 VECT_ASSE =SIMP(statut='f',typ=(cham_no_depl_r,cham_no_pres_c,vect_asse_gene ) ),
7164 CHARGE =SIMP(statut='f',typ=char_meca ),
7165 TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FIXE",into=("FIXE",) ),
7166 FONC_MULT_C =SIMP(statut='f',typ=fonction_c ),
7167 COEF_MULT_C =SIMP(statut='f',typ='C' ),
7168 FONC_MULT =SIMP(statut='f',typ=fonction ),
7169 COEF_MULT =SIMP(statut='f',typ='R' ),
7170 PHAS_DEG =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7171 PUIS_PULS =SIMP(statut='f',typ='I',defaut= 0 ),
7173 TITRE =SIMP(statut='f',typ='TXM',max='**'),
7175 #& MODIF COMMANDE DATE 28/03/2001 AUTEUR CIBHHLV L.VIVAN
7176 # CONFIGURATION MANAGEMENT OF EDF VERSION
7177 # ======================================================================
7178 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7179 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
7180 # REDISTRIBUTION OF THIS FILE.
7181 # ======================================================================
7182 DYNA_LINE_TRAN=OPER(nom="DYNA_LINE_TRAN",op= 48,sd_prod=dyna_trans,
7183 fr="Réponse temporelle d un système à une excitation transitoire",
7184 docu="U4.53.02-f",reentrant='f',
7185 regles=(UN_PARMI('NEWMARK','WILSON','DIFF_CENTRE','ADAPT'),),
7186 MODELE =SIMP(statut='f',typ=modele ),
7187 CHAM_MATER =SIMP(statut='f',typ=cham_mater ),
7188 CARA_ELEM =SIMP(statut='f',typ=cara_elem ),
7189 MATR_MASS =SIMP(statut='o',typ=matr_asse_depl_r ),
7190 MATR_RIGI =SIMP(statut='o',typ=matr_asse_depl_r ),
7191 MATR_AMOR =SIMP(statut='f',typ=matr_asse_depl_r ),
7192 MODE_STAT =SIMP(statut='f',typ=(mode_stat_depl,mode_stat_acce,mode_stat_forc,) ),
7193 NEWMARK =FACT(statut='f',min=01,max=01,
7194 ALPHA =SIMP(statut='f',typ='R',defaut= 0.25 ),
7195 DELTA =SIMP(statut='f',typ='R',defaut= 0.5 ),
7197 WILSON =FACT(statut='f',min=01,max=01,
7198 THETA =SIMP(statut='f',typ='R',defaut= 1.4 ),
7200 DIFF_CENTRE =FACT(statut='f',min=01,max=01,
7202 ADAPT =FACT(statut='f',min=01,max=01,
7204 ETAT_INIT =FACT(statut='f',min=01,max=01,
7205 regles=(EXCLUS('DYNA_TRANS','DEPL_INIT'),
7206 EXCLUS('DYNA_TRANS','VITE_INIT'),),
7207 DYNA_TRANS =SIMP(statut='f',typ=dyna_trans ),
7208 # j ai interprete la doc U : est-ce bon
7209 b_dyna_trans =BLOC(condition = "DYNA_TRANS != None",
7210 regles=(EXCLUS('NUME_INIT','INST_INIT' ),),
7211 NUME_INIT =SIMP(statut='f',typ='I' ),
7212 INST_INIT =SIMP(statut='f',typ='R' ),
7213 b_inst_init =BLOC(condition = "INST_INIT != None",
7214 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
7215 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
7218 DEPL_INIT =SIMP(statut='f',typ=(cham_no_depl_r) ),
7219 VITE_INIT =SIMP(statut='f',typ=(cham_no_depl_r) ),
7221 EXCIT =FACT(statut='f',min=01,max='**',
7222 regles=(UN_PARMI('CHARGE','VECT_ASSE'),
7223 EXCLUS('CHARGE','COEF_MULT'),
7224 EXCLUS('FONC_MULT','COEF_MULT'),
7225 EXCLUS('ACCE','COEF_MULT'),
7226 PRESENT_ABSENT('ACCE','FONC_MULT'),
7227 PRESENT_PRESENT('ACCE','VITE','DEPL'),
7228 PRESENT_ABSENT('MULT_APPUI','FONC_MULT'),),
7229 VECT_ASSE =SIMP(statut='f',typ=cham_no_depl_r ),
7230 CHARGE =SIMP(statut='f',typ=char_meca ),
7231 FONC_MULT =SIMP(statut='f',typ=fonction ),
7232 COEF_MULT =SIMP(statut='f',typ='R' ),
7233 TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FIXE",into=("FIXE",) ),
7234 ACCE =SIMP(statut='f',typ=fonction ),
7235 VITE =SIMP(statut='f',typ=fonction ),
7236 DEPL =SIMP(statut='f',typ=fonction ),
7237 MULT_APPUI =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON",) ),
7238 DIRECTION =SIMP(statut='f',typ='R',max='**'),
7239 NOEUD =SIMP(statut='f',typ=no,max='**'),
7240 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
7242 AMOR_MODAL =FACT(statut='f',min=01,max=01,
7243 MODE_MECA =SIMP(statut='f',typ=mode_meca ),
7244 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**'),
7245 NB_MODE =SIMP(statut='f',typ='I',defaut= 9999 ),
7246 REAC_VITE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
7248 # ce n est pas le mot clesolveur standard
7249 SOLVEUR =FACT(statut='d',min=01,max=01,
7250 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7251 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
7252 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
7253 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
7254 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
7256 INCREMENT =FACT(statut='o',min=01,max='**',
7257 regles=(UN_PARMI('LIST_INST','FONC_INST','PAS'),),
7258 LIST_INST =SIMP(statut='f',typ=listr8 ),
7259 FONC_INST =SIMP(statut='f',typ=fonction ),
7260 PAS =SIMP(statut='f',typ='R' ),
7261 b_pas =BLOC(condition = "PAS != None",
7262 INST_INIT =SIMP(statut='f',typ='R' ),
7263 INST_FIN =SIMP(statut='f',typ='R' ),
7265 b_list_fonc =BLOC(condition = "LIST_INST != None or FONC_INST != None",
7266 regles=(EXCLUS('INST_FIN','NUME_FIN'),),
7267 NUME_FIN =SIMP(statut='f',typ='I' ),
7268 INST_FIN =SIMP(statut='f',typ='R' ),
7270 VITE_MIN =SIMP(statut='f',typ='TXM',defaut="NORM",into=("MAXI","NORM") ),
7271 COEF_MULT_PAS =SIMP(statut='f',typ='R',defaut= 1.1 ),
7272 COEF_DIVI_PAS =SIMP(statut='f',typ='R',defaut= 1.33334 ),
7273 PAS_LIMI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
7274 NB_POIN_PERIODE =SIMP(statut='f',typ='I',defaut= 50 ),
7275 NMAX_ITER_PAS =SIMP(statut='f',typ='I',defaut= 16 ),
7276 PAS_CALCUL =SIMP(statut='f',typ='I',defaut= 1 ),
7278 ARCHIVAGE =FACT(statut='f',min=01,max=01,
7279 regles=(UN_PARMI('LIST_ARCH','PAS_ARCH', ),),
7280 LIST_ARCH =SIMP(statut='f',typ=listis ),
7281 PAS_ARCH =SIMP(statut='f',typ='I' ),
7282 CHAM_EXCLU =SIMP(statut='f',typ='TXM',max='**',into=("DEPL","VITE","ACCE") ),
7284 TITRE =SIMP(statut='f',typ='TXM',max='**'),
7285 INFO =SIMP(statut='f',typ='I',into=(1,2) ),
7287 #& MODIF COMMANDE DATE 30/01/2002 AUTEUR VABHHTS J.TESELET
7288 # CONFIGURATION MANAGEMENT OF EDF VERSION
7289 # ======================================================================
7290 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7291 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
7292 # REDISTRIBUTION OF THIS FILE.
7293 # ======================================================================
7294 DYNA_NON_LINE=OPER(nom="DYNA_NON_LINE",op= 70,sd_prod=evol_noli,reentrant='f',
7295 fr="Analyse mécanique dynamique non linéaire",docu="U4.53.01-e1",
7296 regles=(AU_MOINS_UN('COMP_INCR','COMP_ELAS',),
7297 UN_PARMI('NEWMARK','HHT', ),),
7298 MODELE =SIMP(statut='o',typ=modele),
7299 CHAM_MATER =SIMP(statut='o',typ=cham_mater),
7300 MODE_STAT =SIMP(statut='f',typ=(mode_stat_depl,mode_stat_acce,mode_stat_forc,)),
7301 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
7302 EXCIT =FACT(statut='o',min=1,max='**',
7303 regles=(PRESENT_ABSENT('FONC_MULT','ACCE'),
7304 PRESENT_PRESENT('ACCE','VITE','DEPL'),
7305 PRESENT_ABSENT('MULT_APPUI','FONC_MULT'),),
7306 TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FIXE_CSTE",
7307 into=("FIXE_CSTE","FIXE_PILO","SUIV","DIDI")),
7308 CHARGE =SIMP(statut='o',typ=char_meca),
7309 FONC_MULT =SIMP(statut='f',typ=fonction),
7310 DEPL =SIMP(statut='f',typ=fonction),
7311 ACCE =SIMP(statut='f',typ=fonction),
7312 VITE =SIMP(statut='f',typ=fonction),
7313 MULT_APPUI =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
7314 DIRECTION =SIMP(statut='f',typ='R',max='**'),
7315 NOEUD =SIMP(statut='f',typ=no,max='**'),
7316 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
7318 AMOR_MODAL =FACT(statut='f',min=1,max=1,
7319 MODE_MECA =SIMP(statut='f',typ=mode_meca),
7320 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**' ),
7321 NB_MODE =SIMP(statut='f',typ='I',defaut= 9999 ),
7322 REAC_VITE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
7324 COMP_INCR =FACT(statut='f',min=1,max='**',
7325 RELATION =SIMP(statut='o',typ='TXM',defaut="VMIS_ISOT_TRAC",
7411 ELAS =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7412 VMIS_ISOT_TRAC =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7413 VMIS_ISOT_LINE =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7414 VMIS_ECMI_TRAC =SIMP(statut='c',typ='I',defaut=8,into=(8,)),
7415 VMIS_ECMI_LINE =SIMP(statut='c',typ='I',defaut=8,into=(8,)),
7416 LABORD_1D =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
7417 ENDO_LOCAL =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7418 ENDO_FRAGILE =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
7419 BETON_ENDO_LOCAL=SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7420 RUPT_FRAG =SIMP(statut='c',typ='I',defaut=4,into=(4,)),
7421 PLAS_GRAD_LINE =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
7422 PLAS_GRAD_TRAC =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
7423 DURC_GRAD =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
7424 META_P_IL =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7425 META_P_IL_PT =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7426 META_P_IL_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7427 META_P_IL_PT_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7428 META_V_IL =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7429 META_V_IL_PT =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7430 META_V_IL_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7431 META_V_IL_PT_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7432 META_P_INL =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7433 META_P_INL_PT =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7434 META_P_INL_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7435 META_P_INL_PT_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7436 META_V_INL =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7437 META_V_INL_PT =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7438 META_V_INL_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7439 META_V_INL_PT_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7440 META_P_CL =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
7441 META_P_CL_PT =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
7442 META_P_CL_RE =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
7443 META_P_CL_PT_RE =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
7444 META_V_CL =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
7445 META_V_CL_PT =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
7446 META_V_CL_RE =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
7447 META_V_CL_PT_RE =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
7448 VMIS_CINE_LINE =SIMP(statut='c',typ='I',defaut=7,into=(7,)),
7449 CHABOCHE =SIMP(statut='c',typ='I',defaut=14,into=(14,)),
7450 VISCOCHAB =SIMP(statut='c',typ='I',defaut=28,into=(28,)),
7451 VMIS_CIN1_CHAB =SIMP(statut='c',typ='I',defaut=8,into=(8,)),
7452 VMIS_CIN2_CHAB =SIMP(statut='c',typ='I',defaut=14,into=(14,)),
7453 POLY_CFC =SIMP(statut='c',typ='I',defaut=1688,into=(1688,)),
7454 LMARC =SIMP(statut='c',typ='I',defaut=20,into=(20,)),
7455 VISC_TAHERI =SIMP(statut='c',typ='I',defaut=9,into=(9,)),
7456 ROUSSELIER =SIMP(statut='c',typ='I',defaut=9,into=(9,)),
7457 ROUSS_PR =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
7458 ROUSS_VISC =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
7459 VMIS_POU_LINE =SIMP(statut='c',typ='I',defaut=9,into=(9,)),
7460 VMIS_POU_FLEJOU =SIMP(statut='c',typ='I',defaut=9 ,into=(9,)),
7461 COULOMB =SIMP(statut='c',typ='I',defaut=4,into=(4,)),
7462 ASSE_CORN =SIMP(statut='c',typ='I',defaut=4,into=(4,)),
7463 ARME =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7464 NORTON_HOFF =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7465 LEMAITRE =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7466 ZIRC_CYRA2 =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7467 ZIRC_EPRI =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7468 ASSE_COMBU =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
7469 NADAI_B =SIMP(statut='c',typ='I',defaut=34,into=(34,)),
7470 VENDOCHAB =SIMP(statut='c',typ='I',defaut=10,into=(10,)),
7471 GRILLE_ISOT_LINE=SIMP(statut='c',typ='I',defaut=4,into=(4,)),
7472 GRILLE_CINE_LINE=SIMP(statut='c',typ='I',defaut=4,into=(4,)),
7473 GRILLE_PINTO_MEN=SIMP(statut='c',typ='I',defaut=16,into=(16,)),
7474 DIS_CONTACT =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
7475 DIS_CHOC =SIMP(statut='c',typ='I',defaut=7,into=(7,)),
7476 DIS_GOUJ2E_PLAS =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7477 DIS_GOUJ2E_ELAS =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7478 PINTO_MENEGOTTO =SIMP(statut='c',typ='I',defaut=8,into=(8,)),
7479 CJS =SIMP(statut='c',typ='I',defaut=16,into=(16,)),
7480 OHNO =SIMP(statut='c',typ='I',defaut=32,into=(32,)),
7481 GRANGER_FP =SIMP(statut='c',typ='I',defaut=55,into=(55,)),
7482 GRANGER_FP_V =SIMP(statut='c',typ='I',defaut=55,into=(55,)),
7483 BETON_DOUBLE_DP =SIMP(statut='c',typ='I',defaut=4,into=(4,)),
7484 KIT_HM =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
7485 KIT_HHM =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
7486 KIT_THH =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
7487 KIT_THM =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
7488 KIT_THHM =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
7489 VMIS_ASYM_LINE =SIMP(statut='c',typ='I',defaut=4,into=(4,)),
7491 RELATION_KIT =SIMP(statut='f',typ='TXM',max='**',
7529 ELAS_THM =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7530 SURF_ETAT_NSAT =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7531 SURF_ETAT_SATU =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7532 CAM_CLAY_THM =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
7533 GAZ =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7534 LIQU_SATU =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7535 LIQU_SATU_GAT =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7536 LIQU_GAZ_ATM =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7537 LIQU_VAPE_GAZ =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
7538 LIQU_NSAT_GAT =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
7539 LIQU_GAZ =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
7540 THER_HOMO =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
7541 THER_POLY =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
7542 HYDR_UTIL =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
7543 HYDR =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
7544 ACIER =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
7545 ZIRC =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
7547 DEFORMATION =SIMP(statut='f',typ='TXM',defaut="PETIT",into=("PETIT","PETIT_REAC","SIMO_MIEHE","GREEN_GR","GREEN",)),
7548 ALGO_C_PLAN =SIMP(statut='f',typ='TXM',defaut="ANALYTIQUE",into=("DEBORST","ANALYTIQUE",)),
7549 regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
7550 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
7551 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
7552 MAILLE =SIMP(statut='f',typ=ma,max='**'),
7554 COMP_ELAS =FACT(statut='f',min=1,max='**',
7555 RELATION =SIMP(statut='o',typ='TXM',defaut="ELAS",
7556 into=("ELAS","ELAS_VMIS_LINE","ELAS_VMIS_TRAC",
7557 "ELAS_POUTRE_GR","CABLE")),
7558 ELAS =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7559 ELAS_VMIS_TRAC =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7560 ELAS_VMIS_LINE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7561 ELAS_POUTRE_GR =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
7562 CABLE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
7563 DEFORMATION =SIMP(statut='f',typ='TXM',defaut="PETIT" ,into=("PETIT","GREEN","GREEN_GR",) ),
7564 regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
7565 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
7566 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
7567 MAILLE =SIMP(statut='f',typ=ma,max='**'),
7569 #-------------------------------------------------------------------
7570 ETAT_INIT =FACT(statut='f',min=1,max=1,
7571 regles=(AU_MOINS_UN('EVOL_NOLI','DEPL','VITE','SIGM','VARI','VARI_NON_LOCAL',),
7572 EXCLUS('EVOL_NOLI','DEPL',),
7573 EXCLUS('EVOL_NOLI','VITE'),
7574 EXCLUS('EVOL_NOLI','SIGM',),
7575 EXCLUS('EVOL_NOLI','VARI',),
7576 EXCLUS('EVOL_NOLI','VARI_NON_LOCAL',),
7577 EXCLUS('NUME_ORDRE','INST'), ),
7578 DEPL =SIMP(statut='f',typ=cham_no_depl_r),
7579 VITE =SIMP(statut='f',typ=cham_no_depl_r),
7580 SIGM =SIMP(statut='f',typ=(cham_elem_sief_r,carte_sief_r)),
7581 VARI =SIMP(statut='f',typ=cham_elem_vari_r),
7582 VARI_NON_LOCAL =SIMP(statut='f',typ=cham_no_vanl_r),
7583 EVOL_NOLI =SIMP(statut='f',typ=evol_noli),
7584 NUME_ORDRE =SIMP(statut='f',typ='I'),
7585 INST =SIMP(statut='f',typ='R'),
7586 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
7587 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
7588 NUME_DIDI =SIMP(statut='f',typ='I'),
7589 INST_ETAT_INIT =SIMP(statut='f',typ='R'),
7591 #-------------------------------------------------------------------
7592 INCREMENT =FACT(statut='o',min=1,max=1,
7593 regles=(EXCLUS('NUME_INST_INIT','INST_INIT'),
7594 EXCLUS('NUME_INST_FIN','INST_FIN'),),
7595 LIST_INST =SIMP(statut='o',typ=listr8),
7596 EVOLUTION =SIMP(statut='f',typ='TXM',defaut="CHRONOLOGIQUE",
7597 into=("CHRONOLOGIQUE","RETROGRADE","SANS",) ),
7598 NUME_INST_INIT =SIMP(statut='f',typ='I'),
7599 INST_INIT =SIMP(statut='f',typ='R'),
7600 NUME_INST_FIN =SIMP(statut='f',typ='I'),
7601 INST_FIN =SIMP(statut='f',typ='R'),
7602 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3 ),
7603 SUBD_PAS =SIMP(statut='f',typ='I',defaut=1),
7604 SUBD_PAS_MINI =SIMP(statut='f',typ='R'),
7605 COEF_SUBD_PAS_1 =SIMP(statut='f',typ='R',defaut= 1.0E+0),
7607 #-------------------------------------------------------------------
7608 NEWMARK =FACT(statut='f',min=1,max=1,
7609 ALPHA =SIMP(statut='f',typ='R',defaut= 0.25),
7610 DELTA =SIMP(statut='f',typ='R',defaut= 0.5),
7612 HHT =FACT(statut='f',min=1,max=1,
7613 ALPHA =SIMP(statut='f',typ='R'
7614 ,defaut= -0.29999999999999999 ),
7616 NEWTON =FACT(statut='d',min=1,max=1,
7617 REAC_INCR =SIMP(statut='f',typ='I',defaut= 1 ),
7618 PREDICTION =SIMP(statut='f',typ='TXM',into=("TANGENTE","ELASTIQUE") ),
7619 MATRICE =SIMP(statut='f',typ='TXM',defaut="TANGENTE",into=("TANGENTE","ELASTIQUE") ),
7620 REAC_ITER =SIMP(statut='f',typ='I',defaut= 0),
7621 PAS_MINI_ELAS =SIMP(statut='f',typ='R',defaut=0.0E+0),
7623 SOLVEUR =FACT(statut='d',min=1,max=1,
7624 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
7625 b_mult_front =BLOC(condition= "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
7626 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
7628 b_ldlt =BLOC(condition= "METHODE == 'LDLT'",fr="Paramètres de la méthode LDLT",
7629 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
7631 b_ldlt_mult =BLOC(condition="METHODE == 'LDLT' or METHODE == 'MULT_FRONT'",
7632 fr="Paramètres relatifs à la non inversibilité de la matrice à factorise",
7633 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
7634 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON","DECOUPE") ),
7636 b_gcpc =BLOC(condition="METHODE == 'GCPC'",fr="Paramètres de la méthode du gradient conjugué",
7637 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
7638 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut=0),
7639 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
7640 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
7641 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
7643 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7644 SYME =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
7646 #-------------------------------------------------------------------
7647 RECH_LINEAIRE =FACT(statut='f',min=1,max=1,
7648 RESI_LINE_RELA =SIMP(statut='f',typ='R',defaut= 1.0E-1 ),
7649 ITER_LINE_MAXI =SIMP(statut='f',typ='I',defaut= 3),
7651 PILOTAGE =FACT(statut='f',min=1,max=1,
7652 regles=(EXCLUS('NOEUD','GROUP_NO'),PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
7653 TYPE =SIMP(statut='o',typ='TXM',into=("DDL_IMPO","LONG_ARC","PRED_ELAS","PRED_ELAS_INCR","DEFORMATION") ),
7654 COEF_MULT =SIMP(statut='f',typ='R',defaut= 1.0E+0),
7655 ETA_PILO_MAX =SIMP(statut='f',typ='R'),
7656 ETA_PILO_MIN =SIMP(statut='f',typ='R'),
7657 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
7658 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
7659 MAILLE =SIMP(statut='f',typ=ma,max='**'),
7660 NOEUD =SIMP(statut='f',typ=no,max='**'),
7661 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
7662 NOM_CMP =SIMP(statut='f',typ='TXM',max='**' ),
7664 CONVERGENCE =FACT(statut='d',min=1,max=1,
7665 RESI_GLOB_MAXI =SIMP(statut='f',typ='R'),
7666 RESI_GLOB_RELA =SIMP(statut='f',typ='R'),
7667 ITER_GLOB_MAXI =SIMP(statut='f',typ='I',defaut=10),
7668 ITER_GLOB_ELAS =SIMP(statut='f',typ='I',defaut=25),
7669 ARRET =SIMP(statut='f',typ='TXM',defaut="OUI"),
7670 RESI_INTE_RELA =SIMP(statut='f',typ='R'
7672 ITER_INTE_MAXI =SIMP(statut='f',typ='I',defaut= 10 ),
7673 ITER_INTE_PAS =SIMP(statut='f',typ='I',defaut= 0 ),
7674 TYPE_MATR_COMP =SIMP(statut='f',typ='TXM',defaut="TANG_VIT",into=("TANG_VIT",)),
7675 RESO_INTE =SIMP(statut='f',typ='TXM',defaut="IMPLICITE",
7676 into=("RUNGE_KUTTA_2","RUNGE_KUTTA_4","IMPLICITE")),
7678 #-------------------------------------------------------------------
7679 OPTION =SIMP(statut='f',typ='TXM',max='**',defaut="ELNO",
7680 into=("SIEF_ELNO_ELGA","VARI_ELNO_ELGA","EFGE_ELNO_CART","ELNO","SANS") ),
7681 ARCHIVAGE =FACT(statut='f',min=1,max=1,
7682 regles=(EXCLUS('PAS_ARCH','LIST_INST','INST'),
7683 EXCLUS('ARCH_ETAT_INIT','NUME_INIT'), ),
7684 LIST_INST =SIMP(statut='f',typ=(listr8) ),
7685 INST =SIMP(statut='f',typ='R',max='**' ),
7686 PAS_ARCH =SIMP(statut='f',typ='I' ),
7687 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3),
7688 ARCH_ETAT_INIT =SIMP(statut='f',typ='TXM',into=("OUI",)),
7689 NUME_INIT =SIMP(statut='f',typ='I'),
7690 DETR_NUME_SUIV =SIMP(statut='f',typ='TXM',into=("OUI",)),
7691 CHAM_EXCLU =SIMP(statut='f',typ='TXM',max='**',
7692 into=("DEPL","SIEF_ELGA","VARI_ELGA","ACCE","VITE","VARI_NON_LOCAL","LANL_ELGA")),
7694 OBSERVATION =FACT(statut='f',min=1,max='**',
7695 regles=(UN_PARMI('NOEUD','GROUP_NO','MAILLE'),
7696 PRESENT_PRESENT('MAILLE','POINT'),),
7697 NOM_CHAM =SIMP(statut='o',typ='TXM',max='**',
7699 into=("DEPL","VITE","ACCE","SIEF_ELGA","VARI_ELGA","DEPL_ABSOLU","VITE_ABSOLU","ACCE_ABSOLU") ),
7700 NOM_CMP =SIMP(statut='o',typ='TXM',max='**' ),
7701 LIST_ARCH =SIMP(statut='f',typ=listis),
7702 LIST_INST =SIMP(statut='f',typ=listr8),
7703 INST =SIMP(statut='f',typ='R',max='**' ),
7704 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
7705 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
7706 PAS_OBSE =SIMP(statut='f',typ='I'),
7707 NOEUD =SIMP(statut='f',typ=no,max='**'),
7708 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
7709 MAILLE =SIMP(statut='f',typ=ma,max='**'),
7710 POINT =SIMP(statut='f',typ='I',max='**'),
7712 #-------------------------------------------------------------------
7713 MODELE_NON_LOCAL=SIMP(statut='f',typ=(modele) ),
7714 b_non_local = BLOC ( condition = "MODELE_NON_LOCAL != None",
7715 fr="Données spécifiques au modèle non local",
7716 SOLV_NON_LOCAL =FACT(statut='f',min=1,max=1,
7717 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
7718 b_mult_front =BLOC(condition = "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
7719 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
7721 b_ldlt =BLOC(condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
7722 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
7724 b_ldlt_mult =BLOC(condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
7725 fr="Paramètres relatifs à la non inversibilité de la matrice à factorise",
7726 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
7727 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
7729 b_gcpc =BLOC(condition = "METHODE == 'GCPC' ", fr="Paramètres de la méthode du gradient conjugué",
7730 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
7731 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut= 0 ),
7732 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
7733 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
7735 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7737 LAGR_NON_LOCAL =FACT(statut='f',max=1,
7738 ITER_DUAL_MAXI =SIMP(statut='f',typ='I',defaut= 50),
7739 RESI_DUAL_ABSO =SIMP(statut='o',typ='R'),
7740 RESI_PRIM_ABSO =SIMP(statut='o',typ='R'),
7741 RHO =SIMP(statut='f',typ='R',defaut= 1000.),
7742 ITER_PRIM_MAXI =SIMP(statut='f',typ='I',defaut= 10),
7745 #-------------------------------------------------------------------
7746 PARM_THETA =SIMP(statut='f',typ='R'
7748 #-------------------------------------------------------------------
7749 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
7750 TITRE =SIMP(statut='f',typ='TXM',max='**'),
7752 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
7753 # CONFIGURATION MANAGEMENT OF EDF VERSION
7754 # ======================================================================
7755 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7756 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
7757 # REDISTRIBUTION OF THIS FILE.
7758 # ======================================================================
7759 DYNA_SPEC_MODAL=OPER(nom="DYNA_SPEC_MODAL",op= 147,sd_prod=tabl_intsp,
7760 fr="Calcul de la réponse par recombinaison modale d'une structure linéaire pour une excitation aléatoire",
7761 docu="U4.53.23-c",reentrant='n',
7762 BASE_ELAS_FLUI =SIMP(statut='o',typ=melasflu ),
7763 EXCIT =FACT(statut='o',min=00,max=01,
7764 INTE_SPEC_GENE =SIMP(statut='o',typ=tabl_intsp ),
7766 OPTION =SIMP(statut='f',typ='TXM',defaut="TOUT",into=("TOUT","DIAG") ),
7767 TITRE =SIMP(statut='f',typ='TXM',max='**'),
7769 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
7770 # CONFIGURATION MANAGEMENT OF EDF VERSION
7771 # ======================================================================
7772 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7773 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
7774 # REDISTRIBUTION OF THIS FILE.
7775 # ======================================================================
7776 DYNA_TRAN_MODAL=OPER(nom="DYNA_TRAN_MODAL",op= 74,sd_prod=tran_gene,
7777 fr="Réponse dynamique transitoire en coordonnées généralisées par recombinaison modale",
7778 docu="U4.53.21-e",reentrant='f',
7779 regles=(EXCLUS('AMOR_REDUIT','AMOR_GENE','LIST_AMOR'),
7780 PRESENT_ABSENT('MODE_STAT','MODE_CORR'),),
7781 METHODE =SIMP(statut='f',typ='TXM',defaut="EULER",
7782 into=("EULER","NEWMARK","DEVOGE","ADAPT","ITMI") ),
7783 MASS_GENE =SIMP(statut='o',typ=matr_asse_gene_r ),
7784 RIGI_GENE =SIMP(statut='o',typ=matr_asse_gene_r ),
7785 AMOR_GENE =SIMP(statut='f',typ=matr_asse_gene_r ),
7786 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**'),
7787 LIST_AMOR =SIMP(statut='f',typ=listr8 ),
7788 MODE_STAT =SIMP(statut='f',typ=(mode_stat_depl,mode_stat_acce,mode_stat_forc) ),
7789 MODE_CORR =SIMP(statut='f',typ=(mult_elas,mode_stat_acce) ,),
7791 ETAT_INIT =FACT(statut='f',min=01,max=01,
7792 regles=(EXCLUS('RESU_GENE','DEPL_INIT_GENE'),
7793 EXCLUS('RESU_GENE','VITE_INIT_GENE'),),
7794 RESU_GENE =SIMP(statut='f',typ=tran_gene ),
7795 b_resu_gene =BLOC(condition = "RESU_GENE != None",
7796 INST_INIT =SIMP(statut='f',typ='R' ),
7797 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
7798 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
7800 DEPL_INIT_GENE =SIMP(statut='f',typ=vect_asse_gene ),
7801 VITE_INIT_GENE =SIMP(statut='f',typ=vect_asse_gene ),
7803 INCREMENT =FACT(statut='o',min=01,max='**',
7804 INST_INIT =SIMP(statut='f',typ='R' ),
7805 INST_FIN =SIMP(statut='o',typ='R' ),
7806 PAS =SIMP(statut='f',typ='R' ),
7807 VERI_PAS =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
7808 VITE_MIN =SIMP(statut='f',typ='TXM',defaut="NORM",into=("MAXI","NORM") ),
7809 COEF_MULT_PAS =SIMP(statut='f',typ='R',defaut= 1.1 ),
7810 COEF_DIVI_PAS =SIMP(statut='f',typ='R',defaut= 1.3333334 ),
7811 PAS_LIMI_RELA =SIMP(statut='f',typ='R',defaut= 1.0E-6 ),
7812 NB_POIN_PERIODE =SIMP(statut='f',typ='I',defaut= 50 ),
7813 NMAX_ITER_PAS =SIMP(statut='f',typ='I',defaut= 16 ),
7815 ARCHIVAGE =FACT(statut='f',min=01,max=01,
7816 regles=(UN_PARMI('LIST_ARCH','PAS_ARCH'),),
7817 LIST_ARCH =SIMP(statut='f',typ=listis ),
7818 PAS_ARCH =SIMP(statut='f',typ='I' ),
7821 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 20 ),
7822 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
7823 LAMBDA =SIMP(statut='f',typ='R',defaut= 10. ),
7825 EXCIT =FACT(statut='f',min=01,max='**',
7826 regles=(UN_PARMI('FONC_MULT','COEF_MULT','ACCE'),
7827 PRESENT_PRESENT('ACCE','VITE','DEPL'),
7828 PRESENT_PRESENT('D_FONC_DT','D_FONC_DT2'),
7829 PRESENT_ABSENT('NUME_MODE','VECT_GENE','COEF_MULT'),
7830 PRESENT_ABSENT('MULT_APPUI','CORR_STAT'),
7831 PRESENT_ABSENT('MULT_APPUI','COEF_MULT'),
7832 PRESENT_ABSENT('MULT_APPUI','FONC_MULT'),),
7833 VECT_GENE =SIMP(statut='f',typ=vect_asse_gene ),
7834 NUME_MODE =SIMP(statut='f',typ='I' ),
7835 FONC_MULT =SIMP(statut='f',typ=fonction ),
7836 COEF_MULT =SIMP(statut='f',typ='R' ),
7837 ACCE =SIMP(statut='f',typ=fonction ),
7838 VITE =SIMP(statut='f',typ=fonction ),
7839 DEPL =SIMP(statut='f',typ=fonction ),
7840 MULT_APPUI =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
7841 DIRECTION =SIMP(statut='f',typ='R',max='**'),
7842 b_loca =BLOC(condition= "DIRECTION != None",
7843 regles=(EXCLUS('NOEUD','GROUP_NO'),),
7844 NOEUD =SIMP(statut='f',typ=no,max='**'),
7845 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
7847 CORR_STAT =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
7848 D_FONC_DT =SIMP(statut='f',typ=fonction ),
7849 D_FONC_DT2 =SIMP(statut='f',typ=fonction ),
7851 CHOC =FACT(statut='f',min=01,max='**',
7852 regles=(UN_PARMI('NOEUD_1','GROUP_NO_1' ),
7853 PRESENT_ABSENT('NOEUD_1','GROUP_NO_1'),
7854 PRESENT_ABSENT('NOEUD_2','GROUP_NO_2'),),
7855 INTITULE =SIMP(statut='f',typ='TXM' ),
7856 NOEUD_1 =SIMP(statut='f',typ=no),
7857 NOEUD_2 =SIMP(statut='f',typ=no),
7858 GROUP_NO_1 =SIMP(statut='f',typ=grno),
7859 GROUP_NO_2 =SIMP(statut='f',typ=grno),
7860 OBSTACLE =SIMP(statut='o',typ=obstacle ),
7861 ORIG_OBST =SIMP(statut='f',typ='R',min=3,max=3),
7862 NORM_OBST =SIMP(statut='o',typ='R',min=3,max=3),
7863 ANGL_VRIL =SIMP(statut='f',typ='R' ),
7864 JEU =SIMP(statut='f',typ='R',defaut= 1. ),
7865 DIST_1 =SIMP(statut='f',typ='R',val_min=0.E+0 ),
7866 DIST_2 =SIMP(statut='f',typ='R',val_min=0.E+0 ),
7867 SOUS_STRUC_1 =SIMP(statut='f',typ='TXM' ),
7868 SOUS_STRUC_2 =SIMP(statut='f',typ='TXM' ),
7869 REPERE =SIMP(statut='f',typ='TXM',defaut="GLOBAL"),
7870 RIGI_NOR =SIMP(statut='f',typ='R' ),
7871 AMOR_NOR =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7872 RIGI_TAN =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7873 AMOR_TAN =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7874 COULOMB =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7876 LAME_FLUIDE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
7877 b_lame =BLOC(condition="LAME_FLUIDE=='OUI'",
7878 ALPHA =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7879 BETA =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7880 CHI =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7881 DELTA =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7884 VERI_CHOC =FACT(statut='f',min=01,max='**',
7885 STOP_CRITERE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
7886 SEUIL =SIMP(statut='f',typ='R',defaut= 0.5 ),
7888 FLAMBAGE =FACT(statut='f',min=01,max='**',
7889 regles=(UN_PARMI('NOEUD_1','GROUP_NO_1'),
7890 PRESENT_ABSENT('NOEUD_1','GROUP_NO_1'),
7891 PRESENT_ABSENT('NOEUD_2','GROUP_NO_2'),),
7892 NOEUD_1 =SIMP(statut='f',typ=no),
7893 NOEUD_2 =SIMP(statut='f',typ=no),
7894 GROUP_NO_1 =SIMP(statut='f',typ=grno),
7895 GROUP_NO_2 =SIMP(statut='f',typ=grno),
7896 OBSTACLE =SIMP(statut='o',typ=obstacle ),
7897 ORIG_OBST =SIMP(statut='f',typ='R',max='**'),
7898 NORM_OBST =SIMP(statut='o',typ='R',max='**'),
7899 ANGL_VRIL =SIMP(statut='f',typ='R' ),
7900 JEU =SIMP(statut='f',typ='R',defaut= 1. ),
7901 DIST_1 =SIMP(statut='f',typ='R' ),
7902 DIST_2 =SIMP(statut='f',typ='R' ),
7903 REPERE =SIMP(statut='f',typ='TXM',defaut="GLOBAL"),
7904 RIGI_NOR =SIMP(statut='f',typ='R' ),
7905 FNOR_CRIT =SIMP(statut='f',typ='R' ),
7906 FNOR_POST_FL =SIMP(statut='f',typ='R' ),
7907 RIGI_NOR_POST_FL=SIMP(statut='f',typ='R' ),
7909 ANTI_SISM =FACT(statut='f',min=01,max='**',
7910 regles=(UN_PARMI('NOEUD_1','GROUP_NO_1'),
7911 UN_PARMI('NOEUD_2','GROUP_NO_2'),
7912 PRESENT_ABSENT('NOEUD_1','GROUP_NO_1'),
7913 PRESENT_ABSENT('NOEUD_2','GROUP_NO_2'),),
7914 NOEUD_1 =SIMP(statut='f',typ=no),
7915 NOEUD_2 =SIMP(statut='f',typ=no),
7916 GROUP_NO_1 =SIMP(statut='f',typ=grno),
7917 GROUP_NO_2 =SIMP(statut='f',typ=grno),
7918 RIGI_K1 =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7919 RIGI_K2 =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7920 SEUIL_FX =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7921 C =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7922 PUIS_ALPHA =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
7923 DX_MAX =SIMP(statut='f',typ='R',defaut= 1. ),
7925 RELA_EFFO_DEPL =FACT(statut='f',min=01,max='**',
7926 NOEUD =SIMP(statut='o',typ=no),
7927 SOUS_STRUC =SIMP(statut='f',typ='TXM' ),
7928 NOM_CMP =SIMP(statut='f',typ='TXM' ),
7929 RELATION =SIMP(statut='o',typ=fonction ),
7931 RELA_TRANSIS =FACT(statut='f',min=01,max='**',
7932 NOEUD =SIMP(statut='o',typ=no),
7933 SOUS_STRUC =SIMP(statut='f',typ='TXM' ),
7934 NOM_CMP =SIMP(statut='f',typ='TXM' ),
7935 RELATION =SIMP(statut='o',typ=fonction ),
7937 RELA_EFFO_VITE =FACT(statut='f',min=01,max='**',
7938 NOEUD =SIMP(statut='o',typ=no),
7939 SOUS_STRUC =SIMP(statut='f',typ='TXM' ),
7940 NOM_CMP =SIMP(statut='f',typ='TXM' ),
7941 RELATION =SIMP(statut='o',typ=fonction ),
7943 b_itmi =BLOC(condition = "METHODE=='ITMI'",
7944 regles=(ENSEMBLE('BASE_ELAS_FLUI','NUME_VITE_FLUI'),),
7945 BASE_ELAS_FLUI =SIMP(statut='f',typ=melasflu ),
7946 NUME_VITE_FLUI =SIMP(statut='f',typ='I' ),
7947 ETAT_STAT =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
7948 PREC_DUREE =SIMP(statut='f',typ='R',defaut= 1.E-2 ),
7949 CHOC_FLUI =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
7950 NB_MODE =SIMP(statut='f',typ='I' ),
7951 NB_MODE_FLUI =SIMP(statut='f',typ='I' ),
7952 NB_MODE_DIAG =SIMP(statut='f',typ='I' ),
7953 TS_REG_ETAB =SIMP(statut='f',typ='R' ),
7955 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
7956 IMPRESSION =FACT(statut='f',min=01,max='**',
7957 regles=(EXCLUS('TOUT','NIVEAU'),),
7958 TOUT =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
7959 NIVEAU =SIMP(statut='f',typ='TXM',into=("DEPL_LOC","VITE_LOC","FORC_LOC","TAUX_CHOC") ),
7960 INST_INIT =SIMP(statut='f',typ='R' ),
7961 INST_FIN =SIMP(statut='f',typ='R' ),
7963 TITRE =SIMP(statut='f',typ='TXM',max='**'),
7965 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
7966 # CONFIGURATION MANAGEMENT OF EDF VERSION
7967 # ======================================================================
7968 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7969 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
7970 # REDISTRIBUTION OF THIS FILE.
7971 # ======================================================================
7972 # RESPONSABLE VABHHTS J.PELLET
7973 ENGENDRE_TEST=PROC(nom="ENGENDRE_TEST",op=178,docu="U4.92.11-b",
7974 regles=(UN_PARMI('TOUT','CO'),),
7975 FICHIER =SIMP(statut='f',typ='TXM',defaut="RESULTAT"),
7976 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
7977 CO =SIMP(statut='f',typ=assd,max='**'),
7978 TYPE_TEST =SIMP(statut='f',typ='TXM',defaut="SOMME",into=("SOMME","RESUME") ),
7979 FORMAT_R =SIMP(statut='f',typ='TXM',defaut="1PE12.5"),
7980 PREC_R =SIMP(statut='f',typ='TXM',defaut="1.E-5"),
7982 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
7983 # CONFIGURATION MANAGEMENT OF EDF VERSION
7984 # ======================================================================
7985 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7986 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
7987 # REDISTRIBUTION OF THIS FILE.
7988 # ======================================================================
7989 EXEC_LOGICIEL=PROC(nom="EXEC_LOGICIEL",op= 183,fr="",docu="U7.00.01-a",
7990 LOGICIEL =SIMP(statut='f',typ='TXM' ),
7991 ARGUMENT =FACT(statut='f',min=01,max='**',
7992 NOM_PARA =SIMP(statut='f',typ='TXM' ),
7995 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
7996 # CONFIGURATION MANAGEMENT OF EDF VERSION
7997 # ======================================================================
7998 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
7999 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8000 # REDISTRIBUTION OF THIS FILE.
8001 # ======================================================================
8002 #def extr_mode_prod(FILTRE_MODE,TITRE,IMPRESSION ):
8004 def extr_mode_prod(FILTRE_MODE,**args):
8005 vale=FILTRE_MODE[0]['MODE']
8006 if AsType(vale) == mode_meca : return mode_meca
8007 if AsType(vale) == mode_meca_c : return mode_meca_c
8008 if AsType(vale) == mode_gene : return mode_gene
8009 raise AsException("type de concept resultat non prevu")
8011 EXTR_MODE=OPER(nom="EXTR_MODE",op= 168,sd_prod=extr_mode_prod,
8012 docu="U4.52.12-c",reentrant='n',
8013 FILTRE_MODE =FACT(statut='o',min=01,max='**',
8014 regles=(UN_PARMI('TOUT_ORDRE','NUME_ORDRE','NUME_MODE','NUME_MODE_EXCLU','FREQ_MIN','CRIT_EXTR',),),
8015 MODE =SIMP(statut='o',typ=(mode_meca,mode_meca_c,mode_gene ) ),
8016 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI","NON") ),
8017 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
8018 NUME_MODE =SIMP(statut='f',typ='I',max='**'),
8019 NUME_MODE_EXCLU =SIMP(statut='f',typ='I',max='**'),
8020 FREQ_MIN =SIMP(statut='f',typ='R' ),
8021 CRIT_EXTR =SIMP(statut='f',typ='TXM',defaut="MASS_EFFE_UN"
8022 ,into=("MASS_EFFE_UN","MASS_GENE") ),
8023 b_freq_min =BLOC(condition = "FREQ_MIN != None",
8024 FREQ_MAX =SIMP(statut='o',typ='R' ),
8025 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
8027 b_crit_extr =BLOC(condition = "CRIT_EXTR != None",
8028 SEUIL =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
8031 TITRE =SIMP(statut='f',typ='TXM',max='**'),
8032 IMPRESSION =FACT(statut='f',min=01,max=01,
8033 CUMUL =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
8034 CRIT_EXTR =SIMP(statut='f',typ='TXM',defaut="MASS_EFFE_UN",into=("MASS_EFFE_UN","MASS_GENE") ),
8037 #& MODIF COMMANDE DATE 23/01/2002 AUTEUR CIBHHAB N.RAHNI
8038 # CONFIGURATION MANAGEMENT OF EDF VERSION
8039 # ======================================================================
8040 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8041 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8042 # REDISTRIBUTION OF THIS FILE.
8043 # ======================================================================
8044 def extr_resu_prod(RESULTAT,**args):
8045 if AsType(RESULTAT) == evol_elas : return evol_elas
8046 if AsType(RESULTAT) == evol_noli : return evol_noli
8047 if AsType(RESULTAT) == evol_ther : return evol_ther
8048 if AsType(RESULTAT) == dyna_trans : return dyna_trans
8049 if AsType(RESULTAT) == dyna_harmo : return dyna_harmo
8050 if AsType(RESULTAT) == acou_harmo : return acou_harmo
8051 if AsType(RESULTAT) == mode_meca : return mode_meca
8052 if AsType(RESULTAT) == mode_acou : return mode_acou
8053 if AsType(RESULTAT) == mode_stat : return mode_stat
8054 if AsType(mode_stat) == mode_stat_depl : return mode_stat_depl
8055 if AsType(mode_stat) == mode_stat_acce : return mode_stat_acce
8056 if AsType(mode_stat) == mode_stat_forc : return mode_stat_forc
8057 if AsType(RESULTAT) == mult_elas : return mult_elas
8058 if AsType(RESULTAT) == fourier_elas : return fourier_elas
8059 raise AsException("type de concept resultat non prevu")
8061 EXTR_RESU=OPER(nom="EXTR_RESU",op=176,sd_prod=extr_resu_prod,docu="U4.71.04-b1",reentrant='f',
8062 RESULTAT =SIMP(statut='o',typ=(evol_elas,dyna_trans,dyna_harmo,acou_harmo,mode_meca,
8063 mode_acou,mode_stat_depl,mode_stat_acce,mode_stat_forc,evol_ther,evol_noli,
8064 mult_elas,fourier_elas ) ),
8066 ARCHIVAGE =FACT(statut='f',min=1,max=1,
8067 regles=( UN_PARMI('NUME_ORDRE', 'INST', 'FREQ', 'NUME_MODE',
8068 'NOEUD_CMP', 'LIST_INST', 'LIST_FREQ', 'LIST_ORDRE',
8069 'NOM_CAS', 'LIST_ARCH', 'PAS_ARCH' ),
8070 EXCLUS( 'CHAM_EXCLU','NOM_CHAM' ), ),
8071 CHAM_EXCLU =SIMP(statut='f',typ='TXM',max='**'),
8072 NOM_CHAM =SIMP(statut='f',typ='TXM',max='**'),
8073 PRECISION =SIMP(statut='f',typ='R',defaut=1.E-3 ),
8074 CRITERE =SIMP(statut='f',typ='TXM',into=("RELATIF","ABSOLU"),defaut="RELATIF"),
8075 LIST_ARCH =SIMP(statut='f',typ=listis),
8076 PAS_ARCH =SIMP(statut='f',typ='I'),
8077 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
8078 LIST_ORDRE =SIMP(statut='f',typ=listis),
8079 INST =SIMP(statut='f',typ='R',max='**'),
8080 LIST_INST =SIMP(statut='f',typ=listr8),
8081 FREQ =SIMP(statut='f',typ='R',max='**'),
8082 LIST_FREQ =SIMP(statut='f',typ=listr8),
8083 NUME_MODE =SIMP(statut='f',typ='I',max='**'),
8084 NOEUD_CMP =SIMP(statut='f',typ='TXM',max='**'),
8085 NOM_CAS =SIMP(statut='f',typ='TXM'),
8088 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
8090 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8091 # CONFIGURATION MANAGEMENT OF EDF VERSION
8092 # ======================================================================
8093 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8094 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8095 # REDISTRIBUTION OF THIS FILE.
8096 # ======================================================================
8097 def fact_grad_prod(MATR_ASSE,**args):
8098 if AsType(MATR_ASSE) == matr_asse_depl_r : return matr_asse_depl_r
8099 if AsType(MATR_ASSE) == matr_asse_temp_r : return matr_asse_temp_r
8100 if AsType(MATR_ASSE) == matr_asse_pres_r : return matr_asse_pres_r
8101 raise AsException("type de concept resultat non prevu")
8103 FACT_GRAD=OPER(nom="FACT_GRAD",op=85,sd_prod=fact_grad_prod,docu="U4.55.03-e",
8104 fr="Préconditionnement pour résolution par gradient conjugué",
8106 MATR_ASSE =SIMP(statut='o',
8107 typ=(matr_asse_depl_r,matr_asse_temp_r,
8108 matr_asse_pres_r) ),
8109 PRE_COND =SIMP(statut='f',typ='TXM',defaut="LDLT_INC",into=("LDLT_INC",) ),
8110 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut= 0 ),
8111 INFO =SIMP(statut='f',typ='I',into=(1,2) ),
8113 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8114 # CONFIGURATION MANAGEMENT OF EDF VERSION
8115 # ======================================================================
8116 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8117 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8118 # REDISTRIBUTION OF THIS FILE.
8119 # ======================================================================
8120 FACT_INTE_SPEC=OPER(nom="FACT_INTE_SPEC",op= 117,sd_prod=interspfact,
8121 fr="Factorisation d une matrice interspectrale hermitienne",
8122 docu="U4.36.04-e",reentrant='n',
8123 regles=(ENSEMBLE('FREQ_FIN','NB_POIN'),),
8124 # regle non indiquée dans la doc U
8125 INTE_SPEC =SIMP(statut='o',typ=tabl_intsp ),
8126 NUME_VITE_FLUI =SIMP(statut='f',typ='I' ),
8127 FREQ_INIT =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
8128 FREQ_FIN =SIMP(statut='f',typ='R' ),
8129 NB_POIN =SIMP(statut='f',typ='I',defaut= 0 ),
8130 SUR_ECHAN =SIMP(statut='f',typ='R',defaut= 1. ),
8131 TITRE =SIMP(statut='f',typ='TXM',max='**'),
8133 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
8134 # CONFIGURATION MANAGEMENT OF EDF VERSION
8135 # ======================================================================
8136 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8137 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8138 # REDISTRIBUTION OF THIS FILE.
8139 # ======================================================================
8140 # RESPONSABLE VABHHTS J.PELLET
8141 def fact_ldlt_prod(MATR_ASSE,**args):
8142 if AsType(MATR_ASSE) == matr_asse_depl_r : return matr_asse_depl_r
8143 if AsType(MATR_ASSE) == matr_asse_depl_c : return matr_asse_depl_c
8144 if AsType(MATR_ASSE) == matr_asse_temp_r : return matr_asse_temp_r
8145 if AsType(MATR_ASSE) == matr_asse_temp_c : return matr_asse_temp_c
8146 if AsType(MATR_ASSE) == matr_asse_pres_r : return matr_asse_pres_r
8147 if AsType(MATR_ASSE) == matr_asse_pres_c : return matr_asse_pres_c
8148 raise AsException("type de concept resultat non prevu")
8150 FACT_LDLT=OPER(nom="FACT_LDLT",op=14,sd_prod=fact_ldlt_prod,fr="Factorisation en place ou hors place",
8151 docu="U4.55.01-f",reentrant='f',
8152 regles=(EXCLUS('BLOC_DEBUT','DDL_DEBUT'),
8153 EXCLUS('BLOC_FIN','DDL_FIN'),),
8154 MATR_ASSE =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_depl_c,matr_asse_temp_r,
8155 matr_asse_temp_c,matr_asse_pres_r,matr_asse_pres_c) ),
8156 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
8157 NPREC =SIMP(statut='f',typ='I',defaut=8,val_min=0,),
8158 PRE_COND =SIMP(statut='f',typ='TXM',defaut="SANS",into=("SANS","DIAG") ),
8159 BLOC_DEBUT =SIMP(statut='f',typ='I',val_min=1,),
8160 DDL_DEBUT =SIMP(statut='f',typ='I',val_min=1,),
8161 BLOC_FIN =SIMP(statut='f',typ='I',val_min=1,),
8162 DDL_FIN =SIMP(statut='f',typ='I',val_min=1,),
8164 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
8166 TITRE =SIMP(statut='f',typ='TXM',max='**'),
8167 INFO =SIMP(statut='f',typ='I',into=(1,2) ),
8169 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8170 # CONFIGURATION MANAGEMENT OF EDF VERSION
8171 # ======================================================================
8172 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8173 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8174 # REDISTRIBUTION OF THIS FILE.
8175 # ======================================================================
8177 FERMER=PROC(nom="FERMER",op= 10,fr=" ",
8179 UNITE =SIMP(statut='o',typ='I',max='**' ),
8181 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8182 # CONFIGURATION MANAGEMENT OF EDF VERSION
8183 # ======================================================================
8184 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8185 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8186 # REDISTRIBUTION OF THIS FILE.
8187 # ======================================================================
8188 FIN=PROC(nom="FIN",op=9999,repetable='n',fr="Fin d'une étude",
8190 RETASSAGE =SIMP(fr="provoque le retassage de la base GLOBALE",
8191 statut='f',typ='TXM',defaut="NON",into=("OUI","NON",) ),
8192 PERFORMANCE =SIMP(fr="provoque l'impression d'un résumé des mesures de temps ",
8193 statut='f',typ='TXM',defaut="OUI",into=("OUI","NON",) ),
8194 INFO_RESU =SIMP(fr="provoque l'impression des informations sur les structures de données",
8195 statut='f',typ='TXM',defaut="OUI",into=("OUI","NON",) ),
8196 FICHIER =SIMP(statut='f',typ='TXM',defaut="MESSAGE"),
8198 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8199 # CONFIGURATION MANAGEMENT OF EDF VERSION
8200 # ======================================================================
8201 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8202 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8203 # REDISTRIBUTION OF THIS FILE.
8204 # ======================================================================
8205 FONC_FLUI_STRU=OPER(nom="FONC_FLUI_STRU",op= 169,sd_prod=fonction,
8206 docu="U4.35.02-c",reentrant='n',
8207 TYPE_FLUI_STRU =SIMP(statut='o',typ=(type_flui_stru) ),
8209 #& MODIF COMMANDE DATE 17/09/2001 AUTEUR MCOURTOI M.COURTOIS
8210 # CONFIGURATION MANAGEMENT OF EDF VERSION
8211 # ======================================================================
8212 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8213 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8214 # REDISTRIBUTION OF THIS FILE.
8215 # ======================================================================
8216 FORMULE = FORM( nom='FORMULE',op=-5,sd_prod=fonction,
8217 fr="Définition d une fonction",reentrant = 'n',
8218 regles=(UN_PARMI('REEL','ENTIER','COMPLEXE'),),
8219 REEL = SIMP(typ = 'shell',max=1),
8220 ENTIER = SIMP(typ = 'shell',max=1),
8221 COMPLEXE = SIMP(typ = 'shell',max=1),
8223 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8224 # CONFIGURATION MANAGEMENT OF EDF VERSION
8225 # ======================================================================
8226 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8227 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8228 # REDISTRIBUTION OF THIS FILE.
8229 # ======================================================================
8230 GENE_FONC_ALEA=OPER(nom="GENE_FONC_ALEA",op= 118,sd_prod=tabl_fonc,
8231 fr="Génération de la fonction temporelle à partir d une matrice interspectrale factorisée",
8232 docu="U4.36.05-e",reentrant='n',
8233 INTE_SPEC_FACT =SIMP(statut='o',typ=interspfact ),
8234 INIT_ALEA =SIMP(statut='f',typ='I',defaut= 12312745 ),
8235 NB_TIRAGE =SIMP(statut='f',typ='I',defaut= 1 ),
8236 NB_POIN =SIMP(statut='f',typ='I' ),
8237 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
8239 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8240 # CONFIGURATION MANAGEMENT OF EDF VERSION
8241 # ======================================================================
8242 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8243 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8244 # REDISTRIBUTION OF THIS FILE.
8245 # ======================================================================
8246 IMPR_CHARGE=PROC(nom="IMPR_CHARGE",op= 158,
8247 fr="Impression des charges mécaniques de type ddl imposés et relations linéaires entre les ddl",
8249 FICHIER =SIMP(statut='f',typ='TXM' ),
8250 FORMAT =SIMP(statut='f',typ='TXM',defaut="IDEAS",into=("IDEAS",) ),
8251 VERSION =SIMP(statut='f',typ='I',defaut= 5,into=( 5 ,) ),
8252 CHARGE =SIMP(statut='o',typ=char_meca,max='**', ),
8254 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8255 # CONFIGURATION MANAGEMENT OF EDF VERSION
8256 # ======================================================================
8257 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8258 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8259 # REDISTRIBUTION OF THIS FILE.
8260 # ======================================================================
8261 IMPR_CLASSI=PROC(nom="IMPR_CLASSI",op= 114,docu="U7.04.21-a",
8262 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','FREQ','NUME_MODE','LIST_FREQ',
8264 UNITE_CLASSI =SIMP(statut='o',typ='I' ),
8265 MODE_MECA =SIMP(statut='o',typ=mode_meca ),
8266 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
8267 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
8268 LIST_ORDRE =SIMP(statut='f',typ=listis ),
8269 NUME_MODE =SIMP(statut='f',typ='I',max='**'),
8270 FREQ =SIMP(statut='f',typ='R',max='**'),
8271 LIST_FREQ =SIMP(statut='f',typ=listr8 ),
8272 b_prec_crit =BLOC(condition = "LIST_FREQ != None or FREQ != None",
8273 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
8274 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",
8275 into=("RELATIF","ABSOLU") ),
8277 IMPRESSION =FACT(statut='f',min=01,max='**',
8278 regles=(UN_PARMI('NOEUD','GROUP_NO', ),),
8279 NOEUD =SIMP(statut='f',typ=no,max='**'),
8280 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
8281 NOM_CMP =SIMP(statut='f',typ='TXM',max='**'),
8283 AMOR =SIMP(statut='o',typ='R',max='**'),
8285 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
8286 # CONFIGURATION MANAGEMENT OF EDF VERSION
8287 # ======================================================================
8288 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8289 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8290 # REDISTRIBUTION OF THIS FILE.
8291 # ======================================================================
8292 # RESPONSABLE VABHHTS J.PELLET
8293 IMPR_CO=PROC(nom="IMPR_CO",op=17,docu="U4.91.11-f",
8294 fr="Impression du contenu d un concept utilisateur (pour développeur)",
8295 regles=(UN_PARMI('CO','CHAINE', ),),
8296 FICHIER =SIMP(statut='f',typ='TXM',defaut="RESULTAT"),
8297 NIVEAU =SIMP(statut='f',typ='I',defaut=2,into=(0,1,2) ),
8298 ATTRIBUT =SIMP(statut='f',typ='TXM',defaut="NON",into=("NON","OUI") ),
8299 CONTENU =SIMP(statut='f',typ='TXM',defaut="OUI",into=("NON","OUI") ),
8300 BASE =SIMP(statut='f',typ='TXM',defaut="G",into=("","G","V","L") ),
8301 CO =SIMP(statut='f',typ=assd,max='**'),
8302 CHAINE =SIMP(statut='f',typ='TXM'),
8303 POSITION =SIMP(statut='f',typ='I',defaut=1),
8305 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
8306 # CONFIGURATION MANAGEMENT OF EDF VERSION
8307 # ======================================================================
8308 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8309 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8310 # REDISTRIBUTION OF THIS FILE.
8311 # ======================================================================
8312 # RESPONSABLE MCOURTOI M.COURTOIS
8313 IMPR_COURBE=PROC(nom="IMPR_COURBE",op= 141,fr="Impression, sur fichiers",
8315 FICHIER =SIMP(statut='f',typ='TXM',defaut="RESULTAT"),
8316 FORMAT =SIMP(statut='f',typ='TXM',position='global'
8317 ,into=("AGRAF","EXCEL","POSTSCRIPT","RESULTAT","COMMANDE","SEISME") ),
8318 b_agraf_post =BLOC(condition = "(FORMAT=='AGRAF') or (FORMAT=='POSTSCRIPT')",fr="Mots-clés communs AGRAF et POSTCRIPT",
8319 BORNE_X =SIMP(statut='f',typ='R',min=2,max=2,fr="Intervalles de variation des abcisses"),
8320 ECHELLE_X =SIMP(statut='f',typ='TXM',defaut="LIN",into=("LIN","LOG"),fr="Type d'échelle pour les abcisses" ),
8321 BORNE_Y =SIMP(statut='f',typ='R',min=2,max=2,fr="Intervalles de variation des ordonnées"),
8322 ECHELLE_Y =SIMP(statut='f',typ='TXM',defaut="LIN",into=("LIN","LOG"),fr="Type d'échelle pour les ordonnées" ),
8324 b_agraf =BLOC(condition = "(FORMAT=='AGRAF')",fr="Mots-clés propres à AGRAF",
8325 TITRE_GRAPHIQUE =SIMP(statut='f',typ='TXM',fr="Titre associé au graphique" ),
8326 COMMENTAIRE =SIMP(statut='f',typ='TXM',max='**',fr="Commentaires associés au graphique"),
8327 LEGENDE_X =SIMP(statut='f',typ='TXM',fr="Légende associée à l axe des abcisses" ),
8328 LEGENDE_Y =SIMP(statut='f',typ='TXM',fr="Légende associée à l axe des ordonnées" ),
8329 FREQ_GRILLE_X =SIMP(statut='f',typ='I',defaut= 0,fr="Fréquence de tracage du quadrillage vertical" ),
8330 FREQ_GRILLE_Y =SIMP(statut='f',typ='I',defaut= 0,fr="Fréquence de tracage du quadrillage horizontal" ),
8332 b_excel = BLOC(condition = "(FORMAT=='EXCEL')",fr="Mots-clés propres au format Excel",
8333 BORNE_X =SIMP(statut='f',typ='R',min=2,max=2,fr="Intervalles de variation des abcisses"),
8334 BORNE_Y =SIMP(statut='f',typ='R',min=2,max=2,fr="Intervalles de variation des ordonnées"),
8336 b_post = BLOC ( condition = "(FORMAT=='POSTSCRIPT')",fr="Mots-clés propres à POSTCRIPT",
8337 TITRE =SIMP(statut='f',typ='TXM',fr="Titre associé au graphique" ),
8338 LABEL_X =SIMP(statut='f',typ='TXM',fr="Légende associée à l axe des abcisses" ),
8339 LABEL_Y =SIMP(statut='f',typ='TXM',fr="Légende associée à l axe des ordonnées" ),
8340 SORTIE =SIMP(statut='f',typ='TXM',defaut="COULEUR",into=("MONOCHROME","COULEUR"),fr="Type d impression" ),
8341 DATE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON"),fr="Impression de la date" ),
8342 GRILLE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON"),fr="Impression du quadrillage" ),
8343 AXE_ZERO_X =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON"),fr="Impression de l axe x égal zéro" ),
8344 AXE_ZERO_Y =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON"),fr="Impression de l axe y égal zéro" ),
8345 PRESENTATION =SIMP(statut='f',typ='TXM',defaut="PAYSAGE",into=("PAYSAGE","PORTRAIT"),
8346 fr="Disposition du graphique sur la feuille" ),
8347 FENETRE =SIMP(statut='f',typ='TXM',defaut="RECTANGLE",into=("CARREE","RECTANGLE"),
8348 fr="Forme de la fenetre contenant le graphique" ),
8350 COURBE =FACT(statut='o',min=01,max='**',fr="Définition de la courbe à tracer",
8351 regles=(UN_PARMI('FONCTION','LIST_RESU','TABLE','FONC_X','RESU_GENE'),),
8352 FONCTION =SIMP(statut='f',typ=(fonction, fonction_c),
8353 fr="Fonction réelle ou complexe", ),
8354 LIST_RESU =SIMP(statut='f',typ=listr8,
8355 fr="Liste des ordonnees d une fonction réelle définie par deux listes", ),
8356 # creer le type table
8357 TABLE =SIMP(statut='f',typ=table,
8358 fr="Nom de la table dont 2 colonnes définissent la fonction",),
8359 FONC_X =SIMP(statut='f',typ=fonction,
8360 fr="Fonction abscisses d une fonction paramétrique",),
8361 RESU_GENE =SIMP(statut='f',typ=tran_gene, ),
8362 b_fonction =BLOC(condition = "FONCTION != None",
8363 LIST_PARA =SIMP(statut='f',typ=listr8 ),
8365 b_fonction_c =BLOC(condition = "AsType(FONCTION) == fonction_c",
8366 fr="Fonction complexe définie par le mot-clé fonction",
8367 PARTIE =SIMP(statut='f',typ='TXM',into=("REEL","IMAG") ),
8369 b_list_resu =BLOC(condition = "LIST_RESU != None",
8370 LIST_PARA =SIMP(statut='o',typ=listr8 ),
8372 b_table =BLOC(condition = "TABLE != None",
8373 PARA_X =SIMP(statut='o',typ='TXM',
8374 fr="Paramètre de la table associé aux abcisses de la fonction à tracer" ),
8375 PARA_Y =SIMP(statut='o',typ='TXM',
8376 fr="Paramètre de la table associé aux ordonnées de la fonction à tracer" ),
8378 b_fonc_x =BLOC(condition = "FONC_X != None",
8379 FONC_Y =SIMP(statut='o',typ=fonction,fr="Fonction ordonnées d une fonction paramétrique" ),
8380 PARA =SIMP(statut='f',typ='TXM',defaut="FONC_X",into=("FONC_X","FONC_Y"),
8381 fr="Permutation des roles des deux fonctions" ),
8382 LIST_PARA =SIMP(statut='f',typ=listr8 ),
8384 b_resu_gene =BLOC(condition = "RESU_GENE != None",
8385 regles=(UN_PARMI('NOEUD_CHOC','GROUP_NO_CHOC'),),
8386 NOEUD_CHOC =SIMP(statut='f',typ=no),
8387 GROUP_NO_CHOC =SIMP(statut='f',typ=grno),
8388 PARA_X =SIMP(statut='o',typ='TXM'),
8389 PARA_Y =SIMP(statut='o',typ='TXM'),
8390 LIST_PARA =SIMP(statut='f',typ=listr8 ),
8391 SOUS_STRUC =SIMP(statut='f',typ='TXM' ),
8392 INTITULE =SIMP(statut='f',typ='TXM' ),
8396 LEGENDE =SIMP(statut='f',typ='TXM',fr="Légende associée à la courbe" ),
8397 STYLE =SIMP(statut='f',typ='TXM',defaut="LIGNE",fr="Style de la ligne représentant la courbe",
8398 into=("LIGNE","POINTILLE","POINT","POINT_RELIE") ),
8399 COULEUR =SIMP(statut='f',typ='TXM',fr="Couleur associée à la courbe",
8400 into=("NOIR","ROUGE","VERT_FONCE","BLEU",
8401 "MAGENTA","CYAN","VERT","SIENNE","ORANGE",
8402 "POURPRE","JAUNE","DAIM","TURQUOISE","VIOLET",
8403 "BRUN","CORAIL","MARRON","MAUVE","MARRON_CLAIR") ),
8404 MARQUEUR =SIMP(statut='f',typ='TXM',fr="Type du marqueur associé à la courbe",
8405 into=("POINT_F","CARRE_F","TRIANGLE_F",
8406 "LOSANGE_F","ETOILE_F","FUSEE_F","POINT",
8407 "CARRE","TRIANGLE","LOSANGE","ETOILE","FUSEE",
8408 "PLUS","X","CERCLE","CERCLE_P","CARRE_P",
8409 "LOSANGE_P","CERCLE_P_X","LOSANGE_P_X",
8410 "CERCLE_X","CARRE_X","LOSANGE_X") ),
8411 b_agraf =BLOC(condition = "(FORMAT=='AGRAF')",fr="Mots-clés propres à AGRAF",
8412 TRI =SIMP(statut='f',typ='TXM',defaut="N",
8413 fr="Choix du tri effectué sur les abcisses ou sur les ordonnées",
8414 into=("N","X","Y","XY","YX") ),
8415 FREQ_MARQUEUR =SIMP(statut='f',typ='I',defaut= 0,
8416 fr="Fréquence d impression du marqueur associé à la courbe", ),
8420 #& MODIF COMMANDE DATE 25/01/2002 AUTEUR GNICOLAS G.NICOLAS
8421 # CONFIGURATION MANAGEMENT OF EDF VERSION
8422 # ======================================================================
8423 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8424 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8425 # REDISTRIBUTION OF THIS FILE.
8426 # ======================================================================
8427 # RESPONSABLE GNICOLAS G.NICOLAS
8428 IMPR_FICO_HOMA=PROC(nom="IMPR_FICO_HOMA",op= 189, docu="U7.04.01-a",
8429 fr="Imprime le fichier de configuration de HOMARD.",
8430 ang="Writes the configuration file for HOMARD.",
8432 # 1. Le niveau d'information
8434 INFO = SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
8436 # 2. LE REPERTOIRE OU AURA LIEU LE CALCUL HOMARD
8438 REP =SIMP(statut='f',typ='TXM'),
8440 # 3. Langue des messages issus de HOMARD
8442 LANGUE = SIMP(statut='f',typ='TXM',defaut="FRANCAIS",
8443 into=("FRANCAIS","FRENCH","ANGLAIS","ENGLISH",),
8444 fr="Langue des messages issus de HOMARD.",
8445 ang="Language for HOMARD messages." ),
8447 # 4. L'UNITE LOGIQUE D'ECRITURE DU FICHIER DE CONFIGURATION HOMARD
8449 UNITE =SIMP(statut='f',typ='I',defaut= 71 ),
8451 # 5. LE TYPE DE TRAITEMENT :
8453 TRAITEMENT =FACT(statut='o',min=01,max=01,
8455 # 5.1. QUATRE CHOIX EXCLUSIFS :
8458 # A. ADAPTATION PAR UN INDICATEUR D'ERREUR, AVEC TROIS VARIANTES :
8459 # . RAFFINEMENT ET DERAFFINEMENT
8460 # . RAFFINEMENT SEUL
8461 # . DERAFFINEMENT SEUL
8462 # B. ADAPTATION UNIFORME, AVEC DEUX VARIANTES :
8463 # . RAFFINEMENT SEUL
8464 # . DERAFFINEMENT SEUL
8465 # . RIEN : LE MAILLAGE EST LE MEME A LA SORTIE ET A L'ENTREE
8466 # C. INFORMATION SUR UN MAILLAGE
8467 # D. MISE A JOUR DE SOLUTIONS
8469 regles=( UN_PARMI('ADAPTATION','UNIFORME','INFORMATION','MAJSOLUTION'),),
8470 ADAPTATION =SIMP(statut='f',typ='TXM',
8471 fr="Adaptation libre",
8472 ang="Free adaptation",
8473 into=("RAFFINEMENT","DERAFFINEMENT","RAFF_DERA") ),
8474 UNIFORME =SIMP(statut='f',typ='TXM',
8475 fr="Adaptation uniforme",
8476 ang="Uniforme adaptation",
8477 into=("RAFFINEMENT","DERAFFINEMENT","RIEN") ),
8478 INFORMATION =SIMP(statut='f',typ='TXM',
8479 fr="Adaptation libre",
8480 ang="Free adaptation",
8482 MAJSOLUTION =SIMP(statut='f',typ='TXM',
8483 fr="Mise à jour de solutions",
8484 ang="Solution updating",
8487 # 5.1.2. LES CONTRAINTES :
8489 # 5.1.2.1. POUR DE L'ADAPTATION LIBRE, IL FAUT :
8490 # A. LE NUMERO D'ITERATION DU MAILLAGE DE DEPART
8491 # B. LE NOM MED DU MAILLAGE D'ENTREE
8492 # C. LE NOM MED DE L'INDICATEUR D'ERREUR
8493 # D. LE NUMERO D'ITERATION DU MAILLAGE DE DEPART
8494 # E. LA MISE A JOUR DE SOLUTION
8495 # F. LE NOM MED DU MAILLAGE DE SORTIE
8496 # REMARQUE : IL FAUT DES CRITERES, MAIS ON NE SAIT PAS LESQUELS
8498 # 5.1.2.2. POUR DE L'ADAPTATION UNIFORME
8500 # A. LE NUMERO D'ITERATION DU MAILLAGE DE DEPART
8501 # B. LE NOM MED DU MAILLAGE DE SORTIE
8503 # A. LE NOM MED DE L'INDICATEUR D'ERREUR
8504 # B. LE NOM DE LA COMPOSANTE DE L'INDICATEUR D'ERREUR
8506 # REMARQUE : A L'ITERATION 0, OU AUX ITERATIONS SUIVANTES SI MAJ DE SOLUTION,
8507 # IL FAUT LE NOM MED DU MAILLAGE D'ENTREE
8509 # 5.1.2.3. POUR DE LA MISE A JOUR DE SOLUTION :
8511 # A. LE NUMERO D'ITERATION DU MAILLAGE DE DEPART
8512 # B. LE NOM MED DU MAILLAGE D'ENTREE
8514 # A. LE NOM MED DE L'INDICATEUR D'ERREUR
8515 # B. LE NOM DE LA COMPOSANTE DE L'INDICATEUR D'ERREUR
8519 # 5.1.2.4. POUR DE L'INFORMATION :
8521 # A. LE NOM MED DU MAILLAGE D'ENTREE
8523 # A. LE NOM MED DE L'INDICATEUR D'ERREUR
8524 # B. LE NOM DE LA COMPOSANTE DE L'INDICATEUR D'ERREUR
8526 # D. LE NUMERO D'ITERATION DU MAILLAGE DE DEPART
8527 # E. LA MISE A JOUR DE SOLUTION
8529 b_maillage_initial =BLOC(condition = "( INFORMATION != None ) or ( ADAPTATION != None ) or "+
8530 "( MAJSOLUTION != None ) ",
8531 fr="Nom MED du maillage en entrée",
8532 ang="MED name of the in-mesh",
8533 NOM_MED_MAILLAGE_N =SIMP(statut='o',typ='TXM',),
8536 b_maillage_initial_uniforme =BLOC(condition = "( UNIFORME != None ) ",
8537 fr="Nom MED du maillage en entrée",
8538 ang="MED name of the in-mesh",
8539 NOM_MED_MAILLAGE_N =SIMP(statut='f',typ='TXM',),
8542 b_iteration_maj_champ =BLOC(condition = "( UNIFORME != None ) or ( ADAPTATION != None ) or "+
8543 "( MAJSOLUTION != None ) ",
8544 fr="Nom MED du maillage en sortie, numero d'iteration et mise à jour de champs",
8545 ang="MED name of the out-mesh, iteration rank and field updating",
8546 NITER =SIMP(statut='o',typ='I',
8547 fr="Numéro d'itération.",
8548 ang="Iteration #." ),
8549 NOM_MED_MAILLAGE_NP1 =SIMP(statut='o',typ='TXM'),
8550 MAJ_CHAM =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
8553 b_indicateur_d_erreur =BLOC(condition = "ADAPTATION != None",
8554 fr="Indicateur d'erreur",
8555 ang="Error indicator",
8556 NOM_MED_INDICA =SIMP(statut='o',typ='TXM',
8557 fr="Nom MED de l'indicateur d'erreur.",
8558 ang="MED name of error indicator.",),
8559 NOM_CMP_INDICA =SIMP(statut='o',typ='TXM',
8560 fr="Nom de la composante de l'indicateur d'erreur retenue.",
8561 ang="Name of the selected component of the error indicator.",),
8562 NUMDT_INDICA =SIMP(statut='o',typ='I',
8563 fr="Numero du pas de temps de l'indicateur.",
8564 ang="Time step # of the error indicator.",),
8565 NUMORD_INDICA =SIMP(statut='o',typ='I',
8566 fr="Numero d'ordre de l'indicateur.",
8567 ang="Rank # of the error indicator.",),
8570 b_critere_de_raffinement =BLOC( condition = "( ADAPTATION == 'RAFF_DERA' ) or ( ADAPTATION == 'RAFFINEMENT' )" ,
8571 fr="Critère de raffinement.",
8572 ang="Refinement threshold.",
8573 regles=(UN_PARMI ( 'CRIT_RAFF_ABS', 'CRIT_RAFF_REL', 'CRIT_RAFF_PE' ),),
8574 CRIT_RAFF_ABS =SIMP(statut='f',typ='R',
8575 fr="Critère absolu",
8576 ang="Absolute threshold" ),
8577 CRIT_RAFF_REL =SIMP(statut='f',typ='R',
8578 fr="Critère relatif",
8579 ang="Relative threshold" ),
8580 CRIT_RAFF_PE =SIMP(statut='f',typ='R',
8581 fr="Pourcentage d'éléments",
8582 ang="Percentage of elements" ),
8585 b_critere_de_deraffinement =BLOC ( condition = "( ADAPTATION == 'RAFF_DERA' ) or ( ADAPTATION == 'DERAFFINEMENT' )" ,
8586 fr="Critère de déraffinement.",
8587 ang="Unrefinement threshold.",
8588 regles=(UN_PARMI ( 'CRIT_DERA_ABS', 'CRIT_DERA_REL', 'CRIT_DERA_PE' ),),
8589 CRIT_DERA_ABS =SIMP(statut='f',typ='R' ,
8590 fr="Critère absolu",
8591 ang="Absolute threshold" ),
8592 CRIT_DERA_REL =SIMP(statut='f',typ='R',
8593 fr="Critère relatif",
8594 ang="Relative threshold" ),
8595 CRIT_DERA_PE =SIMP(statut='f',typ='R',
8596 fr="Pourcentage d'éléments",
8597 ang="Percentage of elements" ),
8600 b_niveau_maximum =BLOC ( condition = " ( ADAPTATION == 'RAFF_DERA' ) or ( ADAPTATION == 'RAFFINEMENT' ) or "+
8601 " ( UNIFORME == 'RAFFINEMENT' )" ,
8602 fr="Niveau maximum de profondeur de raffinement",
8603 ang="Maximum level for refinement",
8604 NIVE_MAX =SIMP(statut='f',typ='I' ),
8607 b_niveau_minimum =BLOC ( condition = " ( ADAPTATION == 'RAFF_DERA' ) or ( ADAPTATION == 'DERAFFINEMENT' ) or"+
8608 " ( UNIFORME == 'DERAFFINEMENT' )" ,
8609 fr="Niveau minimum de déraffinement",
8610 ang="Minimum level for unrefinement",
8611 NIVE_MIN =SIMP(statut='f',typ='I' ),
8616 # 6. L'ANALYSE DU MAILLAGE
8618 ANALYSE =FACT(statut='f',min=01,max=01,
8619 fr="Analyse du maillage.",
8620 ang="Mesh analysis.",
8622 # 6.1. CHOIX NON EXCLUSIFS, AVEC DEUX VARIANTES (OUI/NON) :
8623 # A. NOMBRE DES ELEMENTS
8624 # B. QUALITE DES ELEMENTS
8625 # C. INTERPENETRATION DES ELEMENTS
8626 # D. CONNEXITE DU MAILLAGE
8627 # E. TAILLE DES DIFFERENTS SOUS-DOMAINES
8629 regles=(AU_MOINS_UN('NOMBRE','QUALITE','INTERPENETRATION','CONNEXITE','TAILLE'),),
8631 NOMBRE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON"),
8632 fr="Nombre de noeuds et éléments du maillage",
8633 ang="Number of nodes and elements in the mesh" ),
8635 QUALITE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
8636 fr="Qualité du maillage",
8637 ang="Mesh quality" ),
8639 INTERPENETRATION=SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
8640 fr="Controle de la non interpénétration des éléments.",
8641 ang="Overlapping checking." ),
8643 CONNEXITE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
8644 fr="Connexité du maillage.",
8645 ang="Mesh connexity." ),
8647 TAILLE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
8648 fr="Tailles des sous-domaines du maillage.",
8649 ang="Sizes of mesh sub-domains." ),
8654 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8655 # CONFIGURATION MANAGEMENT OF EDF VERSION
8656 # ======================================================================
8657 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8658 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8659 # REDISTRIBUTION OF THIS FILE.
8660 # ======================================================================
8661 IMPR_GENE=PROC(nom="IMPR_GENE",op= 157,
8662 fr="Calcul du dommage subi par une structure soumise à une sollicitation de type aléatoire",
8664 GENE =FACT(statut='o',min=01,max='**',
8665 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','FREQ','NUME_MODE',
8666 'LIST_INST','LIST_FREQ','TOUT_MODE','TOUT_INST','LIST_ORDRE'),
8667 EXCLUS('TOUT_MODE','NUME_ORDRE','INST','FREQ','NUME_MODE',
8668 'LIST_INST','LIST_FREQ','TOUT_ORDRE','TOUT_INST','LIST_ORDRE'),
8669 EXCLUS('TOUT_INST','NUME_ORDRE','INST','FREQ','NUME_MODE',
8670 'LIST_INST','LIST_FREQ','TOUT_ORDRE','LIST_ORDRE'),
8671 EXCLUS('TOUT_CMP_GENE','NUME_CMP_GENE'),
8672 EXCLUS('TOUT_CHAM','NOM_CHAM'),
8673 EXCLUS('TOUT_PARA','NOM_PARA'),),
8674 # faut-il faire des blocs selon le type de RESU_GENE
8675 RESU_GENE =SIMP(statut='o',typ=(vect_asse_gene, tran_gene, mode_gene, harm_gene)),
8676 FORMAT =SIMP(statut='f',typ='TXM',defaut="RESULTAT",into=("RESULTAT",) ),
8677 FICHIER =SIMP(statut='f',typ='TXM' ),
8678 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
8679 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
8680 LIST_ORDRE =SIMP(statut='f',typ=listis ),
8681 TOUT_MODE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
8682 NUME_MODE =SIMP(statut='f',typ='I',max='**'),
8683 INST =SIMP(statut='f',typ='R',max='**'),
8684 LIST_INST =SIMP(statut='f',typ=listr8 ),
8685 TOUT_INST =SIMP(statut='f',typ='TXM',into=("OUI",) ),
8686 FREQ =SIMP(statut='f',typ='R',max='**'),
8687 LIST_FREQ =SIMP(statut='f',typ=listr8 ),
8688 b_prec_crit =BLOC(condition = "LIST_FREQ != None or FREQ != None",
8689 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
8690 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",
8691 into=("RELATIF","ABSOLU") ),
8693 TOUT_CMP_GENE =SIMP(statut='f',typ='TXM',into=("OUI","NON") ),
8694 NUME_CMP_GENE =SIMP(statut='f',typ='I',max='**'),
8695 TOUT_CHAM =SIMP(statut='f',typ='TXM',into=("OUI","NON") ),
8696 NOM_CHAM =SIMP(statut='f',typ='TXM',max='**'),
8697 TOUT_PARA =SIMP(statut='f',typ='TXM',into=("OUI","NON") ),
8698 NOM_PARA =SIMP(statut='f',typ='TXM',max='**'),
8699 SOUS_TITRE =SIMP(statut='f',typ='TXM',max='**'),
8700 INFO_CMP_GENE =SIMP(statut='f',typ='TXM',into=("OUI","NON") ),
8701 INFO_GENE =SIMP(statut='f',typ='TXM',into=("OUI","NON") ),
8704 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8705 # CONFIGURATION MANAGEMENT OF EDF VERSION
8706 # ======================================================================
8707 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8708 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8709 # REDISTRIBUTION OF THIS FILE.
8710 # ======================================================================
8711 IMPR_JEVEUX=PROC(nom="IMPR_JEVEUX",op=16,docu="U4.91.21-f",
8712 fr="Impression de caractéristiques d'objets JEVEUX (pour développeur)",
8713 ENTITE =SIMP(fr="choix de l'observation",statut='o',typ='TXM',
8714 into=("DISQUE","MEMOIRE","REPERTOIRE",
8715 "OBJET","ATTRIBUT","SYSTEME") ),
8716 b_objet =BLOC(condition = "(ENTITE=='OBJET')",
8717 NOMOBJ =SIMP(fr="nom d'objet",statut='f',typ='TXM' ),
8718 NUMOC =SIMP(fr="numéro d objet de collection",statut='f',typ='I' ),
8719 NOMOC =SIMP(fr="nom d'objet de collection",statut='f',typ='TXM' ),
8721 b_attribut =BLOC(condition = "(ENTITE=='ATTRIBUT')",
8722 NOMOBJ =SIMP(fr="nom de collection",statut='f',typ='TXM' ),
8723 NOMATR =SIMP(fr="nom d attribut de collection",statut='f',typ='TXM',
8724 into=('$$DESO','$$IADD','$$IADM','$$NOM','$$LONG',
8725 '$$LONO','$$LUTI','$$NUM') ),
8727 b_systeme =BLOC(condition = "(ENTITE=='SYSTEME')",
8728 CLASSE =SIMP(statut='o',typ='TXM',into=('G','V','L') ),
8729 NOMATR =SIMP(fr="nom d attribut systeme",statut='f',typ='TXM',
8730 into=('$$CARA','$$IADD','$$GENR','$$TYPE','$$ETAT',
8731 '$$DOCU','$$ORIG','$$RNOM','$$LTYP','$$LONG',
8732 '$$LONO','$$DATE','$$LUTI','$$HCOD','$$INDX',
8733 '$$TLEC','$$TECR','$$IADM','$$ACCE') ),
8735 b_repertoire =BLOC(condition = "(ENTITE=='REPERTOIRE')",
8736 CLASSE =SIMP(statut='f',typ='TXM',into=('G','V','L',' '),defaut=' '),
8738 b_disque =BLOC(condition = "(ENTITE=='DISQUE')",
8739 CLASSE =SIMP(statut='f',typ='TXM' ,into=('G','V','L',' '),defaut=' '),
8741 IMPRESSION =FACT(statut='f',min=01,max=01,
8742 NOM =SIMP(statut='f',typ='TXM' ),
8743 UNITE =SIMP(statut='f',typ='I'),
8745 COMMENTAIRE =SIMP(statut='f',typ='TXM' ),
8747 #& MODIF COMMANDE DATE 19/12/2001 AUTEUR CIBHHPD D.NUNEZ
8748 # CONFIGURATION MANAGEMENT OF EDF VERSION
8749 # ======================================================================
8750 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8751 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8752 # REDISTRIBUTION OF THIS FILE.
8753 # ======================================================================
8754 IMPR_MACR_ELEM=PROC(nom="IMPR_MACR_ELEM",op= 160,
8756 MACR_ELEM_DYNA =SIMP(statut='o',typ=macr_elem_dyna ),
8757 FICHIER =SIMP(statut='f',typ='TXM' ),
8758 FORMAT =SIMP(statut='f',typ='TXM',defaut="IDEAS",
8759 into=("MISS_3D","IDEAS","CADYRO","PLEXUS") ),
8760 b_ideas =BLOC(condition = "FORMAT == 'PLEXUS'",
8761 VERSION =SIMP(statut='f',typ='I',defaut= 5,into=( 5 ,) ),
8763 b_plexus =BLOC(condition = "FORMAT == 'IDEAS'",
8764 VERSION =SIMP(statut='f',typ='I',defaut= 5,into=( 5 ,) ),
8766 b_miss_3d =BLOC(condition = "FORMAT == 'MISS_3D'",
8767 UNITE =SIMP(statut='f',typ='I',defaut= 26 ),
8768 SOUS_TITRE =SIMP(statut='f',typ='TXM',max='**'),
8769 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**'),
8770 GROUP_MA_INTERF =SIMP(statut='o',typ=grma,max='**'),
8771 # Ces trois mots cles sont-ils dans le bon bloc et avec le bon statut
8772 GROUP_MA_FLU_STR=SIMP(statut='f',typ=grma,max='**'),
8773 GROUP_MA_FLU_SOL=SIMP(statut='f',typ=grma,max='**'),
8774 GROUP_MA_SOL_SOL=SIMP(statut='f',typ=grma,max='**'),
8775 IMPR_MODE_MECA =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
8776 IMPR_MODE_STAT =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
8778 b_cadyro =BLOC(condition = "FORMAT == 'CADYRO'",
8779 SQUELETTE =SIMP(statut='f',typ=squelette ),
8780 UNITE_MODE_MECA =SIMP(statut='f',typ='I',defaut= 26 ),
8781 UNITE_MODE_STAT =SIMP(statut='f',typ='I',defaut= 27 ),
8782 UNITE_MAILLAGE =SIMP(statut='f',typ='I',defaut= 28 ),
8783 IMPR_MODE_MECA =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
8784 IMPR_MODE_STAT =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
8788 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8789 # CONFIGURATION MANAGEMENT OF EDF VERSION
8790 # ======================================================================
8791 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8792 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8793 # REDISTRIBUTION OF THIS FILE.
8794 # ======================================================================
8795 IMPR_MATRICE=PROC(nom="IMPR_MATRICE",op= 159,
8796 fr="Impression des matrices élémentaires et des matrices assemblées",
8798 regles=(AU_MOINS_UN('MATR_ELEM','MATR_ASSE'),),
8800 MATR_ELEM =FACT(statut='f',min=01,max='**',
8801 FICHIER =SIMP(statut='f',typ='TXM' ),
8802 FORMAT =SIMP(statut='f',typ='TXM',defaut="IDEAS",
8803 into=("IDEAS","RESULTAT") ),
8804 b_format =BLOC(condition = "FORMAT == 'IDEAS'",
8805 VERSION =SIMP(statut='f',typ='I',defaut= 5,into=( 5 ,) ),
8807 # créer les types matr_elem et vect_elem
8808 MATRICE =SIMP(statut='o',typ=(matr_elem, vect_elem)),
8809 # Quelle regle pour TOUT, NOEUD, GROUP_NO, MAILLE, GROUP_MA
8810 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
8811 NOEUD =SIMP(statut='f',typ=no,max='**'),
8812 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
8813 MAILLE =SIMP(statut='f',typ=ma,max='**'),
8814 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
8815 NOM_CMP =SIMP(statut='f',typ='TXM',max='**'),
8816 GRAIN =SIMP(statut='f',typ='TXM',defaut="VALEUR",
8817 into=("VALEUR","NOEUD","MAILLE") ),
8818 NB_CHIFFRE =SIMP(statut='f',typ='I',defaut= 4 ),
8820 MATR_ASSE =FACT(statut='f',min=01,max='**',
8821 FICHIER =SIMP(statut='f',typ='TXM' ),
8822 FORMAT =SIMP(statut='f',typ='TXM',defaut="IDEAS",
8823 into=("IDEAS","RESULTAT") ),
8824 VERSION =SIMP(statut='f',typ='I',defaut= 5,into=( 5 ,) ),
8825 # créer le type matr_elem
8826 MATRICE =SIMP(statut='o',typ=matr_asse),
8827 # Quelle regle pour TOUT, NOEUD, GROUP_NO, MAILLE, GROUP_MA
8828 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
8829 NOEUD =SIMP(statut='f',typ=no,max='**'),
8830 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
8831 MAILLE =SIMP(statut='f',typ=ma,max='**'),
8832 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
8833 OPTION =SIMP(statut='f',typ='TXM',defaut="SOUS_MATRICE",
8834 into=("SOUS_MATRICE","LIGNE","COLONNE") ),
8835 NOM_CMP =SIMP(statut='f',typ='TXM',max='**'),
8836 GRAIN =SIMP(statut='f',typ='TXM',defaut="VALEUR",
8837 into=("VALEUR","NOEUD") ),
8838 NB_CHIFFRE =SIMP(statut='f',typ='I',defaut= 4 ),
8839 VALE_ZERO =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
8842 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8843 # CONFIGURATION MANAGEMENT OF EDF VERSION
8844 # ======================================================================
8845 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8846 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8847 # REDISTRIBUTION OF THIS FILE.
8848 # ======================================================================
8849 IMPR_MISS_3D=PROC(nom="IMPR_MISS_3D",op= 162,
8851 regles=(UN_PARMI('INST_INIT','FREQ_INIT'),
8852 PRESENT_PRESENT('INST_INIT','INST_FIN'),
8853 PRESENT_PRESENT('FREQ_INIT','FREQ_FIN'),),
8854 MACR_ELEM_DYNA =SIMP(statut='o',typ=macr_elem_dyna ),
8855 EXCIT =FACT(statut='f',min=01,max='**',
8856 regles=(UN_PARMI('FONC_MULT','COEF_MULT' ),),
8857 VECT_ASSE =SIMP(statut='f',typ=cham_no_depl_r ),
8858 FONC_MULT =SIMP(statut='f',typ=fonction ),
8859 COEF_MULT =SIMP(statut='f',typ='R' ),
8861 EXCIT_SOL =FACT(statut='f',min=01,max='**',
8862 DIRECTION =SIMP(statut='o',typ='R',max='**'),
8863 FONC_SIGNAL =SIMP(statut='f',typ=fonction ),
8864 NOM_CHAM =SIMP(statut='f',typ='TXM',defaut="DEPL",
8865 into=("DEPL","VITE","ACCE","FORC",) ),
8867 INST_INIT =SIMP(statut='f',typ='R' ),
8868 INST_FIN =SIMP(statut='f',typ='R' ),
8869 FREQ_INIT =SIMP(statut='f',typ='R' ),
8870 FREQ_FIN =SIMP(statut='f',typ='R' ),
8871 PAS =SIMP(statut='o',typ='R' ),
8872 UNITE =SIMP(statut='f',typ='I',defaut= 26 ),
8873 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2 ) ),
8874 TITRE =SIMP(statut='f',typ='TXM',max='**'),
8876 #& MODIF COMMANDE DATE 30/01/2002 AUTEUR CIBHHLV L.VIVAN
8877 # CONFIGURATION MANAGEMENT OF EDF VERSION
8878 # ======================================================================
8879 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8880 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8881 # REDISTRIBUTION OF THIS FILE.
8882 # ======================================================================
8883 IMPR_RESU=PROC(nom="IMPR_RESU",op=39,docu="U4.91.01-f1",
8884 fr="Impression du résultat d un calcul (différents formats)",
8885 MODELE =SIMP(statut='f',typ=modele),
8886 RESU =FACT(statut='o',min=01,max='**',
8887 FORMAT =SIMP(statut='f',typ='TXM',defaut="RESULTAT",
8888 into=("RESULTAT","IDEAS","ASTER","CASTEM","ENSIGHT","MED","GMSH") ),
8890 b_format_ideas =BLOC(condition="FORMAT=='IDEAS'",fr="version Ideas",
8891 VERSION =SIMP(statut='f',typ='I',defaut=5,into=(4,5)),
8894 b_format_castem =BLOC(condition="FORMAT=='CASTEM'",fr="version Castem",
8895 NIVE_GIBI =SIMP(statut='f',typ='I',defaut=10,into=(3,10)),
8898 regles=(AU_MOINS_UN('CHAM_GD','RESULTAT','MAILLAGE'),
8899 EXCLUS('CHAM_GD','RESULTAT'),),
8900 MAILLAGE =SIMP(statut='f',typ=(maillage,squelette)),
8901 INFO_MAILLAGE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
8902 CHAM_GD =SIMP(statut='f',typ=cham_gd),
8903 RESULTAT =SIMP(statut='f',typ=resultat),# CO() sd a creer !!!
8905 b_sensibilite =BLOC(condition="RESULTAT != None",
8906 fr="Définition des paramètres de sensibilité",
8907 ang="Definition of sensitivity parameters",
8908 SENSIBILITE =SIMP(statut='f',typ=(para_sensi,theta_geom),max='**',
8909 fr="Liste des paramètres de sensibilité.",
8910 ang="List of sensitivity parameters"),),
8912 b_extrac =BLOC(condition="RESULTAT != None",
8913 fr="extraction d un champ de grandeur",
8914 regles=(EXCLUS('TOUT_CHAM','NOM_CHAM'),
8915 EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','FREQ','NUME_MODE','NOEUD_CMP',
8916 'LIST_INST','LIST_FREQ','LIST_ORDRE','NOM_CAS','ANGL'),),
8917 TOUT_CHAM =SIMP(statut='f',typ='TXM',into=("OUI","NON") ),
8918 NOM_CHAM =SIMP(statut='f',typ='TXM',max='**'),
8920 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
8921 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
8922 NUME_MODE =SIMP(statut='f',typ='I',max='**'),
8923 LIST_ORDRE =SIMP(statut='f',typ=listis),
8924 NOEUD_CMP =SIMP(statut='f',typ='TXM',max='**'),
8925 NOM_CAS =SIMP(statut='f',typ='TXM',max='**'),
8926 ANGL =SIMP(statut='f',typ='R',max='**'),
8927 FREQ =SIMP(statut='f',typ='R',max='**'),
8928 LIST_FREQ =SIMP(statut='f',typ=listr8),
8929 INST =SIMP(statut='f',typ='R',max='**'),
8930 LIST_INST =SIMP(statut='f',typ=listr8),
8932 b_acce_reel =BLOC(condition="(FREQ != None)or(LIST_FREQ != None)or(INST != None)or(LIST_INST != None)",
8933 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3),
8934 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
8938 b_parametres =BLOC(condition="""(RESULTAT != None)and(FORMAT == 'RESULTAT')""",
8939 regles=(EXCLUS('TOUT_PARA','NOM_PARA'),),
8940 INFO_RESU =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
8941 TOUT_PARA =SIMP(statut='f',typ='TXM',into=("OUI","NON",) ),
8942 NOM_PARA =SIMP(statut='f',typ='TXM',max='**'),
8943 FORM_TABL =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON","EXCEL") ),
8946 b_cmp=BLOC(condition="""((CHAM_GD != None)or(RESULTAT != None))and((FORMAT == 'RESULTAT')or(FORMAT == 'ENSIGHT'))""",
8947 fr="sélection des composantes",
8948 regles=(EXCLUS('TOUT_CMP','NOM_CMP'),),
8949 TOUT_CMP =SIMP(statut='f',typ='TXM',into=("OUI",) ),
8950 NOM_CMP =SIMP(statut='f',typ='TXM',max='**'),
8953 b_gmsh=BLOC(condition="""((CHAM_GD != None)or(RESULTAT != None))and((FORMAT == 'GMSH'))""",
8954 fr="sélection des composantes et des entités toplogiques",
8955 NOM_CMP =SIMP(statut='f',typ='TXM',max='**'),
8956 MAILLE =SIMP(statut='f',typ=ma,max='**'),
8957 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
8960 b_topologie=BLOC(condition="""((CHAM_GD != None)or(RESULTAT != None))and((FORMAT == 'RESULTAT')or(FORMAT == 'IDEAS'))""",
8961 fr="sélection des entités toplogiques",
8962 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
8963 NOEUD =SIMP(statut='f',typ=no,max='**'),
8964 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
8965 MAILLE =SIMP(statut='f',typ=ma,max='**'),
8966 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
8969 b_valeurs =BLOC(condition="(FORMAT == 'RESULTAT')",
8970 fr="sélection sur les valeurs",
8971 VALE_MAX =SIMP(statut='f',typ='TXM',into=("OUI",) ),
8972 VALE_MIN =SIMP(statut='f',typ='TXM',into=("OUI",) ),
8973 BORNE_SUP =SIMP(statut='f',typ='R'),
8974 BORNE_INF =SIMP(statut='f',typ='R'),
8975 IMPR_COOR =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
8976 FORMAT_R =SIMP(statut='f',typ='TXM',defaut="1PE12.5"),
8979 SOUS_TITRE =SIMP(statut='f',typ='TXM',max='**'),
8980 FICHIER =SIMP(statut='f',typ='TXM'),
8982 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
8984 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
8985 # CONFIGURATION MANAGEMENT OF EDF VERSION
8986 # ======================================================================
8987 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
8988 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
8989 # REDISTRIBUTION OF THIS FILE.
8990 # ======================================================================
8991 IMPR_STURM=PROC(nom="IMPR_STURM",op=32,fr="Calculer et imprimer le nombre de valeurs propres dans un intervalle donné",
8993 MATR_A =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_temp_r,matr_asse_pres_r ) ),
8994 MATR_B =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_temp_r,matr_asse_pres_r ) ),
8995 TYPE_RESU =SIMP(statut='f',typ='TXM',defaut="DYNAMIQUE",into=("MODE_FLAMB","DYNAMIQUE"),
8996 fr="Type d analyse" ),
8997 b_dynamique =BLOC(condition = "TYPE_RESU == 'DYNAMIQUE'",
8998 fr="Recheche du nombre de fréquences propres",
8999 FREQ_MIN =SIMP(statut='f',typ='R',defaut= 0.E+0 ,fr="Borne inférieure de l intervalle" ),
9000 FREQ_MAX =SIMP(statut='o',typ='R',fr="Borne supérieure de l intervalle" ),
9002 b_mode_flamb =BLOC(condition = "TYPE_RESU == 'MODE_FLAMB'",
9003 fr="Recherche du nombre de charges critiques",
9004 CHAR_CRIT_MIN =SIMP(statut='o',typ='R',fr="Borne inférieure de l intervalle" ),
9005 CHAR_CRIT_MAX =SIMP(statut='o',typ='R',fr="Borne supérieure de l intervalle" ),
9007 NPREC_SOLVEUR =SIMP(statut='f',typ='I',defaut= 8 ),
9008 NMAX_ITER_SHIFT =SIMP(statut='f',typ='I',defaut= 5 ),
9009 FICHIER =SIMP(statut='f',typ='TXM',defaut="RESULTAT"),
9010 PREC_SHIFT =SIMP(statut='f',typ='R',defaut= 1.E-2 ),
9011 SEUIL_FREQ =SIMP(statut='f',typ='R',defaut= 1.E-2 ),
9013 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
9014 # CONFIGURATION MANAGEMENT OF EDF VERSION
9015 # ======================================================================
9016 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9017 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9018 # REDISTRIBUTION OF THIS FILE.
9019 # ======================================================================
9020 # RESPONSABLE VABHHTS J.PELLET
9021 IMPR_TABLE=PROC(nom="IMPR_TABLE",op=155,docu="U4.91.03-c1",
9022 fr="Impression d un concept de type table",
9023 TABLE =SIMP(statut='o',typ=table),
9024 FICHIER =SIMP(statut='f',typ='TXM',defaut="RESULTAT", ),
9025 FORMAT =SIMP(statut='f',typ='TXM',defaut="EXCEL",
9026 into=("EXCEL","AGRAF","MOT_CLE","TABLEAU") ),
9027 FILTRE =FACT(statut='f',min=1,max='**',
9028 NOM_PARA =SIMP(statut='o',typ='TXM'),
9029 CRIT_COMP =SIMP(statut='f',typ='TXM',defaut="EQ",
9030 into=("EQ","LT","GT","NE","LE","GE","VIDE",
9031 "NON_VIDE","MAXI","ABS_MAXI","MINI","ABS_MINI") ),
9032 b_vale =BLOC(condition = "(CRIT_COMP in ('EQ','NE','GT','LT','GE','LE'))",
9033 regles=(UN_PARMI('VALE','VALE_I','VALE_K','VALE_C',),),
9034 VALE =SIMP(statut='f',typ='R'),
9035 VALE_I =SIMP(statut='f',typ='I'),
9036 VALE_C =SIMP(statut='f',typ='C'),
9037 VALE_K =SIMP(statut='f',typ='TXM'),),
9039 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
9040 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
9042 TRI =FACT(statut='f',min=1,max=1,
9043 NOM_PARA =SIMP(statut='o',typ='TXM',max='**'),
9044 ORDRE =SIMP(statut='f',typ='TXM',max='**',defaut="CROISSANT",
9045 into=("CROISSANT","DECROISSANT") ),
9047 PAGINATION =SIMP(statut='f',typ='TXM',max='**'),
9048 FORMAT_R =SIMP(statut='f',typ='TXM',defaut="1PE12.5"),
9049 FORMAT_C =SIMP(statut='f',typ='TXM',defaut="MODULE_PHASE",
9050 into=("MODULE_PHASE","REEL_IMAG") ),
9051 NOM_PARA =SIMP(statut='f',typ='TXM',max='**'),
9052 TOUT_PARA =SIMP(statut='f',typ='TXM',into=("OUI",)),
9053 IMPR_FONCTION =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
9055 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
9056 # CONFIGURATION MANAGEMENT OF EDF VERSION
9057 # ======================================================================
9058 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9059 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9060 # REDISTRIBUTION OF THIS FILE.
9061 # ======================================================================
9062 INCLUDE=MACRO(nom="INCLUDE",op=-1,docu="U4.13.01-e",
9063 fr="Débranchement vers un fichier de commandes secondaires",
9064 sd_prod=ops.INCLUDE,op_init=ops.INCLUDE_context,fichier_ini=1,
9065 UNITE = SIMP(statut='o',typ='I'),
9066 INFO = SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
9068 #& MODIF COMMANDE DATE 14/02/2001 AUTEUR DURAND C.DURAND
9069 # CONFIGURATION MANAGEMENT OF EDF VERSION
9070 # ======================================================================
9071 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9072 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9073 # REDISTRIBUTION OF THIS FILE.
9074 # ======================================================================
9075 INCLUDE_MATERIAU=MACRO(nom="INCLUDE_MATERIAU",op=-14,docu="U4.43.02-a",
9077 sd_prod=ops.INCLUDE_MATERIAU,op_init=ops.INCLUDE_context,fichier_ini=0,
9078 NOM_AFNOR =SIMP(statut='o',typ='TXM' ),
9079 TYPE_MODELE =SIMP(statut='o',typ='TXM',into=("REF","PAR") ),
9080 VARIANTE =SIMP(statut='o',typ='TXM',
9081 into=("A","B","C","D","E","F","G","H","I","J",
9082 "K","L","M","N","O","P","Q","R","S","T","U","V",
9083 "W","X","Y","Z",) ),
9084 TYPE_VALE =SIMP(statut='o',typ='TXM',into=("NOMI","MINI","MAXI") ),
9085 NOM_MATER =SIMP(statut='o',typ='TXM' ),
9086 UNITE =SIMP(statut='f',typ='I',defaut= 32 ),
9087 EXTRACTION =FACT(statut='f',min=01,max=99,
9088 COMPOR =SIMP(statut='o',typ='TXM' ),
9089 TEMP_EVAL =SIMP(statut='o',typ='R' ),
9091 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
9093 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
9094 # CONFIGURATION MANAGEMENT OF EDF VERSION
9095 # ======================================================================
9096 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9097 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9098 # REDISTRIBUTION OF THIS FILE.
9099 # ======================================================================
9100 # RESPONSABLE G8BHHXD X.DESROCHES
9101 INTE_MAIL_2D=OPER(nom="INTE_MAIL_2D",op=50,sd_prod=courbe,docu="U4.81.11-e",
9102 fr="Définition d une courbe sur un maillage 2D",reentrant='n',
9104 MAILLAGE =SIMP(statut='o',typ=(maillage) ),
9106 regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),
9107 AU_MOINS_UN('DEFI_SEGMENT','DEFI_ARC','DEFI_CHEMIN'),
9108 PRESENT_ABSENT('DEFI_CHEMIN','DEFI_SEGMENT','DEFI_ARC'),
9109 PRESENT_ABSENT('DEFI_SEGMENT','NOEUD_ORIG','GROUP_NO_ORIG'),
9110 PRESENT_ABSENT('DEFI_ARC','NOEUD_ORIG','GROUP_NO_ORIG'),
9111 EXCLUS('NOEUD_ORIG','GROUP_NO_ORIG'),
9112 EXCLUS('DEFI_CHEMIN','DEFI_SEGMENT'),
9113 EXCLUS('DEFI_CHEMIN','DEFI_ARC'),),
9115 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
9116 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
9117 MAILLE =SIMP(statut='f',typ=ma,max='**'),
9119 DEFI_SEGMENT =FACT(statut='f',min=01,max='**',
9120 regles=(UN_PARMI('ORIGINE','NOEUD_ORIG','GROUP_NO_ORIG'),
9121 UN_PARMI('EXTREMITE','NOEUD_EXTR','GROUP_NO_EXTR'),),
9122 ORIGINE =SIMP(statut='f',typ='R',min=2,max=2),
9123 NOEUD_ORIG =SIMP(statut='f',typ=no,max=1),
9124 GROUP_NO_ORIG =SIMP(statut='f',typ=grno,max=1),
9125 EXTREMITE =SIMP(statut='f',typ='R',min=2,max=2),
9126 NOEUD_EXTR =SIMP(statut='f',typ=no,max=1),
9127 GROUP_NO_EXTR =SIMP(statut='f',typ=grno,max=1),
9130 DEFI_ARC =FACT(statut='f',min=01,max='**',
9131 regles=(UN_PARMI('CENTRE','NOEUD_CENTRE','GROUP_NO_CENTRE'),
9132 UN_PARMI('RAYON','ORIGINE','NOEUD_ORIG','GROUP_NO_ORIG'),
9133 UN_PARMI('RAYON','EXTREMITE','NOEUD_EXTR','GROUP_NO_EXTR'),
9134 PRESENT_PRESENT('RAYON','SECTEUR'),),
9135 CENTRE =SIMP(statut='f',typ='R',min=2,max=2),
9136 NOEUD_CENTRE =SIMP(statut='f',typ=no,max=1),
9137 GROUP_NO_CENTRE =SIMP(statut='f',typ=grno,max=1),
9138 RAYON =SIMP(statut='f',typ='R',max=1,val_min=0.E+0),
9139 SECTEUR =SIMP(statut='f',typ='R',min=2,max=2,
9140 val_min=-180.E+0,val_max=180E+0),
9141 ORIGINE =SIMP(statut='f',typ='R',min=2,max=2),
9142 NOEUD_ORIG =SIMP(statut='f',typ=no,max=1),
9143 GROUP_NO_ORIG =SIMP(statut='f',typ=grno,max=1),
9144 EXTREMITE =SIMP(statut='f',typ='R',min=2,max=2),
9145 NOEUD_EXTR =SIMP(statut='f',typ=no,max=1),
9146 GROUP_NO_EXTR =SIMP(statut='f',typ=grno,max=1),
9147 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
9148 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",
9149 into=("RELATIF","ABSOLU",) ),
9152 DEFI_CHEMIN =FACT(statut='f',min=01,max='**',
9153 regles=(UN_PARMI('MAILLE','GROUP_MA'),),
9154 MAILLE =SIMP(statut='f',typ=ma,max='**'),
9155 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
9158 NOEUD_ORIG =SIMP(statut='f',typ=no,max=1),
9159 GROUP_NO_ORIG =SIMP(statut='f',typ=grno,max=1),
9160 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3),
9161 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
9163 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
9164 # CONFIGURATION MANAGEMENT OF EDF VERSION
9165 # ======================================================================
9166 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9167 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9168 # REDISTRIBUTION OF THIS FILE.
9169 # ======================================================================
9170 # RESPONSABLE G8BHHXD X.DESROCHES
9171 INTE_MAIL_3D=OPER(nom="INTE_MAIL_3D",op=96,sd_prod=surface,docu="U4.81.12-e",
9172 fr="Définition d un chemin sur un maillage 3D",reentrant='n',
9173 MAILLAGE =SIMP(statut='o',typ=maillage),
9174 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
9175 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
9176 MAILLE =SIMP(statut='f',typ=ma,max='**'),
9177 DEFI_SEGMENT =FACT(statut='o',min=01,max='**',
9178 regles=(UN_PARMI('ORIGINE','NOEUD_ORIG','GROUP_NO_ORIG'),
9179 UN_PARMI('EXTREMITE','NOEUD_EXTR','GROUP_NO_EXTR'),),
9180 ORIGINE =SIMP(statut='f',typ='R',min=3,max=3),
9181 NOEUD_ORIG =SIMP(statut='f',typ=no,max=1),
9182 GROUP_NO_ORIG =SIMP(statut='f',typ=grno,max=1),
9183 EXTREMITE =SIMP(statut='f',typ='R',min=3,max=3),
9184 NOEUD_EXTR =SIMP(statut='f',typ=no,max=1),
9185 GROUP_NO_EXTR =SIMP(statut='f',typ=grno,max=1),
9187 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-6),
9188 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
9190 #& MODIF COMMANDE DATE 25/01/2002 AUTEUR GNICOLAS G.NICOLAS
9191 # CONFIGURATION MANAGEMENT OF EDF VERSION
9192 # ======================================================================
9193 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9194 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9195 # REDISTRIBUTION OF THIS FILE.
9196 # ======================================================================
9197 def lire_champ_prod(TYPE_CHAM=None,**args):
9198 if TYPE_CHAM == "CHAM_NO_TEMP_R" : return cham_no_temp_r
9199 if TYPE_CHAM == "CHAM_NO_DEPL_R" : return cham_no_depl_r
9200 raise AsException("type de concept resultat non prevu")
9202 LIRE_CHAMP=OPER(nom="LIRE_CHAMP",op= 192,sd_prod=lire_champ_prod,
9203 fr="Lire un champ dans un fichier et le stocker dans un concept.",
9204 ang="To read a field in a file and to save it in a concept.",
9205 docu="U7.02.02-a1",reentrant='n',
9207 # 1. Le maillage support du champ
9209 MAILLAGE =SIMP(statut='o',typ=maillage,
9210 fr="Nom du maillage support du champ",
9211 ang="Name of the mesh on which the field is defined" ),
9213 # 2. Format de lecture
9214 # Remarque : seul MED est operationnel dans cette version.
9216 FORMAT =SIMP(statut='f',typ='TXM',defaut="MED",into=("MED",),
9217 fr="Format du fichier : MED seulement",
9218 ang="Format of the file : MED only" ),
9220 # 3. L'unite logique du fichier.
9222 UNITE =SIMP(statut='f',typ='I',defaut= 81,
9223 fr="Le fichier est : fort.n.",
9224 ang="File is : fort.n" ),
9226 # 4. Pour le format MED, il faut preciser le nom sous lequel le champ est connu dans le fichier
9227 # et les composantes a lire
9229 b_format =BLOC(condition = "FORMAT == 'MED'",
9230 fr="Nom du champ dans le fichier MED",
9231 regles=(UN_PARMI('NOM_CMP_IDEM','NOM_CMP'),
9232 PRESENT_PRESENT('NOM_CMP','NOM_CMP_MED' ),),
9234 NOM_MED =SIMP(statut='o',typ='TXM',
9235 fr="Nom du champ dans le fichier MED.",
9236 ang="Name of the field in the MED file." ),
9238 NOM_CMP_IDEM =SIMP(statut='f',typ='TXM',into=("OUI",),
9239 fr="Les composantes ont le meme nom dans MED et ASTER.",
9240 ang="The names of the components are the same in ASTER and MED." ),
9241 NOM_CMP =SIMP(statut='f',typ='TXM',max='**',
9242 fr="Nom des composantes dans ASTER.",
9243 ang="Names of the components in ASTER" ),
9244 NOM_CMP_MED =SIMP(statut='f',typ='TXM',max='**',
9245 fr="Nom des composantes dans MED.",
9246 ang="Names of the components in MED" ),
9248 NUME_ORDRE =SIMP(statut='f',typ='I',max='**',
9249 fr="Numero d'ordre du champ à lire.",
9250 ang="Rank number of the field to read."),
9252 # Pour une lecture dans un fichier MED, on peut préciser le nom sous lequel
9253 # le maillage associé au champ y a été enregistré. Par défaut, on prendra le premier maillage.
9255 NOM_MAIL_MED = SIMP(statut='f',typ='TXM',
9256 fr="Nom du maillage dans le fichier MED.",
9257 ang="Name of the mesh into the MED file.",),
9261 # 5. Le type du concept lu
9263 TYPE_CHAM =SIMP(statut='o',typ='TXM',into=("CHAM_NO_TEMP_R","CHAM_NO_DEPL_R"),
9264 fr="Type de champ à créer.",
9265 ang="Type of the field to create." ),
9267 # 6. Le niveau d'information
9269 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
9271 #& MODIF COMMANDE DATE 03/10/2001 AUTEUR DURAND C.DURAND
9272 # CONFIGURATION MANAGEMENT OF EDF VERSION
9273 # ======================================================================
9274 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9275 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9276 # REDISTRIBUTION OF THIS FILE.
9277 # ======================================================================
9278 LIRE_FONCTION=OPER(nom="LIRE_FONCTION",op= 83,sd_prod=fonction,
9279 fr="Lecture d une fonction dans un fichier ",
9280 docu="U4.32.02-e1",reentrant='n',
9281 UNITE =SIMP(statut='o',typ='I' ),
9282 NOM_PARA =SIMP(statut='f',typ='TXM',
9283 into=("DX","DY","DZ","DRX","DRY","DRZ","TEMP",
9284 "INST","X","Y","Z","EPSI","FREQ","PULS","AMOR","ABSC",) ),
9285 NOM_RESU =SIMP(statut='f',typ='TXM' ),
9286 INTERPOL =SIMP(statut='f',typ='TXM',max=2,into=("NON","LIN","LOG") ),
9287 PROL_DROITE =SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
9288 PROL_GAUCHE =SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
9289 NOM_PARA_FONC =SIMP(statut='f',typ='TXM',
9290 into=("DX","DY","DZ","DRX","DRY","DRZ","TEMP",
9291 "INST","X","Y","Z","EPSI","FREQ","PULS","AMOR","ABSC",) ),
9292 INTERPOL_FONC =SIMP(statut='f',typ='TXM',max=2,into=("NON","LIN","LOG") ),
9293 PROL_DROITE_FONC=SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
9294 PROL_GAUCHE_FONC=SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
9295 INFO =SIMP(statut='f',typ='I',defaut= 2,into=( 1 , 2) ),
9296 TITRE =SIMP(statut='f',typ='TXM',max='**'),
9298 #& MODIF COMMANDE DATE 03/10/2001 AUTEUR DURAND C.DURAND
9299 # CONFIGURATION MANAGEMENT OF EDF VERSION
9300 # ======================================================================
9301 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9302 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9303 # REDISTRIBUTION OF THIS FILE.
9304 # ======================================================================
9305 LIRE_INTE_SPEC=OPER(nom="LIRE_INTE_SPEC",op= 116,sd_prod=tabl_intsp,
9306 fr="Lecture sur un fichier externe de fonctions complexes pour créer une matrice interspectrale",
9307 docu="U4.36.01-e1",reentrant='n',
9308 UNITE =SIMP(statut='o',typ='I' ),
9309 FORMAT =SIMP(statut='f',typ='TXM',defaut="MODULE_PHASE",into=("REEL_IMAG","MODULE_PHASE") ),
9310 NOM_PARA =SIMP(statut='f',typ='TXM',
9311 into=("DX","DY","DZ","DRX","DRY","DRZ","TEMP",
9312 "INST","X","Y","Z","EPSI","FREQ","PULS","AMOR","ABSC",) ),
9313 NOM_RESU =SIMP(statut='f',typ='TXM' ),
9314 INTERPOL =SIMP(statut='f',typ='TXM',max=2,into=("NON","LIN","LOG") ),
9315 PROL_DROITE =SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
9316 PROL_GAUCHE =SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
9317 TITRE =SIMP(statut='f',typ='TXM',max='**'),
9318 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
9320 #& MODIF COMMANDE DATE 10/10/2001 AUTEUR GNICOLAS G.NICOLAS
9321 # CONFIGURATION MANAGEMENT OF EDF VERSION
9322 # ======================================================================
9323 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9324 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9325 # REDISTRIBUTION OF THIS FILE.
9326 # ======================================================================
9327 # RESPONSABLE VABHHTS J.PELLET
9328 LIRE_MAILLAGE=OPER(nom="LIRE_MAILLAGE",op= 1,sd_prod=maillage,
9329 fr="Lecture d'un fichier de maillage",
9330 ang="Readings of a mesh file",
9331 docu="U4.21.01-f",reentrant='n',
9333 UNITE =SIMP(statut='f',typ='I',defaut= 20 ),
9335 FORMAT =SIMP(statut='f',typ='TXM',defaut="ASTER",into=("ASTER","MED"),
9336 fr="Format du fichier : ASTER ou MED.",
9337 ang="Format of the file : ASTER or MED.",),
9339 ABSC_CURV =FACT(statut='f',min=00,max=01,
9340 TOUT =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
9343 VERI_MAIL =FACT(statut='d',min=01,max=01,
9344 APLAT =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
9347 b_format_med =BLOC( condition = " ( FORMAT == 'MED' ) " ,
9348 fr="Informations complémentaires pour la lecture MED.",
9349 ang="Further information for MED readings.",
9351 # Pour une lecture dans un fichier MED, on peut préciser le nom sous lequel
9352 # le maillage y a été enregistré. Par défaut, on va le chercher sous le nom du concept à créer.
9354 NOM_MED = SIMP(statut='f',typ='TXM',
9355 fr="Nom du maillage dans le fichier MED.",
9356 ang="Name of the mesh into the MED file.",),
9358 INFO_MED = SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
9362 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
9365 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
9366 # CONFIGURATION MANAGEMENT OF EDF VERSION
9367 # ======================================================================
9368 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9369 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9370 # REDISTRIBUTION OF THIS FILE.
9371 # ======================================================================
9372 def lire_miss_3d_prod(TYPE_RESU,**args):
9373 if TYPE_RESU == "TRANS" : return dyna_trans
9374 if TYPE_RESU == "HARMO" : return dyna_harmo
9375 raise AsException("type de concept resultat non prevu")
9377 LIRE_MISS_3D=OPER(nom="LIRE_MISS_3D",op= 163,sd_prod=lire_miss_3d_prod,
9378 fr="Restitution au format MISS3D d une évolution harmonique ou transitoire",
9379 docu="U7.02.31-c",reentrant='n',
9380 MACR_ELEM_DYNA =SIMP(statut='o',typ=macr_elem_dyna ),
9381 UNITE =SIMP(statut='f',typ='I',defaut= 27 ),
9382 TYPE_RESU =SIMP(statut='f',typ='TXM',defaut="TRANS",into=("TRANS","HARMO") ),
9383 TITRE =SIMP(statut='f',typ='TXM',max='**'),
9385 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
9386 # CONFIGURATION MANAGEMENT OF EDF VERSION
9387 # ======================================================================
9388 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9389 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9390 # REDISTRIBUTION OF THIS FILE.
9391 # ======================================================================
9392 LIRE_PLEXUS=OPER(nom="LIRE_PLEXUS",op= 184,sd_prod=evol_char,
9394 docu="U7.02.11-a",reentrant='n',
9395 regles=(UN_PARMI('TOUT_ORDRE','NUME_ORDRE','INST','LIST_INST','LIST_ORDRE'),),
9396 UNITE =SIMP(statut='f',typ='I',defaut= 19 ),
9397 FORMAT =SIMP(statut='f',typ='TXM',defaut="IDEAS",into=("IDEAS",)),
9398 MAIL_PLEXUS =SIMP(statut='o',typ=maillage ),
9399 MAILLAGE =SIMP(statut='o',typ=maillage ),
9400 MODELE =SIMP(statut='o',typ=modele ),
9401 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
9402 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
9403 LIST_ORDRE =SIMP(statut='f',typ=listis ),
9404 INST =SIMP(statut='f',typ='R',max='**'),
9405 LIST_INST =SIMP(statut='f',typ=listr8 ),
9406 b_prec_crit =BLOC(condition = "LIST_INST != None or INST != None",
9407 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
9408 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",
9409 into=("RELATIF","ABSOLU") ),
9411 TITRE =SIMP(statut='f',typ='TXM',max='**'),
9413 #& MODIF COMMANDE DATE 12/09/2001 AUTEUR MCOURTOI M.COURTOIS
9414 # CONFIGURATION MANAGEMENT OF EDF VERSION
9415 # ======================================================================
9416 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9417 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9418 # REDISTRIBUTION OF THIS FILE.
9419 # ======================================================================
9420 # RESPONSABLE VABHHTS J.PELLET
9421 def lire_resu_prod(TYPE_RESU,**args):
9422 if TYPE_RESU == "EVOL_CHAR" : return evol_char
9423 if TYPE_RESU == "EVOL_THER" : return evol_ther
9424 if TYPE_RESU == "EVOL_ELAS" : return evol_elas
9425 if TYPE_RESU == "EVOL_NOLI" : return evol_noli
9426 if TYPE_RESU == "DYNA_TRANS" : return dyna_trans
9427 if TYPE_RESU == "DYNA_HARMO" : return dyna_harmo
9428 if TYPE_RESU == "HARM_GENE" : return harm_gene
9429 raise AsException("type de concept resultat non prevu")
9431 LIRE_RESU=OPER(nom="LIRE_RESU",op=150,sd_prod=lire_resu_prod,docu="U7.02.01-c1",reentrant='n',
9432 fr="Lecture de champs aux noeuds ou par éléments aux noeuds sur un fichier IDEAS ou EnSight",
9433 regles=(UN_PARMI('MAILLAGE','MODELE'),),
9434 FORMAT =SIMP(statut='f',typ='TXM',defaut="IDEAS",into=("IDEAS","ENSIGHT","MED") ),
9435 b_unite =BLOC(condition="FORMAT=='IDEAS'",
9436 UNITE =SIMP(statut='f',typ='I',defaut= 19 ),
9438 b_nom_fichier =BLOC(condition="FORMAT=='ENSIGHT'",
9439 NOM_FICHIER =SIMP(statut='f',typ='TXM'),
9441 TYPE_RESU =SIMP(statut='o',typ='TXM',into=("EVOL_THER","EVOL_ELAS","EVOL_NOLI",
9442 "DYNA_TRANS","DYNA_HARMO","HARM_GENE","EVOL_CHAR") ),
9443 b_evol_elas =BLOC(condition="TYPE_RESU=='EVOL_ELAS'",
9444 NOM_CHAM =SIMP(statut='o',typ='TXM',max='**',
9447 b_evol_ther =BLOC(condition="TYPE_RESU=='EVOL_THER'",
9448 NOM_CHAM =SIMP(statut='o',typ='TXM',max='**',
9449 into=("TEMP","TEMP_PEAU") ),
9451 b_evol_char =BLOC(condition="TYPE_RESU=='EVOL_CHAR'",
9452 NOM_CHAM =SIMP(statut='o',typ='TXM',max='**',
9453 into=("PRES","VITE_VENT",
9454 "FVOL_3D","FVOL_2D",
9455 "FSUR_3D","FSUR_2D") ),
9457 b_evol_noli =BLOC(condition="TYPE_RESU=='EVOL_NOLI'",
9458 NOM_CHAM =SIMP(statut='o',typ='TXM',max='**',
9459 into=("DEPL","VITE","ACCE","VARI_ELNO",
9460 "SIEF_ELNO","EPSA_ELNO") ),
9462 b_dyna =BLOC(condition="(TYPE_RESU=='DYNA_TRANS') or (TYPE_RESU=='DYNA_HARMO') or\
9463 (TYPE_RESU=='HARM_GENE')",
9464 NOM_CHAM =SIMP(statut='o',typ='TXM',max='**',
9465 into=("DEPL","VITE","ACCE",) ),
9467 INFO =SIMP(statut='f',typ='I',into=(1,2) ),
9468 MAILLAGE =SIMP(statut='f',typ=maillage),
9469 MODELE =SIMP(statut='f',typ=modele),
9470 NB_VARI =SIMP(statut='f',typ='I' ),
9471 FORMAT_IDEAS =FACT(statut='f',min=01,max='**',
9472 regles=(UN_PARMI('POSI_INST','POSI_FREQ'),),
9473 NOM_CHAM =SIMP(statut='o',typ='TXM',max='**',into=("TEMP","DEPL","VITE","ACCE","PRES","VARI_ELNO",
9474 "SIEF_ELNO","EPSA_ELNO","TEMP_PEAU","VITE_VENT",
9475 "FVOL_3D","FVOL_2D","FSUR_3D","FSUR_2D") ),
9476 NUME_DATASET =SIMP(statut='f',typ='I',into=(55,57,2414) ),
9477 RECORD_3 =SIMP(statut='f',typ='I',max='**'),
9478 RECORD_6 =SIMP(statut='f',typ='I',max='**'),
9479 RECORD_9 =SIMP(statut='f',typ='I',max='**'),
9480 POSI_ORDRE =SIMP(statut='o',typ='I',max='**'),
9481 POSI_INST =SIMP(statut='f',typ='I',max='**'),
9482 POSI_FREQ =SIMP(statut='f',typ='I',max='**'),
9483 NOM_CMP =SIMP(statut='o',typ='TXM',max='**'),
9485 b_extrac =BLOC(condition="1",fr="accès à un champ dans la structure de données résultat",
9486 regles=(UN_PARMI('TOUT_ORDRE','NUME_ORDRE','LIST_ORDRE','INST','LIST_INST','FREQ','LIST_FREQ'),),
9487 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
9488 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
9489 INST =SIMP(statut='f',typ='R',max='**'),
9490 LIST_INST =SIMP(statut='f',typ=listr8),
9491 LIST_ORDRE =SIMP(statut='f',typ=listis),
9492 FREQ =SIMP(statut='f',typ='R',max='**'),
9493 LIST_FREQ =SIMP(statut='f',typ=listr8),
9495 b_acce_reel =BLOC(condition="(INST != None)or(LIST_INST != None)or(FREQ != None)or(LIST_FREQ != None)",
9496 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3),
9497 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
9500 TITRE =SIMP(statut='f',typ='TXM',max='**'),
9502 #& MODIF COMMANDE DATE 25/01/2002 AUTEUR GNICOLAS G.NICOLAS
9503 # CONFIGURATION MANAGEMENT OF EDF VERSION
9504 # ======================================================================
9505 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9506 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9507 # REDISTRIBUTION OF THIS FILE.
9508 # ======================================================================
9509 # RESPONSABLE GNICOLAS G.NICOLAS
9510 def macr_adap_mail_prod(self,MAJ_CHAM,ADAPTATION,**args):
9511 mail1=ADAPTATION['MAILLAGE_N']
9512 self.type_sdprod(mail1,maillage)
9513 mail2=ADAPTATION['MAILLAGE_NP1']
9514 self.type_sdprod(mail2,maillage)
9515 if MAJ_CHAM == None:return None
9518 if t == 'CHAM_NO_TEMP_R':self.type_sdprod(ch['CHAM_MAJ'],cham_no_temp_r)
9519 if t == 'CHAM_NO_DEPL_R':self.type_sdprod(ch['CHAM_MAJ'],cham_no_depl_r)
9522 MACR_ADAP_MAIL=MACRO(nom="MACR_ADAP_MAIL",op=-24,sd_prod=macr_adap_mail_prod,
9523 fr="Adapter un maillage avec le logiciel HOMARD.",
9524 ang="Mesh adaptation with HOMARD software.",
9527 # 1. Le niveau d'information
9529 INFO = SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
9531 # 2. Version de HOMARD
9533 VERSION_HOMARD = SIMP(statut='f',typ='TXM',defaut="V5_1",
9534 into=("V5_1", "V5_N", "V5_N_PERSO"),
9535 fr="Version de HOMARD",
9536 ang="HOMARD release"),
9538 # 3. Langue des messages issus de HOMARD
9540 LANGUE = SIMP(statut='f',typ='TXM',defaut="FRANCAIS",
9541 into=("FRANCAIS","FRENCH","ANGLAIS","ENGLISH",),
9542 fr="Langue des messages issus de HOMARD.",
9543 ang="Language for HOMARD messages." ),
9545 # 4. LE TYPE DE TRAITEMENT :
9547 ADAPTATION =FACT(statut='o',min=01,max=01,
9548 fr="Type d'adaptation",
9549 ang="Type of adaptation",
9551 # 4.1. DEUX CHOIX D'ADAPTATION EXCLUSIFS :
9554 # A. SELON UN INDICATEUR D'ERREUR, AVEC TROIS VARIANTES :
9555 # . RAFFINEMENT ET DERAFFINEMENT
9556 # . RAFFINEMENT SEUL
9557 # . DERAFFINEMENT SEUL
9558 # B. UNIFORME, AVEC TROIS VARIANTES :
9559 # . RAFFINEMENT SEUL
9560 # . DERAFFINEMENT SEUL
9561 # . RIEN : LE MAILLAGE EST LE MEME A LA SORTIE ET A L'ENTREE
9564 UN_PARMI('LIBRE','UNIFORME'),
9566 LIBRE = SIMP(statut='f',typ='TXM',
9567 into=("RAFF_DERA","RAFFINEMENT","DERAFFINEMENT"),
9568 fr="Adaptation selon un indicateur d'erreur.",
9569 ang="Adaptation among an error indicator" ),
9570 UNIFORME = SIMP(statut='f',typ='TXM',
9571 into=("RAFFINEMENT","DERAFFINEMENT","RIEN"),
9572 fr="Adaptation uniforme.",
9573 ang="Uniform adaptation" ),
9575 # 4.2. QUEL QUE SOIT LE TYPE DE TRAITEMENT, IL FAUT DONNER :
9576 # A. LE CONCEPT DU MAILLAGE INITIAL
9577 # B. LE CONCEPT DU MAILLAGE FINAL
9579 MAILLAGE_N = SIMP(statut='o',typ=(CO,maillage),
9580 fr="Maillage avant adaptation",
9581 ang="Mesh before adaptation" ),
9582 MAILLAGE_NP1 = SIMP(statut='o',typ=(CO,maillage),
9583 fr="Maillage apres adaptation",
9584 ang="Mesh after adaptation" ),
9586 # 4.3. POUR DE L'ADAPTATION LIBRE, IL FAUT L'INDICATEUR D'ERREUR
9589 b_indicateur_d_erreur =BLOC( condition = " LIBRE != None " ,
9590 fr="Indicateur d'erreur",
9591 ang="Error indicator",
9593 # 4.3.1. LE NOM DU CONCEPT RESULTAT
9595 RESULTAT_N = SIMP(statut='o',typ=(evol_elas,evol_noli,evol_ther) ,
9596 fr="Resultat contenant l'indicateur d'erreur",
9597 ang="Result with error indicator" ),
9599 # 4.3.2. LE CHAMP D'INDICATEUR D'ERREUR
9601 INDICATEUR = SIMP(statut='o',typ='TXM',
9602 fr="Champ de l'indicateur d'erreur",
9603 ang="Error indicator field" ),
9605 # 4.3.3. LA COMPOSANTE RETENUE
9607 NOM_CMP_INDICA = SIMP(statut='o',typ='TXM',
9608 fr="Composante retenue",
9609 ang="Selected component" ),
9611 # 4.3.4. LE NUMERO D'ORDRE
9613 NUME_ORDRE = SIMP(statut='f',typ='I' ,
9614 fr="Numero d ordre",
9618 # 4.4. LES CRITERES POUR DE L'ADAPTATION LIBRE :
9619 # ABSOLU, RELATIF, EN PROPORTION D'ENTITE
9620 # 4.4.1. POUR LE RAFFINEMENT :
9622 b_critere_de_raffinement =BLOC( condition = " ( LIBRE == 'RAFF_DERA' ) or ( LIBRE == 'RAFFINEMENT' ) " ,
9623 fr="Critère de raffinement.",
9624 ang="Refinement threshold.",
9625 regles=(UN_PARMI ( 'CRIT_RAFF_ABS', 'CRIT_RAFF_REL', 'CRIT_RAFF_PE' ),),
9626 CRIT_RAFF_ABS = SIMP(statut='f',typ='R',
9627 fr="Critère absolu",
9628 ang="Absolute threshold" ),
9629 CRIT_RAFF_REL = SIMP(statut='f',typ='R',
9630 fr="Critère relatif",
9631 ang="Relative threshold" ),
9632 CRIT_RAFF_PE = SIMP(statut='f',typ='R',
9633 fr="Pourcentage d'éléments",
9634 ang="Percentage of elements" ),
9637 # 4.4.2. POUR LE DERAFFINEMENT :
9639 b_critere_de_deraffinement =BLOC ( condition = " ( LIBRE == 'RAFF_DERA' ) or ( LIBRE == 'DERAFFINEMENT' ) " ,
9640 fr="Critère de déraffinement.",
9641 ang="Unrefinement threshold.",
9642 regles=(UN_PARMI ( 'CRIT_DERA_ABS', 'CRIT_DERA_REL', 'CRIT_DERA_PE' ),),
9643 CRIT_DERA_ABS = SIMP(statut='f',typ='R' ,
9644 fr="Critère absolu",
9645 ang="Absolute threshold" ),
9646 CRIT_DERA_REL = SIMP(statut='f',typ='R',
9647 fr="Critère relatif",
9648 ang="Relative threshold" ),
9649 CRIT_DERA_PE = SIMP(statut='f',typ='R',
9650 fr="Pourcentage d'éléments",
9651 ang="Percentage of elements" ),
9654 # 4.5. LES NIVEAUX EXTREMES POUR LE MAILLAGE ADAPTE
9655 # 4.5.1. POUR LE RAFFINEMENT :
9657 b_niveau_maximum =BLOC ( condition = " ( LIBRE == 'RAFF_DERA' ) or ( LIBRE == 'RAFFINEMENT' ) or "+
9658 " ( UNIFORME == 'RAFFINEMENT' ) " ,
9659 fr="Niveau maximum de profondeur de raffinement",
9660 ang="Maximum level for refinement",
9661 NIVE_MAX = SIMP(statut='f',typ='I' ),
9664 # 4.5.2. POUR LE DERAFFINEMENT :
9666 b_niveau_minimum =BLOC ( condition = " ( LIBRE == 'RAFF_DERA' ) or ( LIBRE == 'DERAFFINEMENT' ) or "+
9667 " ( UNIFORME == 'DERAFFINEMENT' ) " ,
9668 fr="Niveau minimum de profondeur de déraffinement",
9669 ang="Minimum level for unrefinement",
9670 NIVE_MIN = SIMP(statut='f',typ='I' ),
9674 # 5. LA MISE A JOUR DE CHAMPS.
9675 # PAR DEFAUT, RIEN NE SE FAIT
9677 MAJ_CHAM =FACT(statut='f',min=01,max='**',
9678 fr="Mise à jour de champs sur le nouveau maillage.",
9679 ang="Updationg of fields over the new mesh.",
9681 # 5.1. LE NOM DU RESULTAT DU CHAMP A INTERPOLER
9683 RESULTAT = SIMP(statut='o',
9684 typ=(evol_elas,evol_noli,evol_ther),
9685 fr="Resultat contenant le champ à mettre à jour",
9686 ang="Result with field to be updated" ),
9688 # 5.2. LE NOM DU CHAMP A INTERPOLER
9690 NOM_CHAM = SIMP(statut='o',typ='TXM',
9691 fr="Nom du champ à mettre à jour",
9692 ang="Name of the field to be updated" ),
9694 # 5.3. LE NUMERO D'ORDRE POUR LE CHAMP A INTERPOLER
9696 NUME_ORDRE = SIMP(statut='f',typ='I',
9697 fr="Numero d ordre du champ à mettre à jour",
9698 ang="Rank of the field to be updated" ),
9700 # 5.4. LE NOM DU CHAMP QUI CONTIENDRA LE RESULTAT DE LA MISE A JOUR
9702 CHAM_MAJ = SIMP(statut='o',typ=(CO,cham_gd),
9703 fr="Nom du champ qui contiendra le champ mis à jour",
9704 ang="Name of the field for the updated field"),
9706 # 5.5. LE TYPE DU CHAMP QUI CONTIENDRA LE RESULTAT DE LA MISE A JOUR
9708 TYPE_CHAM = SIMP(statut='o',typ='TXM',
9709 into=("CHAM_NO_TEMP_R","CHAM_NO_DEPL_R"),
9710 fr="Type du champ qui contiendra le champ mis à jour",
9711 ang="Type of the field for the updated field" ),
9714 # 6. INFORMATION SUR LE MAILLAGE : par defaut, on ne fait que les nombres
9715 # A. NOMBRE DE NOEUDS ET ELEMENTS DU MAILLAGE
9716 # B. QUALITE DES ELEMENTS DU MAILLAGE
9717 # C. CONTROLE DE LA NON INTERPENETRATION DES ELEMENTS DU MAILLAGE
9718 # D. CONNEXITE DU MAILLAGE
9719 # E. TAILLE DES DIFFERENTS SOUS-DOMAINES
9721 NOMBRE = SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON"),
9722 fr="Nombre de noeuds et éléments du maillage",
9723 ang="Number of nodes and elements in the mesh" ),
9725 QUALITE = SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
9726 fr="Qualité du maillage",
9727 ang="Mesh quality" ),
9729 INTERPENETRATION=SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
9730 fr="Controle de la non interpénétration des éléments.",
9731 ang="Overlapping checking." ),
9733 CONNEXITE = SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
9734 fr="Connexité du maillage.",
9735 ang="Mesh connexity." ),
9737 TAILLE = SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
9738 fr="Tailles des sous-domaines du maillage.",
9739 ang="Sizes of mesh sub-domains." ),
9741 MENAGE = SIMP(statut='f',typ='TXM',into=("MAILLAGE","SOLUTION","TOUT") ),
9744 #& MODIF COMMANDE DATE 20/12/2001 AUTEUR F1BHHAJ J.ANGLES
9745 # CONFIGURATION MANAGEMENT OF EDF VERSION
9746 # ======================================================================
9747 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9748 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9749 # REDISTRIBUTION OF THIS FILE.
9750 # ======================================================================
9751 # RESPONSABLE F1BHHAJ J.ANGLES
9752 def macr_ascouf_calc_prod(self,MODELE,CHAM_MATER,CARA_ELEM,FOND_FISS,CHARGE,RESU_THER,**args):
9753 self.type_sdprod(MODELE,modele)
9754 if CHAM_MATER != None:self.type_sdprod(CHAM_MATER,cham_mater)
9755 if CARA_ELEM != None:self.type_sdprod(CARA_ELEM,cara_elem)
9756 if FOND_FISS != None:self.type_sdprod(FOND_FISS,fond_fiss)
9757 if CHARGE != None:self.type_sdprod(CHARGE,char_meca)
9758 if RESU_THER != None:self.type_sdprod(RESU_THER,evol_ther)
9761 MACR_ASCOUF_CALC=MACRO(nom="MACR_ASCOUF_CALC",op= -20,sd_prod=macr_ascouf_calc_prod,
9763 docu="U4.CF.20-a",reentrant='n',
9764 regles=(UN_PARMI('COMP_INCR','COMP_ELAS'),),
9766 TYPE_MAILLAGE =SIMP(statut='o',typ='TXM',
9772 CL_BOL_P2_GV =FACT(statut='f',min=1,max=1,
9773 ANGLE =SIMP(statut='o',typ='R' ),
9774 AZIMUT =SIMP(statut='f',typ='R',defaut= 90. ),
9777 MAILLAGE =SIMP(statut='o',typ=maillage ),
9778 MODELE =SIMP(statut='o',typ=(CO,modele)),
9779 CHAM_MATER =SIMP(statut='f',typ=(CO,cham_mater)),
9780 CARA_ELEM =SIMP(statut='f',typ=(CO,cara_elem)),
9781 FOND_FISS =SIMP(statut='f',typ=(CO,fond_fiss)),
9782 CHARGE =SIMP(statut='f',typ=(CO,char_meca)),
9783 RESU_THER =SIMP(statut='f',typ=(CO,evol_ther)),
9785 AFFE_MATERIAU =FACT(statut='o',min=1,max=3,
9786 regles=(UN_PARMI('TOUT','GROUP_MA'),),
9787 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
9788 GROUP_MA =SIMP(statut='f',typ='TXM',into=("COUDE","BOL") ),
9789 MATER =SIMP(statut='o',typ=mater ),
9790 TEMP_REF =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
9793 PRES_REP =FACT(statut='f',min=1,max=1,
9794 PRES =SIMP(statut='o',typ='R' ),
9795 EFFE_FOND_P1 =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
9796 FONC_MULT =SIMP(statut='f',typ=fonction ),
9799 ECHANGE =FACT(statut='f',min=1,max=1,
9800 COEF_H =SIMP(statut='f',typ=fonction ),
9801 TEMP_EXT =SIMP(statut='f',typ=fonction ),
9804 TORS_P1 =FACT(statut='f',min=1,max=6,
9805 regles=(AU_MOINS_UN('FX','FY','FZ','MX','MY','MZ'),),
9806 FX =SIMP(statut='f',typ='R' ),
9807 FY =SIMP(statut='f',typ='R' ),
9808 FZ =SIMP(statut='f',typ='R' ),
9809 MX =SIMP(statut='f',typ='R' ),
9810 MY =SIMP(statut='f',typ='R' ),
9811 MZ =SIMP(statut='f',typ='R' ),
9812 FONC_MULT =SIMP(statut='f',typ=fonction ),
9815 COMP_INCR =FACT(statut='f',min=1,max=1,
9816 RELATION =SIMP(statut='o',typ='TXM',into=("VMIS_ISOT_TRAC",) ),
9817 VMIS_ISOT_TRAC =SIMP(statut='c',typ='I',defaut= 2,into=( 2 ,) ),
9820 COMP_ELAS =FACT(statut='f',min=1,max=1,
9821 RELATION =SIMP(statut='o',typ='TXM',into=("ELAS","ELAS_VMIS_TRAC") ),
9822 ELAS =SIMP(statut='c',typ='I',defaut= 1,into=( 1 ,) ),
9823 ELAS_VMIS_TRAC =SIMP(statut='c',typ='I',defaut= 1,into=( 1 ,) ),
9826 SOLVEUR =FACT(statut='d',min=1,max=1,
9827 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
9828 b_mult_front =BLOC(condition = "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
9829 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
9831 b_ldlt =BLOC(condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
9832 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
9834 b_ldlt_mult =BLOC(condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
9835 fr="Paramètres relatifs à la non inversibilité de la matrice à factorise",
9836 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
9837 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
9839 b_gcpc =BLOC(condition = "METHODE == 'GCPC' ", fr="Paramètres de la méthode du gradient conjugué",
9840 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
9841 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut= 0 ),
9842 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
9843 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
9844 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
9847 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
9848 SYME =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
9851 CONVERGENCE =FACT(statut='d',min=1,max=1,
9852 RESI_GLOB_MAXI =SIMP(statut='f',typ='R'),
9853 RESI_GLOB_RELA =SIMP(statut='f',typ='R'),
9854 ITER_GLOB_MAXI =SIMP(statut='f',typ='I',defaut=10),
9855 ARRET =SIMP(statut='f',typ='TXM',defaut="OUI"),
9856 RESI_INTE_RELA =SIMP(statut='f',typ='R'
9858 ITER_INTE_MAXI =SIMP(statut='f',typ='I',defaut= 10 ),
9859 ITER_INTE_PAS =SIMP(statut='f',typ='I',defaut= 0 ),
9860 TYPE_MATR_COMP =SIMP(statut='f',typ='TXM',defaut="TANG_VIT",into=("TANG_VIT",)),
9861 RESO_INTE =SIMP(statut='f',typ='TXM',defaut="IMPLICITE",into=("RUNGE_KUTTA_2","RUNGE_KUTTA_4","IMPLICITE")),
9864 NEWTON =FACT(statut='d',min=1,max=1,
9865 REAC_INCR =SIMP(statut='f',typ='I',defaut= 1 ),
9866 PREDICTION =SIMP(statut='f',typ='TXM',into=("DEPL_CALCULE","TANGENTE","ELASTIQUE","EXTRAPOL") ),
9867 MATRICE =SIMP(statut='f',typ='TXM',defaut="TANGENTE",into=("TANGENTE","ELASTIQUE") ),
9868 REAC_ITER =SIMP(statut='f',typ='I',defaut=0),
9869 EVOL_NOLI =SIMP(statut='f',typ=evol_noli),
9872 RECH_LINEAIRE =FACT(statut='f',min=1,max=1,
9873 RESI_LINE_RELA =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
9874 ITER_LINE_MAXI =SIMP(statut='f',typ='I',defaut= 3),
9877 INCREMENT =FACT(statut='o',min=1,max=1,
9878 regles=(EXCLUS('NUME_INST_INIT','INST_INIT'),
9879 EXCLUS('NUME_INST_FIN','INST_FIN'),),
9880 LIST_INST =SIMP(statut='o',typ=listr8),
9881 EVOLUTION =SIMP(statut='f',typ='TXM',defaut="CHRONOLOGIQUE",
9882 into=("CHRONOLOGIQUE","RETROGRADE","SANS",) ),
9883 NUME_INST_INIT =SIMP(statut='f',typ='I'),
9884 INST_INIT =SIMP(statut='f',typ='R'),
9885 NUME_INST_FIN =SIMP(statut='f',typ='I'),
9886 INST_FIN =SIMP(statut='f',typ='R'),
9887 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3 ),
9888 SUBD_PAS =SIMP(statut='f',typ='I',defaut=1),
9889 SUBD_PAS_MINI =SIMP(statut='f',typ='R'),
9890 COEF_SUBD_PAS_1 =SIMP(statut='f',typ='R',defaut= 1.0E+0),
9893 THETA_3D =FACT(statut='f',min=1,max='**',
9894 R_INF =SIMP(statut='o',typ='R' ),
9895 R_SUP =SIMP(statut='o',typ='R' ),
9898 IMPR_TABLE =FACT(statut='f',min=1,max=1,
9899 regles=(UN_PARMI('TOUT_PARA','NOM_PARA', ),
9900 PRESENT_PRESENT('TOUT_PARA','ANGLE', ),
9901 UN_PARMI('POSI_CURV_LONGI','POSI_ANGUL',),),
9902 NOM_PARA =SIMP(statut='f',typ='TXM',max=4,
9903 into=("TRESCA_MEMBRANE",
9908 TOUT_PARA =SIMP(statut='f',typ='TXM',into=("OUI",) ),
9909 ANGLE =SIMP(statut='f',typ='R',max='**' ),
9910 R_CINTR =SIMP(statut='f',typ='R',max='**' ),
9911 POSI_CURV_LONGI =SIMP(statut='f',typ='R',max='**' ),
9912 POSI_ANGUL =SIMP(statut='f',typ='R',max='**' ),
9915 IMPRESSION =FACT(statut='f',min=1,max=1,
9916 FORMAT =SIMP(statut='f',typ='TXM',defaut="RESULTAT",
9917 into=("RESULTAT","ASTER","IDEAS","CASTEM") ),
9919 b_format_ideas =BLOC(condition="FORMAT=='IDEAS'",fr="version Ideas",
9920 VERSION =SIMP(statut='f',typ='I',defaut=5,into=(4,5)),
9923 b_format_castem =BLOC(condition="FORMAT=='CASTEM'",fr="version Castem",
9924 NIVE_GIBI =SIMP(statut='f',typ='I',defaut=10,into=(3,10)),
9929 TITRE =SIMP(statut='f',typ='TXM' ),
9931 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
9933 #& MODIF COMMANDE DATE 20/12/2001 AUTEUR F1BHHAJ J.ANGLES
9934 # CONFIGURATION MANAGEMENT OF EDF VERSION
9935 # ======================================================================
9936 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
9937 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
9938 # REDISTRIBUTION OF THIS FILE.
9939 # ======================================================================
9940 # RESPONSABLE F1BHHAJ J.ANGLES
9941 MACR_ASCOUF_MAIL=MACRO(nom="MACR_ASCOUF_MAIL",op= -19,sd_prod=maillage,
9942 fr=" ",docu="U4.CF.10-a",reentrant='n',
9944 regles=(EXCLUS('SOUS_EPAIS_COUDE','FISS_COUDE','SOUS_EPAIS_MULTI'),),
9946 EXEC_MAILLAGE =FACT(statut='o',min=1,max=1,
9947 LOGICIEL =SIMP(statut='o',typ='TXM',defaut="GIBI2000",into=("GIBI98","GIBI2000") ),
9948 UNITE_DATG =SIMP(statut='f',typ='I',defaut=70),
9949 UNITE_MGIB =SIMP(statut='f',typ='I',defaut=19),
9950 NIVE_GIBI =SIMP(statut='f',typ='I',defaut=10,into=(3,4,5,6,7,8,9,10,11)),
9953 TYPE_ELEM =SIMP(statut='f',typ='TXM',defaut="CU20",into=("CU20","CUB8") ),
9955 COUDE =FACT(statut='o',min=1,max=1,
9956 ANGLE =SIMP(statut='o',typ='R' ),
9957 R_CINTR =SIMP(statut='o',typ='R' ),
9958 L_TUBE_P1 =SIMP(statut='o',typ='R' ),
9959 L_TUBE_P2 =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
9960 NB_ELEM_EPAIS =SIMP(statut='f',typ='I',defaut= 3 ),
9961 SYME =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
9962 TRANSFORMEE =SIMP(statut='o',typ='TXM',defaut="COUDE",into=("COUDE","TUBE") ),
9963 b_transf_coude =BLOC(condition = "TRANSFORMEE == 'COUDE' ",
9964 DEXT =SIMP(statut='o',typ='R' ),
9965 EPAIS =SIMP(statut='o',typ='R' ),
9966 SUR_EPAIS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
9967 BOL_P2 =SIMP(statut='f',typ='TXM',into=("ASP_MPP","CUVE","GV") ),
9969 b_transf_tube =BLOC(condition = "TRANSFORMEE == 'TUBE' ",
9970 TRAN_EPAIS =SIMP(statut='o',typ='TXM',defaut="NON",into=("OUI","NON") ),
9971 b_trans_epais_oui =BLOC(condition = "TRAN_EPAIS == 'OUI' ",
9972 regles=(ENSEMBLE('ANGL_TETA2','EPAIS_TI'),
9973 UN_PARMI('ABSC_CURV_TRAN','POSI_ANGU_TRAN'),),
9974 DEXT_T1 =SIMP(statut='o',typ='R' ),
9975 EPAIS_T1 =SIMP(statut='o',typ='R' ),
9976 EPAIS_T2 =SIMP(statut='o',typ='R' ),
9977 EPAIS_TI =SIMP(statut='f',typ='R' ),
9978 ANGL_TETA1 =SIMP(statut='o',typ='R' ),
9979 ANGL_TETA2 =SIMP(statut='f',typ='R' ),
9980 ABSC_CURV_TRAN =SIMP(statut='f',typ='R' ),
9981 POSI_ANGU_TRAN =SIMP(statut='f',typ='R' ),
9983 b_trans_epais_non =BLOC(condition = "TRAN_EPAIS == 'NON' ",
9984 DEXT =SIMP(statut='o',typ='R' ),
9985 EPAIS =SIMP(statut='o',typ='R' ),
9986 SUR_EPAIS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
9987 BOL_P2 =SIMP(statut='f',typ='TXM',into=("ASP_MPP","CUVE","GV") ),
9992 SOUS_EPAIS_COUDE=FACT(statut='f',min=1,max=1,
9993 regles=(UN_PARMI('POSI_CURV_LONGI','POSI_ANGUL'),
9994 UN_PARMI('POSI_CURV_CIRC','AZIMUT'),),
9995 TYPE =SIMP(statut='o',typ='TXM',into=("AXIS","ELLI") ),
9996 AXE_CIRC =SIMP(statut='f',typ='R' ),
9997 AXE_LONGI =SIMP(statut='o',typ='R' ),
9998 PROFONDEUR =SIMP(statut='o',typ='R' ),
9999 POSI_CURV_LONGI =SIMP(statut='f',typ='R' ),
10000 POSI_ANGUL =SIMP(statut='f',typ='R' ),
10001 POSI_CURV_CIRC =SIMP(statut='f',typ='R' ),
10002 AZIMUT =SIMP(statut='f',typ='R' ),
10003 SOUS_EPAIS =SIMP(statut='o',typ='TXM',into=("INTERNE","EXTERNE") ),
10004 NB_ELEM_LONGI =SIMP(statut='o',typ='I' ),
10005 NB_ELEM_CIRC =SIMP(statut='o',typ='I' ),
10006 NB_ELEM_RADI =SIMP(statut='f',typ='I',defaut= 3 ),
10007 EMPREINTE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
10010 SOUS_EPAIS_MULTI=FACT(statut='f',min=1,max='**',
10011 regles=(UN_PARMI('POSI_CURV_LONGI','POSI_ANGUL'),
10012 UN_PARMI('POSI_CURV_CIRC','AZIMUT'),),
10013 TYPE =SIMP(statut='o',typ='TXM',into=("AXIS","ELLI") ),
10014 AXE_CIRC =SIMP(statut='f',typ='R' ),
10015 AXE_LONGI =SIMP(statut='o',typ='R' ),
10016 PROFONDEUR =SIMP(statut='o',typ='R' ),
10017 POSI_CURV_LONGI =SIMP(statut='f',typ='R' ),
10018 POSI_ANGUL =SIMP(statut='f',typ='R' ),
10019 POSI_CURV_CIRC =SIMP(statut='f',typ='R' ),
10020 AZIMUT =SIMP(statut='f',typ='R' ),
10021 SOUS_EPAIS =SIMP(statut='o',typ='TXM',into=("INTERNE","EXTERNE") ),
10022 NB_ELEM_LONGI =SIMP(statut='o',typ='I' ),
10023 NB_ELEM_CIRC =SIMP(statut='o',typ='I' ),
10024 EMPREINTE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
10027 FISS_COUDE =FACT(statut='f',min=1,max=1,
10028 regles=(UN_PARMI('ABSC_CURV','POSI_ANGUL'),),
10029 AXIS =SIMP(statut='f',typ='TXM',into=("OUI","NON"),defaut="NON" ),
10030 PROFONDEUR =SIMP(statut='o',typ='R' ),
10031 LONGUEUR =SIMP(statut='o',typ='R' ),
10032 ABSC_CURV =SIMP(statut='f',typ='R' ),
10033 POSI_ANGUL =SIMP(statut='f',typ='R' ),
10034 FISSURE =SIMP(statut='o',typ='TXM',into=("DEB_INT","DEB_EXT") ),
10035 AZIMUT =SIMP(statut='f',typ='R',defaut= 90. ),
10036 ORIEN =SIMP(statut='o',typ='R',
10037 into=(45.,-45.,90.,0.E+0) ),
10038 NB_TRANCHE =SIMP(statut='o',typ='I' ),
10039 NB_SECTEUR =SIMP(statut='o',typ='I' ),
10040 NB_COURONNE =SIMP(statut='o',typ='I' ),
10041 RAYON_TORE =SIMP(statut='f',typ='R' ),
10042 COEF_MULT_RC2 =SIMP(statut='f',typ='R',defaut= 1. ),
10043 COEF_MULT_RC3 =SIMP(statut='f',typ='R' ),
10044 ANGL_OUVERTURE =SIMP(statut='f',typ='R',defaut= 0.5 ),
10047 IMPRESSION =FACT(statut='f',min=1,max='**',
10048 regles=(PRESENT_PRESENT('FICHIER','UNITE'),),
10049 FORMAT =SIMP(statut='f',typ='TXM',defaut="ASTER",
10050 into=("ASTER","IDEAS","CASTEM") ),
10051 b_format_ideas =BLOC(condition="FORMAT=='IDEAS'",fr="version Ideas",
10052 VERSION =SIMP(statut='f',typ='I',defaut=5,into=(4,5)),
10054 b_format_castem =BLOC(condition="FORMAT=='CASTEM'",fr="version Castem",
10055 NIVE_GIBI =SIMP(statut='f',typ='I',defaut=10,into=(3,10)),
10057 FICHIER =SIMP(statut='f',typ='TXM' ),
10058 UNITE =SIMP(statut='f',typ='I' ),
10061 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
10063 #& MODIF COMMANDE DATE 20/12/2001 AUTEUR F1BHHAJ J.ANGLES
10064 # CONFIGURATION MANAGEMENT OF EDF VERSION
10065 # ======================================================================
10066 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10067 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10068 # REDISTRIBUTION OF THIS FILE.
10069 # ======================================================================
10070 # RESPONSABLE F1BHHAJ J.ANGLES
10071 def macr_aspic_calc_prod(self,MODELE,CHAM_MATER,CARA_ELEM,FOND_FISS_1,FOND_FISS_2,CHARGE,RESU_THER,**args):
10072 if MODELE != None:self.type_sdprod(MODELE,modele)
10073 if CHAM_MATER != None:self.type_sdprod(CHAM_MATER,cham_mater)
10074 if CARA_ELEM != None:self.type_sdprod(CARA_ELEM,cara_elem)
10075 if FOND_FISS_1 != None:self.type_sdprod(FOND_FISS_1,fond_fiss)
10076 if FOND_FISS_2 != None:self.type_sdprod(FOND_FISS_2,fond_fiss)
10077 if CHARGE != None:self.type_sdprod(CHARGE,char_meca)
10078 if RESU_THER != None:self.type_sdprod(RESU_THER,evol_ther)
10081 MACR_ASPIC_CALC=MACRO(nom="MACR_ASPIC_CALC",op=-17,sd_prod=macr_aspic_calc_prod,
10082 fr=" ",docu="U4.PC.20-a1",reentrant='n',
10083 regles=(UN_PARMI('COMP_INCR','COMP_ELAS'),),
10085 TYPE_MAILLAGE =SIMP(statut='o',typ='TXM',
10086 into=("SAIN_FIN","SAIN_GROS","FISS_COUR_DEB","FISS_COUR_NONDEB","FISS_LONG_DEB",
10087 "FISS_LONG_NONDEB","FISS_AXIS_DEB","FISS_AXIS_NONDEB") ),
10089 TUBULURE =FACT(statut='o',min=1,max=1,
10090 TYPE =SIMP(statut='o',typ='TXM',into=("TYPE_1","TYPE_2") ),
10092 MAILLAGE =SIMP(statut='o',typ=maillage),
10093 MODELE =SIMP(statut='f',typ=(CO,modele)),
10094 CHAM_MATER =SIMP(statut='f',typ=(CO,cham_mater)),
10095 CARA_ELEM =SIMP(statut='f',typ=(CO,cara_elem)),
10096 FOND_FISS_1 =SIMP(statut='f',typ=(CO,fond_fiss)),
10097 FOND_FISS_2 =SIMP(statut='f',typ=(CO,fond_fiss)),
10098 CHARGE =SIMP(statut='f',typ=(CO,char_meca)),
10099 RESU_THER =SIMP(statut='f',typ=(CO,evol_ther)),
10101 AFFE_MATERIAU =FACT(statut='o',min=1,max=3,
10102 regles=(UN_PARMI('TOUT','GROUP_MA'),),
10103 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",)),
10104 GROUP_MA =SIMP(statut='f',typ='TXM',into=("TUBU","CORP","SOUD","SOUDCORP","SOUDTUBU") ),
10105 MATER =SIMP(statut='o',typ=mater),
10106 TEMP_REF =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
10107 RCCM =SIMP(statut='o',typ='TXM',into=("OUI","NON")),
10110 EQUILIBRE =FACT(statut='o',min=1,max=1,
10111 NOEUD =SIMP(statut='o',typ=no),
10114 PRES_REP =FACT(statut='o',min=1,max=1,
10115 PRES =SIMP(statut='o',typ='R'),
10116 NOEUD =SIMP(statut='f',typ=no),
10117 EFFE_FOND =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON")),
10118 FONC_MULT =SIMP(statut='f',typ=fonction),
10121 ECHANGE =FACT(statut='f',min=1,max=1,
10122 COEF_H_TUBU =SIMP(statut='o',typ=fonction),
10123 COEF_H_CORP =SIMP(statut='o',typ=fonction),
10124 TEMP_EXT =SIMP(statut='o',typ=fonction),
10127 TORS_CORP =FACT(statut='f',min=1,max=6,
10128 regles=(AU_MOINS_UN('FX','FY','FZ','MX','MY','MZ'),),
10129 NOEUD =SIMP(statut='o',typ=no),
10130 FX =SIMP(statut='f',typ='R'),
10131 FY =SIMP(statut='f',typ='R'),
10132 FZ =SIMP(statut='f',typ='R'),
10133 MX =SIMP(statut='f',typ='R'),
10134 MY =SIMP(statut='f',typ='R'),
10135 MZ =SIMP(statut='f',typ='R'),
10136 FONC_MULT =SIMP(statut='f',typ=fonction),
10139 TORS_TUBU =FACT(statut='f',min=1,max=6,
10140 regles=(AU_MOINS_UN('FX','FY','FZ','MX','MY','MZ'),),
10141 FX =SIMP(statut='f',typ='R'),
10142 FY =SIMP(statut='f',typ='R'),
10143 FZ =SIMP(statut='f',typ='R'),
10144 MX =SIMP(statut='f',typ='R'),
10145 MY =SIMP(statut='f',typ='R'),
10146 MZ =SIMP(statut='f',typ='R'),
10147 FONC_MULT =SIMP(statut='f',typ=fonction),
10150 COMP_INCR =FACT(statut='f',min=1,max=1,
10151 RELATION =SIMP(statut='o',typ='TXM',into=("VMIS_ISOT_TRAC",) ),
10152 VMIS_ISOT_TRAC =SIMP(statut='c',typ='I',defaut= 2,into=( 2 ,) ),
10155 COMP_ELAS =FACT(statut='f',min=1,max=1,
10156 RELATION =SIMP(statut='o',typ='TXM',into=("ELAS","ELAS_VMIS_TRAC") ),
10157 ELAS =SIMP(statut='c',typ='I',defaut= 1,into=( 1 ,) ),
10158 ELAS_VMIS_TRAC =SIMP(statut='c',typ='I',defaut= 1,into=( 1 ,) ),
10161 THETA_3D =FACT(statut='f',min=1,max='**',
10162 R_INF =SIMP(statut='o',typ='R'),
10163 R_SUP =SIMP(statut='o',typ='R'),
10166 OPTION =SIMP(statut='f',typ='TXM',into=("CALC_G_MAX","CALC_G_MAX_LOCAL") ),
10167 BORNES =FACT(statut='f',min=1,max='**',
10168 NUME_ORDRE =SIMP(statut='o',typ='I'),
10169 VALE_MIN =SIMP(statut='o',typ='R'),
10170 VALE_MAX =SIMP(statut='o',typ='R'),
10173 SOLVEUR =FACT(statut='d',min=1,max=1,
10174 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
10175 b_mult_front =BLOC(condition = "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
10176 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
10178 b_ldlt =BLOC(condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
10179 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
10181 b_ldlt_mult =BLOC(condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
10182 fr="Paramètres relatifs à la non iversibilité de la matrice à factorise",
10183 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
10184 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
10186 b_gcpc =BLOC(condition = "METHODE == 'GCPC' ", fr="Paramètres de la méthode du gradient conjugué",
10187 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
10188 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut= 0 ),
10189 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
10190 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
10191 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
10194 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
10195 SYME =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
10198 CONVERGENCE =FACT(statut='d',min=1,max=1,
10199 RESI_GLOB_MAXI =SIMP(statut='f',typ='R'),
10200 RESI_GLOB_RELA =SIMP(statut='f',typ='R'),
10201 ITER_GLOB_MAXI =SIMP(statut='f',typ='I',defaut=10),
10202 ARRET =SIMP(statut='f',typ='TXM',defaut="OUI"),
10203 RESI_INTE_RELA =SIMP(statut='f',typ='R',defaut=1.0E-6),
10204 ITER_INTE_MAXI =SIMP(statut='f',typ='I',defaut=10),
10205 ITER_INTE_PAS =SIMP(statut='f',typ='I',defaut=0),
10206 TYPE_MATR_COMP =SIMP(statut='f',typ='TXM',defaut="TANG_VIT",into=("TANG_VIT",)),
10207 RESO_INTE =SIMP(statut='f',typ='TXM',defaut="IMPLICITE",into=("RUNGE_KUTTA_2","RUNGE_KUTTA_4","IMPLICITE")),
10210 NEWTON =FACT(statut='d',min=1,max=1,
10211 REAC_INCR =SIMP(statut='f',typ='I',defaut=1),
10212 PREDICTION =SIMP(statut='f',typ='TXM',into=("TANGENTE","ELASTIQUE","EXTRAPOL","DEPL_CALCULE")),
10213 MATRICE =SIMP(statut='f',typ='TXM',defaut="TANGENTE",into=("TANGENTE","ELASTIQUE")),
10214 REAC_ITER =SIMP(statut='f',typ='I',defaut= 0),
10217 RECH_LINEAIRE =FACT(statut='d',min=1,max=1,
10218 RESI_LINE_RELA =SIMP(statut='f',typ='R',defaut=1.0E-3),
10219 ITER_LINE_MAXI =SIMP(statut='f',typ='I',defaut=3),
10222 INCREMENT =FACT(statut='o',min=1,max=1,
10223 regles=(EXCLUS('NUME_INST_INIT','INST_INIT'),
10224 EXCLUS('NUME_INST_FIN','INST_FIN'),),
10225 LIST_INST =SIMP(statut='o',typ=listr8),
10226 EVOLUTION =SIMP(statut='f',typ='TXM',defaut="CHRONOLOGIQUE",
10227 into=("CHRONOLOGIQUE","RETROGRADE","SANS",) ),
10228 NUME_INST_INIT =SIMP(statut='f',typ='I'),
10229 INST_INIT =SIMP(statut='f',typ='R'),
10230 NUME_INST_FIN =SIMP(statut='f',typ='I'),
10231 INST_FIN =SIMP(statut='f',typ='R'),
10232 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3 ),
10233 SUBD_PAS =SIMP(statut='f',typ='I',defaut=1),
10234 SUBD_PAS_MINI =SIMP(statut='f',typ='R'),
10235 COEF_SUBD_PAS_1 =SIMP(statut='f',typ='R',defaut= 1.0E+0),
10238 PAS_AZIMUT =SIMP(statut='f',typ='I',defaut=1),
10240 IMPRESSION =FACT(statut='f',min=1,max=1,
10241 FORMAT =SIMP(statut='f',typ='TXM',defaut="RESULTAT",
10242 into=("RESULTAT","ASTER","CASTEM","IDEAS")),
10244 b_format_ideas =BLOC(condition="FORMAT=='IDEAS'",fr="version Ideas",
10245 VERSION =SIMP(statut='f',typ='I',defaut=5,into=(4,5)),
10248 b_format_castem =BLOC(condition="FORMAT=='CASTEM'",fr="version Castem",
10249 NIVE_GIBI =SIMP(statut='f',typ='I',defaut=10,into=(3,10)),
10252 b_extrac =BLOC(condition="((FORMAT=='IDEAS')or(FORMAT=='CASTEM'))",
10253 fr="extraction d un champ de grandeur",
10254 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST'),),
10255 NOM_CHAM =SIMP(statut='f',typ='TXM',max=3,
10256 into=("DEPL","EQUI_ELNO_SIGM","TEMP")),
10258 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
10259 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
10260 INST =SIMP(statut='f',typ='R',max='**'),
10264 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
10266 TITRE =SIMP(statut='f',typ='TXM'),
10269 #& MODIF COMMANDE DATE 20/12/2001 AUTEUR F1BHHAJ J.ANGLES
10270 # CONFIGURATION MANAGEMENT OF EDF VERSION
10271 # ======================================================================
10272 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10273 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10274 # REDISTRIBUTION OF THIS FILE.
10275 # ======================================================================
10276 # RESPONSABLE F1BHHAJ J.ANGLES
10277 MACR_ASPIC_MAIL=MACRO(nom="MACR_ASPIC_MAIL",op= -16,sd_prod=maillage,reentrant='n',
10278 fr=" ",docu="U4.PC.10-a",
10280 EXEC_MAILLAGE =FACT(statut='o',min=1,max=1,
10281 LOGICIEL =SIMP(statut='o',typ='TXM',defaut="GIBI2000",into=("GIBI98","GIBI2000")),
10282 UNITE_DATG =SIMP(statut='f',typ='I',defaut=70),
10283 UNITE_MGIB =SIMP(statut='f',typ='I',defaut=19),
10284 NIVE_GIBI =SIMP(statut='f',typ='I',defaut=10,into=(3,4,5,6,7,8,9,10,11)),
10287 TYPE_ELEM =SIMP(statut='f',typ='TXM',defaut="CU20",into=("CU20","CUB8")),
10289 RAFF_MAIL =SIMP(statut='f',typ='TXM',defaut="GROS",into=("GROS","FIN")),
10291 TUBULURE =FACT(statut='o',min=1,max=1,
10292 E_BASE =SIMP(statut='o',typ='R'),
10293 DEXT_BASE =SIMP(statut='o',typ='R'),
10294 L_BASE =SIMP(statut='o',typ='R'),
10295 L_CHANF =SIMP(statut='o',typ='R'),
10296 E_TUBU =SIMP(statut='o',typ='R'),
10297 DEXT_TUBU =SIMP(statut='o',typ='R'),
10298 Z_MAX =SIMP(statut='o',typ='R'),
10299 TYPE =SIMP(statut='o',typ='TXM',into=("TYPE_1","TYPE_2")),
10300 L_PENETR =SIMP(statut='f',typ='R',defaut= 0.0E+0),
10303 SOUDURE =FACT(statut='o',min=1,max=1,
10304 H_SOUD =SIMP(statut='o',typ='R'),
10305 ANGL_SOUD =SIMP(statut='o',typ='R'),
10306 JEU_SOUD =SIMP(statut='o',typ='R'),
10309 CORPS =FACT(statut='o',min=1,max=1,
10310 E_CORP =SIMP(statut='o',typ='R'),
10311 DEXT_CORP =SIMP(statut='o',typ='R'),
10312 X_MAX =SIMP(statut='o',typ='R'),
10315 FISS_SOUDURE =FACT(statut='f',min=1,max=1,
10316 TYPE =SIMP(statut='o',typ='TXM',into=("LONGUE","COURTE")),
10317 AXIS =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
10318 PROFONDEUR =SIMP(statut='o',typ='R'),
10319 LONGUEUR =SIMP(statut='f',typ='R'),
10320 AZIMUT =SIMP(statut='o',typ='R'),
10321 RAYON_TORE =SIMP(statut='f',typ='R'),
10322 POSITION =SIMP(statut='o',typ='TXM',into=("DROIT","INCLINE")),
10323 FISSURE =SIMP(statut='o',typ='TXM',into=("DEB_INT","DEB_EXT","NON_DEB","TRAVERS")),
10324 LIGA_INT =SIMP(statut='f',typ='R'),
10325 ANGL_OUVERTURE =SIMP(statut='f',typ='R',defaut= 0.0E+0),
10326 COEF_MULT_RC1 =SIMP(statut='f',typ='R'),
10327 COEF_MULT_RC2 =SIMP(statut='f',typ='R'),
10328 COEF_MULT_RC3 =SIMP(statut='f',typ='R'),
10329 NB_TRANCHE =SIMP(statut='f',typ='I'),
10330 NB_SECTEUR =SIMP(statut='f',typ='I'),
10331 NB_COURONNE =SIMP(statut='f',typ='I'),
10334 IMPRESSION =FACT(statut='f',min=1,max='**',
10335 regles=(PRESENT_PRESENT('FICHIER','UNITE'),),
10336 FORMAT =SIMP(statut='f',typ='TXM',defaut="ASTER",into=("ASTER","IDEAS","CASTEM")),
10338 b_format_ideas =BLOC(condition="FORMAT=='IDEAS'",fr="version Ideas",
10339 VERSION =SIMP(statut='f',typ='I',defaut=5,into=(4,5)),
10342 b_format_castem =BLOC(condition="FORMAT=='CASTEM'",fr="version Castem",
10343 NIVE_GIBI =SIMP(statut='f',typ='I',defaut=10,into=(3,10)),
10345 FICHIER =SIMP(statut='f',typ='TXM'),
10346 UNITE =SIMP(statut='f',typ='I'),
10349 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
10351 #& MODIF COMMANDE DATE 19/12/2001 AUTEUR CIBHHPD D.NUNEZ
10352 # CONFIGURATION MANAGEMENT OF EDF VERSION
10353 # ======================================================================
10354 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10355 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10356 # REDISTRIBUTION OF THIS FILE.
10357 # ======================================================================
10358 MACR_ELEM_DYNA=OPER(nom="MACR_ELEM_DYNA",op= 81,sd_prod=macr_elem_dyna,
10359 fr="Définition d un macro élément pour analyse modale ou harmonique par sous structuration dynamique",
10360 docu="U4.65.01-d",reentrant='n',
10361 regles=(EXCLUS('MATR_AMOR','AMOR_REDUIT' ),),
10362 BASE_MODALE =SIMP(statut='o',typ=base_modale ),
10363 MATR_RIGI =SIMP(statut='f',typ=matr_asse_depl_r ),
10364 MATR_MASS =SIMP(statut='f',typ=matr_asse_depl_r ),
10365 MATR_AMOR =SIMP(statut='f',typ=matr_asse_depl_r ),
10366 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**'),
10367 OPTION =SIMP(statut='f',typ='TXM',defaut="CLASSIQUE",into=("CLASSIQUE","RITZ",
10370 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
10371 # CONFIGURATION MANAGEMENT OF EDF VERSION
10372 # ======================================================================
10373 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10374 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10375 # REDISTRIBUTION OF THIS FILE.
10376 # ======================================================================
10377 MACR_ELEM_STAT=OPER(nom="MACR_ELEM_STAT",op=86,sd_prod=macr_elem_stat,docu="U4.62.01-e",reentrant='f',
10378 fr="Définition d un macro-élément pour l analyse statique par sous structuration",
10379 regles=(AU_MOINS_UN('DEFINITION','RIGI_MECA','MASS_MECA','CAS_CHARGE'),
10380 ENSEMBLE('DEFINITION','EXTERIEUR'),),
10381 DEFINITION =FACT(statut='f',min=1,max=1,
10382 MODELE =SIMP(statut='o',typ=modele),
10383 CHAM_MATER =SIMP(statut='f',typ=cham_mater),
10384 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
10385 CHAR_MACR_ELEM =SIMP(statut='f',typ=char_meca),
10386 INST =SIMP(statut='f',typ='R',defaut=0.0E+0 ),
10387 NMAX_CAS =SIMP(statut='f',typ='I',defaut=10),
10388 NMAX_CHAR =SIMP(statut='f',typ='I',defaut=10),
10390 EXTERIEUR =FACT(statut='f',min=1,max=1,
10391 regles=(AU_MOINS_UN('NOEUD','GROUP_NO'),),
10392 NOEUD =SIMP(statut='f',typ=no,max='**'),
10393 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
10395 RIGI_MECA =FACT(statut='f',min=1,max=1,
10397 MASS_MECA =FACT(statut='f',min=1,max=1,
10398 BIDO1 =SIMP(statut='f',typ='I',defaut=0),
10400 CAS_CHARGE =FACT(statut='f',min=1,max='**',
10401 NOM_CAS =SIMP(statut='o',typ='TXM'),
10402 SUIV =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON")),
10403 CHARGE =SIMP(statut='f',typ=char_meca,max='**'),
10404 INST =SIMP(statut='f',typ='R',defaut=0.E+0),
10407 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
10408 # CONFIGURATION MANAGEMENT OF EDF VERSION
10409 # ======================================================================
10410 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10411 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10412 # REDISTRIBUTION OF THIS FILE.
10413 # ======================================================================
10414 MACR_GOUJ2E_CALC=MACRO(nom="MACR_GOUJ2E_CALC",op=-23,sd_prod=evol_noli,
10415 fr=" ",docu="U4.GJ.20-a",reentrant='n',
10416 MAILLAGE =SIMP(statut='o',typ=maillage),
10417 DEFI_GOUJ =FACT(statut='o',min=01,max=01,
10418 TYPE =SIMP(statut='o',typ='TXM',into=("M33","M64","M90","M115","M155","M180","M186")),
10419 VARIANTE =SIMP(statut='o',typ='TXM',into=("A","B","C","D","E","F","G","H","I","J","K","L","M",
10420 "N","O","P","Q","R","S","T","U","V","W","X","Y","Z")),
10421 FILET_TRONQUE =SIMP(statut='f',typ='I',max='**'),
10422 FILET_TRONQA =SIMP(statut='f',typ='I',max='**'),
10423 FILET_TRONQB =SIMP(statut='f',typ='I',max='**'),
10424 FILET_JEU_HT =SIMP(statut='f',typ='I',max='**'),
10425 FILET_JEU_HTA =SIMP(statut='f',typ='I',max='**'),
10426 FILET_JEU_HTB =SIMP(statut='f',typ='I',max='**'),
10428 EXCIT =FACT(statut='o',min=01,max=01,
10429 TYPE_BLOCAGE =SIMP(statut='o',typ='I',defaut=2,into=(1,2,3)),
10430 FORCE_GOUJ =SIMP(statut='o',typ='R'),
10432 CALCUL =FACT(statut='o',min=01,max=01,
10433 TYPE_CALCUL =SIMP(statut='o',typ='TXM',into=("ELASTIQUE","ELASTOPLASTIQUE")),
10434 NB_INCR =SIMP(statut='o',typ='I'),
10436 IMPRESSION =FACT(statut='f',min=01,max=01,
10437 FORMAT =SIMP(statut='f',typ='TXM',defaut="TABLE",
10438 into=("RESULTAT","IDEAS","ASTER","CASTEM","ENSIGHT","MED","TABLE")),
10439 VERSION =SIMP(statut='f',typ='I',defaut=5,into=(4,5)),
10441 TITRE =SIMP(statut='f',typ='TXM'),
10442 INFO =SIMP(statut='f',typ='I',defaut=1 ,into=(1,2)),
10444 #& MODIF COMMANDE DATE 03/10/2001 AUTEUR DURAND C.DURAND
10445 # CONFIGURATION MANAGEMENT OF EDF VERSION
10446 # ======================================================================
10447 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10448 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10449 # REDISTRIBUTION OF THIS FILE.
10450 # ======================================================================
10451 MACR_GOUJ2E_MAIL=MACRO(nom="MACR_GOUJ2E_MAIL",op= -22,sd_prod=maillage,
10452 fr=" ",docu="U4.GJ.10-a",reentrant='n',
10453 EXEC_MAILLAGE =FACT(statut='o',min=1,max=1,
10454 LOGICIEL =SIMP(statut='o',typ='TXM',defaut="GIBI2000",into=("GIBI98","GIBI2000") ),
10455 UNITE_DATG =SIMP(statut='f',typ='I',defaut=70),
10456 UNITE_MGIB =SIMP(statut='f',typ='I',defaut=19),
10457 NIVE_GIBI =SIMP(statut='f',typ='I',defaut=10,into=(3,4,5,6,7,8,9,10)),
10459 DEFI_GOUJ =FACT(statut='o',min=1,max=1,
10460 TYPE =SIMP(statut='o',typ='TXM',into=("M33","M64","M90","M115","M155","M180","M186")),
10461 VARIANTE =SIMP(statut='o',typ='TXM',into=("A","B","C","D","E","F","G","H","I","J","K","L","M",
10462 "N","O","P","Q","R","S","T","U","V","W","X","Y","Z")),
10464 GEOM_GOUJ_BRID =FACT(statut='o',min=1,max=1,
10465 NB_FILET =SIMP(statut='o',typ='I'),
10466 H_CORP_BRID =SIMP(statut='o',typ='R'),
10467 R_EXT_BRID =SIMP(statut='o',typ='R'),
10468 H_HAUT_BRID =SIMP(statut='f',typ='R',defaut=0.0E+0),
10469 H_BAS_BRID =SIMP(statut='f',typ='R',defaut= 0.0E+0),
10470 FILET_ABST =SIMP(statut='f',typ='I',max='**'),
10472 IMPRESSION =FACT(statut='f',min=1,max=1,
10473 regles=(PRESENT_PRESENT('FICHIER','UNITE'),),
10474 FORMAT =SIMP(statut='f',typ='TXM',defaut="RESULTAT",
10475 into=("RESULTAT","IDEAS","ASTER","CASTEM","ENSIGHT","MED")),
10476 FICHIER =SIMP(statut='f',typ='TXM'),
10477 UNITE =SIMP(statut='f',typ='I'),
10478 VERSION =SIMP(statut='f',typ='I',defaut=5,into=(4,5)),
10479 NIVE_GIBI =SIMP(statut='f',typ='I',defaut=10,into=(3,10)),
10481 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
10483 #& MODIF COMMANDE DATE 25/01/2002 AUTEUR GNICOLAS G.NICOLAS
10484 # CONFIGURATION MANAGEMENT OF EDF VERSION
10485 # ======================================================================
10486 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10487 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10488 # REDISTRIBUTION OF THIS FILE.
10489 # ======================================================================
10490 # RESPONSABLE GNICOLAS G.NICOLAS
10491 MACR_INFO_MAIL=MACRO(nom="MACR_INFO_MAIL",op=-24,docu="U7.03.02-a",
10492 fr="Donner des informations sur un maillage.",
10493 ang="To give information about a mesh.",
10495 # 1. Le niveau d'information
10497 INFO = SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
10499 # 2. Version de HOMARD
10501 VERSION_HOMARD = SIMP(statut='f',typ='TXM',defaut="V5_1",
10502 into=("V5_1", "V5_N","V5_N_PERSO"),
10503 fr="Version de HOMARD",
10504 ang="HOMARD release"),
10506 # 3. Langue des messages issus de HOMARD
10508 LANGUE = SIMP(statut='f',typ='TXM',defaut="FRANCAIS",
10509 into=("FRANCAIS","FRENCH","ANGLAIS","ENGLISH",),
10510 fr="Langue des messages issus de HOMARD.",
10511 ang="Language for HOMARD messages." ),
10513 # 4. Le nom du maillage a analyser
10515 MAILLAGE = SIMP(statut='o',typ=maillage,
10516 fr="Maillage à analyser.",
10517 ang="Mesh to be checked." ),
10519 # 5. Les options ; par defaut, on ne fait que les nombres
10520 # 5.1. Nombre de noeuds et elements
10522 NOMBRE = SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON"),
10523 fr="Nombre de noeuds et éléments du maillage",
10524 ang="Number of nodes and elements in the mesh" ),
10526 # 5.2. Determination de la qualite des elements du maillage
10528 QUALITE = SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
10529 fr="Qualité du maillage",
10530 ang="Mesh quality" ),
10532 # 5.3. Connexite du maillage
10534 CONNEXITE = SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
10535 fr="Connexité du maillage.",
10536 ang="Mesh connexity." ),
10538 # 5.4. Taille des sous-domaines du maillage
10540 TAILLE = SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
10541 fr="Tailles des sous-domaines du maillage.",
10542 ang="Sizes of mesh sub-domains." ),
10544 # 5.5. Controle de la non-interpenetration des elements
10546 INTERPENETRATION=SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),
10547 fr="Controle de la non interpénétration des éléments.",
10548 ang="Overlapping checking." ),
10551 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
10552 # CONFIGURATION MANAGEMENT OF EDF VERSION
10553 # ======================================================================
10554 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10555 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10556 # REDISTRIBUTION OF THIS FILE.
10557 # ======================================================================
10558 # RESPONSABLE JMBHH01 J.M.PROIX
10559 MACRO_CARA_POUTRE=MACRO(nom="MACRO_CARA_POUTRE",op=-11,sd_prod=tabl_cara_geom,
10560 docu="U4.42.02-c",reentrant='n',
10561 fr="caractéristiques d'une section transversale de poutre à partir d'un maillage 2D",
10562 regles=(EXCLUS('SYME_X','GROUP_MA_BORD'),
10563 EXCLUS('SYME_Y','GROUP_MA_BORD'),
10564 ENSEMBLE('LONGUEUR','LIAISON','MATERIAU') ,),
10565 UNITE_MAILLAGE =SIMP(statut='f',typ='I',defaut= 20 ),
10566 SYME_X =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
10567 SYME_Y =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
10568 GROUP_MA_BORD =SIMP(statut='f',typ=grma,max='**'),
10569 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
10570 ORIG_INER =SIMP(statut='f',typ='R',max='**'),
10571 NOEUD =SIMP(statut='f',typ=no,max='**'),
10572 GROUP_MA_INTE =SIMP(statut='f',typ=grma,max='**'),
10573 LONGUEUR =SIMP(statut='f',typ='R'),
10574 MATERIAU =SIMP(statut='f',typ=mater),
10575 LIAISON =SIMP(statut='f',typ='TXM',into=("ROTULE","ENCASTREMENT")),
10576 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
10578 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
10579 # CONFIGURATION MANAGEMENT OF EDF VERSION
10580 # ======================================================================
10581 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10582 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10583 # REDISTRIBUTION OF THIS FILE.
10584 # ======================================================================
10585 MACRO_CHAR_F_U=MACRO(nom="MACRO_CHAR_F_U",op=-15,sd_prod=char_meca,
10586 fr=" ",docu="U4.72.07-a",reentrant='n',
10587 MODELE =SIMP(statut='o',typ=modele),
10588 CHAM_MATER =SIMP(statut='o',typ=cham_mater),
10589 CHARGE =SIMP(statut='o',typ=char_meca),
10590 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
10591 COEF_IMPO =SIMP(statut='f',typ='R',defaut=1.0E+0),
10592 NUME_LAGR =SIMP(statut='f',typ='TXM',defaut="APRES",into=("NORMAL","APRES")),
10593 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
10595 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
10596 # CONFIGURATION MANAGEMENT OF EDF VERSION
10597 # ======================================================================
10598 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10599 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10600 # REDISTRIBUTION OF THIS FILE.
10601 # ======================================================================
10602 # RESPONSABLE G8BHHXD X.DESROCHES
10603 def macro_elas_mult_prod(self,NUME_DDL,CAS_CHARGE,**args ):
10604 self.type_sdprod(NUME_DDL,nume_ddl)
10605 if CAS_CHARGE[0]['NOM_CAS'] != None : return mult_elas
10606 if CAS_CHARGE[0]['MODE_FOURIER'] != None : return fourier_elas
10607 raise AsException("type de concept resultat non prevu")
10609 MACRO_ELAS_MULT=MACRO(nom="MACRO_ELAS_MULT",op=-10,sd_prod=macro_elas_mult_prod,docu="U4.51.02-c1",reentrant='f',
10610 regles=(UN_PARMI('CHAR_MECA_GLOBAL','CHAR_CINE_GLOBAL','LIAISON_DISCRET', ),),
10611 MODELE =SIMP(statut='o',typ=modele),
10612 CHAM_MATER =SIMP(statut='f',typ=cham_mater),
10613 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
10614 NUME_DDL =SIMP(statut='f',typ=(CO,nume_ddl)),# CO()
10615 CHAR_MECA_GLOBAL=SIMP(statut='f',typ=char_meca,max='**'),
10616 CHAR_CINE_GLOBAL=SIMP(statut='f',typ=char_meca,max='**'),
10617 LIAISON_DISCRET =SIMP(statut='f',typ='TXM',into=("OUI",)),
10618 CAS_CHARGE =FACT(statut='o',min=1,max='**',
10619 regles=(UN_PARMI('NOM_CAS','MODE_FOURIER'),
10620 UN_PARMI('CHAR_MECA','CHAR_CINE','VECT_ASSE'),),
10621 NOM_CAS =SIMP(statut='f',typ='TXM' ),
10622 MODE_FOURIER =SIMP(statut='f',typ='I' ),
10623 TYPE_MODE =SIMP(statut='f',typ='TXM',defaut="SYME",into=("SYME","ANTI","TOUS") ),
10624 CHAR_MECA =SIMP(statut='f',typ=char_meca,max='**'),
10625 CHAR_CINE =SIMP(statut='f',typ=char_meca,max='**'),
10626 OPTION =SIMP(statut='f',typ='TXM',max='**',
10627 into=("EFGE_ELNO_DEPL","EPOT_ELEM_DEPL","SIGM_ELNO_DEPL","SIEF_ELGA_DEPL",
10628 "SIGM_ELNO_CART","EFGE_ELNO_CART","DEGE_ELNO_DEPL","EPSI_ELNO_DEPL",
10629 "EPSI_ELGA_DEPL","EPSG_ELNO_DEPL","EPSG_ELGA_DEPL","EPSP_ELNO","EPSP_ELGA",
10630 "ECIN_ELEM_DEPL","FLUX_ELGA_TEMP","FLUX_ELNO_TEMP","SOUR_ELGA_ELEC",
10631 "PRES_ELNO_DBEL","PRES_ELNO_REEL","PRES_ELNO_IMAG","INTE_ELNO_ACTI",
10632 "INTE_ELNO_REAC","SIGM_NOZ1_ELGA","ERRE_ELEM_NOZ1","SIGM_NOZ2_ELGA",
10633 "ERRE_ELEM_NOZ2","VNOR_ELEM_DEPL","ERRE_ELNO_ELGA","SIRE_ELNO_DEPL",
10634 "ERRE_ELGA_NORE","EQUI_ELNO_SIGM","EQUI_ELGA_SIGM","EQUI_ELNO_EPSI",
10635 "EQUI_ELGA_EPSI","FORC_NODA","REAC_NODA","EPSI_NOEU_DEPL","SIGM_NOEU_DEPL",
10636 "EFGE_NOEU_DEPL","EQUI_NOEU_SIGM","EQUI_NOEU_EPSI","FLUX_NOEU_TEMP") ),
10637 NUME_COUCHE =SIMP(statut='f',typ='I',defaut=1),
10638 NIVE_COUCHE =SIMP(statut='f',typ='TXM',defaut="MOY",into=("SUP","INF","MOY")),
10639 SOUS_TITRE =SIMP(statut='f',typ='TXM',max='**'),
10640 VECT_ASSE =SIMP(statut='f',typ=cham_no_depl_r),
10643 SOLVEUR =FACT(statut='d',min=1,max=1,
10644 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT") ),
10645 b_mult_front = BLOC ( condition = "METHODE == 'MULT_FRONT' ",
10646 fr="Paramètres de la méthode multi frontale",
10647 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
10649 b_ldlt =BLOC(condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
10650 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
10652 b_ldlt_mult =BLOC(condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
10653 fr="Paramètres relatifs à la non inversibilité de la matrice à factorise",
10654 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
10655 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
10658 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2)),
10659 TITRE =SIMP(statut='f',typ='TXM',max='**'),
10661 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
10662 # CONFIGURATION MANAGEMENT OF EDF VERSION
10663 # ======================================================================
10664 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10665 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10666 # REDISTRIBUTION OF THIS FILE.
10667 # ======================================================================
10668 MACRO_MADMACS=MACRO(nom="MACRO_MADMACS",op=-9,docu="U7.03.21-c",
10669 fr="Impression au format IDEAS des données pour chainage entre Code_Aster et MADMACS",
10670 regles=(UN_PARMI('MATR_ELEM_RIGI','MATR_RIGI'),
10671 UN_PARMI('MATR_ELEM_MASS','MATR_MASS'),
10672 PRESENT_ABSENT('MATR_ELEM_AMOR','MATR_AMOR'),),
10673 FICHIER =SIMP(statut='f',typ='TXM' ),
10674 FORMAT =SIMP(statut='f',typ='TXM',defaut="IDEAS",into=("IDEAS",)),
10675 VERSION =SIMP(statut='f',typ='I',defaut=5,into=(5,)),
10676 MAILLAGE =SIMP(statut='o',typ=maillage),
10677 NUME_DDL =SIMP(statut='o',typ=nume_ddl),
10678 CHARGE =SIMP(statut='o',typ=char_meca,max='**'),
10679 MATR_ELEM_RIGI =SIMP(statut='f',typ=matr_elem_depl_r),
10680 MATR_RIGI =SIMP(statut='f',typ=matr_asse_depl_r),
10681 MATR_ELEM_MASS =SIMP(statut='f',typ=matr_elem_depl_r),
10682 MATR_MASS =SIMP(statut='f',typ=matr_asse_depl_r),
10683 MATR_ELEM_AMOR =SIMP(statut='f',typ=matr_elem_depl_r),
10684 MATR_AMOR =SIMP(statut='f',typ=matr_asse_depl_r),
10685 MODE_MECA =SIMP(statut='o',typ=mode_meca),
10686 NMAX_MODE =SIMP(statut='f',typ='I',defaut=10),
10687 INTERFACE =FACT(statut='f',min=01,max='**',
10688 regles=(UN_PARMI('NOEUD','GROUP_NO'),
10689 UN_PARMI('DDL_ACTIF','MASQUE'),),
10690 NOM =SIMP(statut='o',typ='TXM'),
10691 NOEUD =SIMP(statut='f',typ=no,max='**'),
10692 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
10693 DDL_ACTIF =SIMP(statut='f',typ='TXM',max='**'),
10694 MASQUE =SIMP(statut='f',typ='TXM',max='**'),
10696 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
10698 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
10699 # CONFIGURATION MANAGEMENT OF EDF VERSION
10700 # ======================================================================
10701 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10702 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10703 # REDISTRIBUTION OF THIS FILE.
10704 # ======================================================================
10705 def macro_matr_ajou_prod(self,MATR_AMOR_AJOU,MATR_MASS_AJOU,MATR_RIGI_AJOU,FORC_AJOU,**args):
10706 self.type_sdprod(MATR_AMOR_AJOU,matr_asse_depl_r)
10707 self.type_sdprod(MATR_MASS_AJOU,matr_asse_depl_r)
10708 self.type_sdprod(MATR_RIGI_AJOU,matr_asse_depl_r)
10709 if FORC_AJOU != None:
10710 for m in FORC_AJOU:
10711 self.type_sdprod(m['VECTEUR'],vect_asse_gene)
10715 MACRO_MATR_AJOU=MACRO(nom="MACRO_MATR_AJOU",op=-13,docu="U4.66.11-b",sd_prod=macro_matr_ajou_prod,
10716 regles=(AU_MOINS_UN('MODE_MECA','DEPL_IMPO','MODELE_GENE'),
10717 AU_MOINS_UN('MATR_MASS_AJOU','MATR_AMOR_AJOU','MATR_RIGI_AJOU'),
10718 EXCLUS('MODE_MECA','DEPL_IMPO','MODELE_GENE'),
10719 EXCLUS('MONO_APPUI','MODE_STAT',),
10721 MAILLAGE =SIMP(statut='o',typ=maillage),
10722 GROUP_MA_FLUIDE =SIMP(statut='o',typ=grma),
10723 GROUP_MA_INTERF =SIMP(statut='o',typ=grma),
10724 MODELISATION =SIMP(statut='o',typ='TXM',into=("PLAN","AXIS","3D")),
10725 FLUIDE =FACT(statut='o',min=1,max='**',
10726 RHO =SIMP(statut='o',typ='R'),
10727 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",)),
10728 GROUP_MA =SIMP(statut='f',typ=grma),
10729 MAILLE =SIMP(statut='f',typ=ma),
10731 DDL_IMPO =FACT(statut='o',min=1,max='**',
10732 regles=(UN_PARMI('NOEUD','GROUP_NO'),
10733 UN_PARMI('PRES_FLUIDE','PRES_SORTIE'),),
10734 NOEUD =SIMP(statut='f',typ=no),
10735 GROUP_NO =SIMP(statut='f',typ=grno),
10736 PRES_FLUIDE =SIMP(statut='f',typ='R'),
10737 PRES_SORTIE =SIMP(statut='f',typ='R'),
10739 ECOULEMENT =FACT(statut='f',min=1,max='**',
10740 GROUP_MA_1 =SIMP(statut='o',typ=grma),
10741 GROUP_MA_2 =SIMP(statut='o',typ=grma),
10742 VNOR_1 =SIMP(statut='o',typ='R'),
10743 VNOR_2 =SIMP(statut='f',typ='R'),
10744 POTENTIEL =SIMP(statut='f',typ=evol_ther),
10746 MODE_MECA =SIMP(statut='f',typ=mode_meca),
10747 DEPL_IMPO =SIMP(statut='f',typ=cham_no_depl_r),
10748 MODELE_GENE =SIMP(statut='f',typ=modele_gene),
10749 NUME_DDL_GENE =SIMP(statut='f',typ=nume_ddl_gene),
10750 DIST_REFE =SIMP(statut='f',typ='R',defaut= 1.0E-2),
10751 MATR_MASS_AJOU =SIMP(statut='f',typ=(CO,matr_asse)),
10752 MATR_RIGI_AJOU =SIMP(statut='f',typ=(CO,matr_asse)),
10753 MATR_AMOR_AJOU =SIMP(statut='f',typ=(CO,matr_asse)),
10754 MONO_APPUI =SIMP(statut='f',typ='TXM',into=("OUI",),),
10755 MODE_STAT =SIMP(statut='f',typ=(mode_stat_depl,mode_stat_acce,mode_stat_forc,),),
10756 FORC_AJOU =FACT(statut='f',min=1,max='**',
10757 DIRECTION =SIMP(statut='o',typ='R',max=3),
10758 NOEUD =SIMP(statut='f',typ=no,max='**'),
10759 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
10760 VECTEUR =SIMP(statut='o',typ=(CO,vect_asse_gene)),
10762 SOLVEUR =FACT(statut='d',min=1,max=1,
10763 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
10764 b_mult_front =BLOC(condition = "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
10765 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
10767 b_ldlt =BLOC(condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
10768 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
10770 b_ldlt_mult =BLOC(condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
10771 fr="Paramètres relatifs à la non iversibilité de la matrice à factorise",
10772 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
10773 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
10775 b_gcpc =BLOC(condition = "METHODE == 'GCPC' ", fr="Paramètres de la méthode du gradient conjugué",
10776 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
10777 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut= 0 ),
10778 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
10779 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
10780 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
10783 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
10785 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
10786 NOEUD_DOUBLE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
10787 AVEC_MODE_STAT =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON")),
10789 #& MODIF COMMANDE DATE 23/01/2002 AUTEUR DURAND C.DURAND
10790 # CONFIGURATION MANAGEMENT OF EDF VERSION
10791 # ======================================================================
10792 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10793 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10794 # REDISTRIBUTION OF THIS FILE.
10795 # ======================================================================
10796 #% RESPONSABLE VABHHTS J.PELLET
10798 def macro_matr_asse_ops(self,MODELE,CHAM_MATER,CARA_ELEM,MATR_ASSE,
10799 SOLVEUR,NUME_DDL,CHARGE,INST,**args):
10801 Ecriture de la macro MACRO_MATR_ASSE
10804 # On met le mot cle NUME_DDL dans une variable locale pour le proteger
10806 # On importe les definitions des commandes a utiliser dans la macro
10807 # Le nom de la variable doit etre obligatoirement le nom de la commande
10808 CALC_MATR_ELEM=self.get_cmd('CALC_MATR_ELEM')
10809 NUME_DDL =self.get_cmd('NUME_DDL')
10810 ASSE_MATRICE =self.get_cmd('ASSE_MATRICE')
10811 # La macro compte pour 1 dans la numerotation des commandes
10815 methode=SOLVEUR['METHODE']
10816 if methode=='LDLT':
10817 if SOLVEUR['RENUM']:
10818 renum=SOLVEUR['RENUM']
10821 if renum not in ('SANS','RCMK'):
10823 self.cr.fatal("Avec methode LDLT, RENUM doit etre SANS ou RCMK.")
10825 elif methode=='MULT_FRONT':
10826 if SOLVEUR['RENUM']:
10827 renum=SOLVEUR['RENUM']
10830 if renum not in ('MDA','MD','METIS'):
10832 self.cr.fatal("Avec methode MULT_FRONT, RENUM doit etre MDA, MD ou RCMK.")
10834 elif methode=='GCPC':
10835 if SOLVEUR['RENUM']:
10836 renum=SOLVEUR['RENUM']
10839 if renum not in ('SANS','RCMK'):
10841 self.cr.fatal("Avec methode GCPC, RENUM doit etre SANS ou RCMK.")
10844 methode='MULT_FRONT'
10847 if numeddl in self.sdprods:
10848 # Si le concept numeddl est dans self.sdprods
10849 # il doit etre produit par la macro
10850 # il faudra donc appeler la commande NUME_DDL
10858 for m in MATR_ASSE:
10861 if iocc == 1 and lnume == 1 and option not in ('RIGI_MECA','RIGI_MECA_LAGR',
10862 'RIGI_THER','RIGI_ACOU') :
10864 self.cr.fatal("LA PREMIERE OPTION DOIT ETRE RIGI_MECA OU RIGI_THER OU RIGI_ACOU OU RIGI_MECA_LAGR")
10867 if m['SIEF_ELGA']!=None and option!='RIGI_GEOM':
10869 self.cr.fatal("SIEF_ELGA N EST ADMIS QU AVEC L OPTION RIGI_GEOM")
10872 if m['MODE_FOURIER']!=None and option not in ('RIGI_MECA','RIGI_FLUI_STRU','RIGI_THER'):
10874 self.cr.fatal("MODE_FOURIER N EST ADMIS QU AVEC UNE DES OPTIONS RIGI_MECA RIGI_FLUI_STRU RIGI_THER")
10877 if (m['THETA']!=None or m['PROPAGATION']!=None) and option!='RIGI_MECA_LAGR':
10879 self.cr.fatal("PROPAGATION ET,OU THETA NE SONT ADMIS QU AVEC L OPTION RIGI_MECA_LAGR")
10882 motscles={'OPTION':option}
10883 if option == 'AMOR_MECA':
10884 if (not lrigel or not lmasel):
10886 self.cr.fatal("""POUR CALCULER AMOR_MECA, IL FAUT AVOIR CALCULE
10887 RIGI_MECA ET MASS_MECA AUPARAVANT (DANS LE MEME APPEL)""")
10889 if CHAM_MATER != None:
10890 motscles['RIGI_MECA'] =rigel
10891 motscles['MASS_MECA'] =masel
10893 if option[0:9] not in ('MASS_THER','RIGI_GEOM','MASS_ID_M'):
10894 motscles['CHARGE'] =CHARGE
10895 if CHAM_MATER != None: motscles['CHAM_MATER'] =CHAM_MATER
10896 if CARA_ELEM != None: motscles['CARA_ELEM'] =CARA_ELEM
10897 if INST != None: motscles['INST'] =INST
10898 if m['SIEF_ELGA'] : motscles['SIEF_ELGA'] =m['SIEF_ELGA']
10899 if m['MODE_FOURIER']: motscles['MODE_FOURIER']=m['MODE_FOURIER']
10900 if m['THETA'] : motscles['THETA'] =m['THETA']
10901 if m['PROPAGATION'] : motscles['PROPAGATION'] =m['PROPAGATION']
10903 __a=CALC_MATR_ELEM(MODELE=MODELE,**motscles)
10905 if option == 'RIGI_MECA':
10908 if option == 'MASS_MECA':
10912 if lnume and option in ('RIGI_MECA','RIGI_THER','RIGI_ACOU','RIGI_MECA_LAGR'):
10913 self.DeclareOut('num',numeddl)
10914 # On peut passer des mots cles egaux a None. Ils sont ignores
10915 num=NUME_DDL(MATR_RIGI=__a,METHODE=methode,RENUM=renum)
10919 self.DeclareOut('mm',m['MATRICE'])
10920 mm=ASSE_MATRICE(MATR_ELEM=__a,NUME_DDL=num)
10924 def macro_matr_asse_prod(self,NUME_DDL,MATR_ASSE,**args):
10925 if not MATR_ASSE: raise AsException("Impossible de typer les concepts resultats")
10926 if not NUME_DDL: raise AsException("Impossible de typer les concepts resultats")
10927 self.type_sdprod(NUME_DDL,nume_ddl)
10928 for m in MATR_ASSE:
10931 if opti in ( "RIGI_MECA","RIGI_FLUI_STRU","RIGI_MECA_LAGR" ,
10932 "MASS_MECA" , "MASS_FLUI_STRU" ,"RIGI_GEOM" ,"RIGI_ROTA",
10933 "AMOR_MECA","IMPE_MECA","MASS_ID_MDEP_R","MASS_ID_MDNS_R",
10934 "ONDE_FLUI","MASS_MECA_DIAG" ) : t=matr_asse_depl_r
10936 if opti in ( "RIGI_ACOU","MASS_ACOU","AMOR_ACOU",) : t=matr_asse_pres_c
10938 if opti in ( "RIGI_THER","MASS_THER","RIGI_THER_CONV" ,
10939 "RIGI_THER_CONV_D","MASS_ID_MTEM_R","MASS_ID_MTNS_R",) : t=matr_asse_temp_r
10941 if opti == "RIGI_MECA_HYST" : t= matr_asse_depl_c
10943 self.type_sdprod(m['MATRICE'],t)
10946 MACRO_MATR_ASSE=MACRO(nom="MACRO_MATR_ASSE",op=macro_matr_asse_ops,docu="U4.61.21-c",
10947 sd_prod=macro_matr_asse_prod,
10948 fr="Calcul des matrices assemblées (matr_asse_gd) par exemple de rigidité, de masse ",
10949 MODELE =SIMP(statut='o',typ=modele),
10950 CHAM_MATER =SIMP(statut='f',typ=cham_mater),
10951 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
10952 CHARGE =SIMP(statut='f',typ=(char_meca,char_ther,char_acou)),
10953 INST =SIMP(statut='f',typ='R'),
10954 NUME_DDL =SIMP(statut='o',typ=(nume_ddl,CO)),
10955 SOLVEUR =FACT(statut='d',min=01,max=01,
10956 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",
10957 into=("LDLT","MULT_FRONT","GCPC")),
10958 RENUM =SIMP(statut='f',typ='TXM',into=("SANS","RCMK","MD","MDA","METIS")),
10960 MATR_ASSE =FACT(statut='o',min=01,max='**',
10961 MATRICE =SIMP(statut='o',typ=(matr_asse,CO)),
10962 OPTION =SIMP(statut='o',typ='TXM',
10963 into=("RIGI_MECA","MASS_MECA","MASS_MECA_DIAG",
10964 "AMOR_MECA","RIGI_MECA_HYST","IMPE_MECA",
10965 "ONDE_FLUI","RIGI_FLUI_STRU","MASS_FLUI_STRU",
10966 "RIGI_ROTA","RIGI_GEOM","RIGI_MECA_LAGR",
10967 "RIGI_THER","MASS_THER",
10968 "RIGI_ACOU","MASS_ACOU","AMOR_ACOU",
10969 "MASS_ID_MTEM_R","MASS_ID_MTNS_R","MASS_ID_MDEP_R","MASS_ID_MDNS_R",)
10971 SIEF_ELGA =SIMP(statut='f',typ=cham_elem_sief_r),
10972 MODE_FOURIER =SIMP(statut='f',typ='I'),
10973 THETA =SIMP(statut='f',typ=theta_geom),
10974 PROPAGATION =SIMP(statut='f',typ='R'),
10976 TITRE =SIMP(statut='f',typ='TXM',max='**'),
10977 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
10979 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
10980 # CONFIGURATION MANAGEMENT OF EDF VERSION
10981 # ======================================================================
10982 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
10983 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
10984 # REDISTRIBUTION OF THIS FILE.
10985 # ======================================================================
10986 MACRO_MISS_3D=MACRO(nom="MACRO_MISS_3D",op=-18,fr=" ",docu="U7.03.11-a",
10987 OPTION =FACT(statut='o',min=01,max=01,
10988 regles=(UN_PARMI('TOUT','MODULE'),),
10989 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",)),
10990 MODULE =SIMP(statut='f',typ='TXM',into=("PRE_MISS","MISS_EVOL","MISS_IMPE")),
10992 PROJET =SIMP(statut='o',typ='TXM'),
10993 REPERTOIRE =SIMP(statut='f',typ='TXM'),
10994 UNITE_IMPR_ASTER=SIMP(statut='f',typ='I',defaut=25),
10995 UNITE_OPTI_MISS =SIMP(statut='f',typ='I',defaut=26),
10996 UNITE_MODELE_SOL=SIMP(statut='f',typ='I',defaut=27),
10997 UNITE_RESU_IMPE =SIMP(statut='f',typ='I',defaut=30),
10999 #& MODIF COMMANDE DATE 23/01/2002 AUTEUR CIBHHLV L.VIVAN
11000 # CONFIGURATION MANAGEMENT OF EDF VERSION
11001 # ======================================================================
11002 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11003 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11004 # REDISTRIBUTION OF THIS FILE.
11005 # ======================================================================
11006 def macro_mode_meca_prod(self,MATR_A,MATR_B,**args ):
11007 self.type_sdprod(MATR_A,matr_asse_depl_r)
11008 self.type_sdprod(MATR_B,matr_asse_depl_r)
11011 MACRO_MODE_MECA=MACRO(nom="MACRO_MODE_MECA",op= -12,sd_prod=macro_mode_meca_prod,
11012 docu="U4.52.02-c",reentrant='n',
11013 MATR_A =SIMP(statut='o',typ=(CO,matr_asse_depl_r) ),
11014 MATR_B =SIMP(statut='o',typ=(CO,matr_asse_depl_r) ),
11015 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
11016 # ce mot cle ne devrait il pas etre dans calc_freq
11017 METHODE =SIMP(statut='f',typ='TXM',defaut="SORENSEN",
11018 into=("TRI_DIAG","JACOBI","SORENSEN",) ),
11019 OPTION =SIMP(statut='f',typ='TXM',defaut="SANS",
11020 into=("MODE_RIGIDE","SANS") ),
11021 CALC_FREQ =FACT(statut='d',min=00,max=01,
11022 regles=(UN_PARMI('FREQ','FREQ_MAX'),
11023 PRESENT_PRESENT('FREQ_MIN','FREQ_MAX'),
11024 PRESENT_PRESENT('FREQ_MAX','NB_BLOC_FREQ'),
11025 EXCLUS('DIM_SOUS_ESPACE','COEF_DIM_ESPACE'),),
11026 FREQ =SIMP(statut='f',typ='R',max='**' ),
11027 FREQ_MIN =SIMP(statut='f',typ='R' ),
11028 FREQ_MAX =SIMP(statut='f',typ='R' ),
11029 NB_BLOC_FREQ =SIMP(statut='f',typ='I' ),
11030 NMAX_FREQ =SIMP(statut='f',typ='I',defaut= 10 ),
11031 DIM_SOUS_ESPACE =SIMP(statut='f',typ='I' ),
11032 COEF_DIM_ESPACE =SIMP(statut='f',typ='I' ),
11033 NPREC_SOLVEUR =SIMP(statut='f',typ='I',defaut= 8 ),
11034 NMAX_ITER_SHIFT =SIMP(statut='f',typ='I',defaut= 5 ),
11035 PREC_SHIFT =SIMP(statut='f',typ='R',defaut= 5.E-2 ),
11036 PREC_LANCZOS =SIMP(statut='f',typ='R',defaut= 1.E-10 ),
11037 PREC_ORTHO =SIMP(statut='f',typ='R',defaut= 1.E-12 ),
11038 NMAX_ITER_ORTHO =SIMP(statut='f',typ='I',defaut= 5 ),
11039 NMAX_ITER_QR =SIMP(statut='f',typ='I',defaut= 30 ),
11040 PREC_BATHE =SIMP(statut='f',typ='R',defaut= 1.4E-10 ),
11041 NMAX_ITER_BATHE =SIMP(statut='f',typ='I' ,defaut= 12 ),
11042 PREC_JACOBI =SIMP(statut='f',typ='R',defaut= 1.E-2 ),
11043 NMAX_ITER_JACOBI=SIMP(statut='f',typ='I',defaut= 12 ),
11044 PREC_SOREN =SIMP(statut='f',typ='R',defaut= 0.E0 ),
11045 NMAX_ITER_SOREN =SIMP(statut='f',typ='I',defaut= 20 ),
11046 PARA_ORTHO_SOREN=SIMP(statut='f',typ='R',defaut= 0.717 ),
11047 SEUIL_FREQ =SIMP(statut='f',typ='R' ,defaut= 1.E-2 ),
11048 STOP_FREQ_VIDE =SIMP(statut='f',typ='TXM',defaut="NON" ,into=("OUI","NON") ),
11050 VERI_MODE =FACT(statut='d',min=00,max=01,
11051 STOP_ERREUR =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
11052 SEUIL =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
11053 PREC_SHIFT =SIMP(statut='f',typ='R',defaut= 5.E-3 ),
11054 STURM =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
11056 NORM_MODE =FACT(statut='o',min=01,max='**',
11057 MASS_INER =SIMP(statut='o',typ=tabl_mass_iner ),
11058 NORME =SIMP(statut='f',typ='TXM',defaut="TRAN_ROTA",
11059 into=("MASS_GENE","RIGI_GENE","EUCL",
11060 "EUCL_TRAN","TRAN","TRAN_ROTA") ),
11061 INFO =SIMP(statut='f',typ='I',defaut= 1 ,into=(1,2) ),
11063 FILTRE_MODE =FACT(statut='f',min=01,max=01,
11064 CRIT_EXTR =SIMP(statut='f',typ='TXM',defaut="MASS_EFFE_UN",
11065 into=("MASS_EFFE_UN","MASS_GENE") ),
11066 SEUIL =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
11068 IMPRESSION =FACT(statut='d',min=01,max=01,
11069 TOUT_PARA =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
11070 CUMUL =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
11071 CRIT_EXTR =SIMP(statut='f',typ='TXM',defaut="MASS_EFFE_UN",
11072 into=("MASS_EFFE_UN","MASS_GENE",) ),
11075 #& MODIF COMMANDE DATE 23/01/2002 AUTEUR DURAND C.DURAND
11076 # CONFIGURATION MANAGEMENT OF EDF VERSION
11077 # ======================================================================
11078 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11079 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11080 # REDISTRIBUTION OF THIS FILE.
11081 # ======================================================================
11082 def macro_proj_base_ops(self,BASE,NB_VECT,MATR_ASSE_GENE,VECT_ASSE_GENE,**args):
11084 Ecriture de la macro MACRO_PROJ_BASE
11087 # On importe les definitions des commandes a utiliser dans la macro
11088 NUME_DDL_GENE =self.get_cmd('NUME_DDL_GENE')
11089 PROJ_MATR_BASE =self.get_cmd('PROJ_MATR_BASE')
11090 PROJ_VECT_BASE =self.get_cmd('PROJ_VECT_BASE')
11091 # La macro compte pour 1 dans la numerotation des commandes
11097 for m in MATR_ASSE_GENE:
11099 if (iocc==1 or (m['PROFIL']!=nompro)):
11100 _num=NUME_DDL_GENE(BASE=BASE,NB_VECT=NB_VECT,STOCKAGE=m['PROFIL'])
11103 if m['MATR_ASSE'] : motscles['MATR_ASSE'] =m['MATR_ASSE']
11104 elif m['MATR_ASSE_GENE']: motscles['MATR_ASSE_GENE']=m['MATR_ASSE_GENE']
11107 self.cr.fatal("MATR_ASSE et MATR_ASSE_GENE absents")
11109 self.DeclareOut('mm',m['MATRICE'])
11110 mm=PROJ_MATR_BASE(BASE=BASE,NUME_DDL_GENE=_num,NB_VECT=NB_VECT,**motscles)
11114 for v in VECT_ASSE_GENE:
11116 if (iocc==1 and not MATR_ASSE_GENE):
11117 _num=NUME_DDL_GENE(BASE=BASE,NB_VECT=NB_VECT,STOCKAGE='DIAG')
11119 if v['VECT_ASSE'] : motscles['VECT_ASSE'] =v['VECT_ASSE']
11120 elif v['VECT_ASSE_GENE']: motscles['VECT_ASSE_GENE']=v['VECT_ASSE_GENE']
11123 self.cr.fatal("MATR_ASSE et MATR_ASSE_GENE absents")
11125 motscles['TYPE_VECT']=v['TYPE_VECT']
11126 self.DeclareOut('vv',v['VECTEUR'])
11127 vv=PROJ_VECT_BASE(BASE=BASE,NUME_DDL_GENE=_num,NB_VECT=NB_VECT,**motscles)
11132 def macro_proj_base_prod(self,MATR_ASSE_GENE,VECT_ASSE_GENE,**args ):
11133 if MATR_ASSE_GENE != None:
11134 for m in MATR_ASSE_GENE:
11135 self.type_sdprod(m['MATRICE'],matr_asse_gene_r)
11136 self.type_sdprod(m['MATR_ASSE'],matr_asse_depl_r)
11137 if VECT_ASSE_GENE != None:
11138 for v in VECT_ASSE_GENE:
11139 self.type_sdprod(v['VECTEUR'],vect_asse_gene)
11142 MACRO_PROJ_BASE=MACRO(nom="MACRO_PROJ_BASE",op=macro_proj_base_ops,docu="U4.63.11-c",
11143 sd_prod=macro_proj_base_prod,
11144 fr="Projection des matrices et/ou vecteurs assemblés sur une base de vecteurs",
11145 BASE =SIMP(statut='o',typ=(mode_meca,base_modale,mode_gene) ),
11146 NB_VECT =SIMP(statut='f',typ='I',defaut= 9999),
11147 MATR_ASSE_GENE =FACT(statut='f',min=01,max='**',
11148 MATRICE =SIMP(statut='o',typ=(CO,matr_asse)),
11149 MATR_ASSE =SIMP(statut='f',typ=matr_asse_depl_r),
11150 MATR_ASSE_GENE =SIMP(statut='f',typ=matr_asse_gene_r),
11151 PROFIL =SIMP(statut='f',typ='TXM',defaut="DIAG",into=("PLEIN","DIAG") ),
11153 VECT_ASSE_GENE =FACT(statut='f',min=01,max='**',
11154 VECTEUR =SIMP(statut='o',typ=(CO,vect_asse)),
11155 TYPE_VECT =SIMP(statut='f',typ='TXM',defaut="FORC"),
11156 VECT_ASSE =SIMP(statut='f',typ=cham_no_depl_r),
11157 VECT_ASSE_GENE =SIMP(statut='f',typ=vect_asse_gene),
11159 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
11161 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
11162 # CONFIGURATION MANAGEMENT OF EDF VERSION
11163 # ======================================================================
11164 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11165 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11166 # REDISTRIBUTION OF THIS FILE.
11167 # ======================================================================
11168 MAJ_CATA=PROC(nom="MAJ_CATA",op=20,docu="U4.15.01-d",
11169 fr="Compilation des catalogues de commandes et d éléments",
11170 regles=(UN_PARMI('COMMANDE','ELEMENT','VALIDATION'),),
11172 COMMANDE =FACT(statut='f',min=01,max=01,
11173 UNITE =SIMP(statut='o',typ='I',val_min=1,val_max=99, ),
11176 ELEMENT =FACT(statut='f',min=01,max=01,),
11178 VALIDATION =FACT(statut='f',min=01,max=01,
11179 UNITE =SIMP(statut='o',typ='I',val_min=1,val_max=99, ),
11180 TOUT =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI",) ),
11183 #& MODIF COMMANDE DATE 04/12/2001 AUTEUR GNICOLAS G.NICOLAS
11184 # CONFIGURATION MANAGEMENT OF EDF VERSION
11185 # ======================================================================
11186 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11187 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11188 # REDISTRIBUTION OF THIS FILE.
11189 # ======================================================================
11190 # RESPONSABLE VABHHTS J.PELLET
11191 MECA_STATIQUE=OPER(nom="MECA_STATIQUE",op=46,sd_prod=evol_elas,
11192 fr="Analyse mécanique statique linéaire",docu="U4.51.01-f",reentrant='n',
11193 regles=(EXCLUS("INST","LIST_INST"),
11194 AU_MOINS_UN('CHAM_MATER','CARA_ELEM',), ),
11195 MODELE =SIMP(statut='o',typ=modele),
11196 CHAM_MATER =SIMP(statut='f',typ=cham_mater,
11197 fr="le CHAM_MATER est nécessaire, sauf si le modèle ne contient que des éléments discrets (modélisations DIS_XXX)",
11198 ang="CHAM_MATER is compulsory, except if the model contains only discret elements (modelizations DIS_XXX)"),
11199 CARA_ELEM =SIMP(statut='f',typ=cara_elem,
11200 fr="le CARA_ELEM est nécessaire dès que le modèle contient des éléments de structure : coques, poutres, ...",
11201 ang="CARA_ELEM is compulsory as soon as the model contains structural elements : plates, beams, ..."),
11202 TITRE =SIMP(statut='f',typ='TXM',max='**'),
11203 EXCIT =FACT(statut='o',min=1,max='**',
11204 CHARGE =SIMP(statut='o',typ=(char_meca,char_cine_meca)),
11205 FONC_MULT =SIMP(statut='f',typ=fonction),
11206 TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FIXE",into=("FIXE",) ),
11208 INST =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
11209 LIST_INST =SIMP(statut='f',typ=listr8),
11210 OPTION =SIMP(statut='f',typ='TXM',max='**',
11211 into=("SIEF_ELGA_DEPL","SIGM_ELNO_DEPL","SIPO_ELNO_DEPL","EFGE_ELNO_DEPL",
11212 "EPSI_ELNO_DEPL","EPSI_ELGA_DEPL","EPME_ELNO_DEPL","EPME_ELGA_DEPL",
11213 "EQUI_ELNO_SIGM","EQUI_ELGA_SIGM","EQUI_ELNO_EPSI","EQUI_ELGA_EPSI",
11214 "EQUI_ELNO_EPME","EQUI_ELGA_EPME","DEGE_ELNO_DEPL","EPOT_ELEM_DEPL",
11215 "ENEL_ELGA","ENEL_ELNO_ELGA") ),
11216 NUME_COUCHE =SIMP(statut='f',typ='I',defaut=1),
11217 NIVE_COUCHE =SIMP(statut='f',typ='TXM',defaut="MOY",into=("SUP","INF","MOY") ),
11218 ANGLE =SIMP(statut='f',typ='I',defaut=0),
11219 PLAN =SIMP(statut='f',typ='TXM',defaut="MAIL",into=("SUP","INF","MOY","MAIL") ),
11220 SENSIBILITE =SIMP(statut='f',typ=(para_sensi,theta_geom),max='**',
11221 fr="Liste des paramètres de sensibilité.",
11222 ang="List of sensitivity parameters"),
11223 SOLVEUR =FACT(statut='d',min=1,max=1,
11224 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
11225 b_mult_front =BLOC(condition = "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
11226 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
11228 b_ldlt =BLOC(condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
11229 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
11230 TAILLE_BLOC =SIMP(statut='f',typ='R',defaut= 400.),
11232 b_ldlt_mult =BLOC(condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
11233 fr="Paramètres relatifs à la non inversibilité de la matrice à factorise",
11234 NPREC =SIMP(statut='f',typ='I',defaut=8),
11235 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
11237 b_gcpc =BLOC(condition = "METHODE == 'GCPC' ", fr="Paramètres de la méthode du gradient conjugué",
11238 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
11239 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut= 0 ),
11240 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
11241 RESI_RELA =SIMP(statut='f',typ='R',defaut=1.E-6),
11242 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
11245 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
11247 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
11249 #& MODIF COMMANDE DATE 25/09/2001 AUTEUR GNICOLAS G.NICOLAS
11250 # CONFIGURATION MANAGEMENT OF EDF VERSION
11251 # ======================================================================
11252 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11253 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11254 # REDISTRIBUTION OF THIS FILE.
11255 # ======================================================================
11256 # RESPONSABLE GNICOLAS G.NICOLAS
11257 MEMO_NOM_SENSI=PROC(nom="MEMO_NOM_SENSI",op=129,docu="U4.31.xx-a",
11258 fr="Mémorisation des noms des concepts dérivés.",
11259 ang="Memorisation of the names of the sensitive concepts.",
11260 regles=(AU_MOINS_UN('NOM','NOM_ZERO','NOM_UN'),),
11262 NOM=FACT(statut='f',max='**',
11263 NOM_SD=SIMP(statut='o',typ='TXM',
11264 fr="Nom de la structure de base",
11265 ang="Name of the basic structure"),
11266 PARA_SENSI=SIMP(statut='o',typ=(para_sensi,theta_geom),
11267 fr="Nom du paramètre sensible base",
11268 ang="Name of the sensitive parameter"),
11269 NOM_COMPOSE=SIMP(statut='f',typ='TXM',defaut=" ",
11270 fr="Nom de la structure composée",
11271 ang="Name of the built strcuture"),
11274 NOM_ZERO=SIMP(statut='f',typ=fonction,
11275 fr="Nom de la fonction nulle",
11276 ang="Name of the zero fonction"),
11277 NOM_UN=SIMP (statut='f',typ=fonction,
11278 fr="Nom de la fonction unité",
11279 ang="Name of the one fonction"),
11283 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
11284 # CONFIGURATION MANAGEMENT OF EDF VERSION
11285 # ======================================================================
11286 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11287 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11288 # REDISTRIBUTION OF THIS FILE.
11289 # ======================================================================
11290 MODE_ITER_CYCL=OPER(nom="MODE_ITER_CYCL",op= 80,sd_prod=mode_cycl,
11291 fr="Modes propres d une structure à répétitivité cyclique à partir d une base de modes propres réels",
11292 docu="U4.52.05-e",reentrant='n',
11293 BASE_MODALE =SIMP(statut='o',typ=base_modale ),
11294 NB_MODE =SIMP(statut='f',typ='I',defaut= 999 ),
11295 NB_SECTEUR =SIMP(statut='o',typ='I' ),
11296 LIAISON =FACT(statut='o',min=01,max=01,
11297 DROITE =SIMP(statut='o',typ='TXM' ),
11298 GAUCHE =SIMP(statut='o',typ='TXM' ),
11299 AXE =SIMP(statut='f',typ='TXM' ),
11301 VERI_CYCL =FACT(statut='f',min=01,max=01,
11302 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
11303 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF",) ),
11304 DIST_REFE =SIMP(statut='f',typ='R' ),
11306 CALCUL =FACT(statut='o',min=01,max=01,
11307 TOUT_DIAM =SIMP(statut='f',typ='TXM',into=("OUI",) ),
11308 NB_DIAM =SIMP(statut='f',typ='I',max='**'),
11309 OPTION =SIMP(statut='f',typ='TXM',defaut="PLUS_PETITE"
11310 ,into=("PLUS_PETITE","CENTRE","BANDE") ),
11311 b_centre =BLOC(condition = "OPTION == 'CENTRE'",
11312 FREQ =SIMP(statut='o',typ='R',min=01,max=01),
11314 b_bande =BLOC(condition = "OPTION == 'BANDE'",
11315 FREQ =SIMP(statut='o',typ='R',min=02,max=02),
11317 # NMAX_FREQ n a-t-il pas un sens qu avec OPTION CENTRE
11318 NMAX_FREQ =SIMP(statut='f',typ='I',defaut= 10 ),
11319 PREC_SEPARE =SIMP(statut='f',typ='R',defaut= 100. ),
11320 PREC_AJUSTE =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
11321 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 50 ),
11323 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
11325 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
11326 # CONFIGURATION MANAGEMENT OF EDF VERSION
11327 # ======================================================================
11328 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11329 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11330 # REDISTRIBUTION OF THIS FILE.
11331 # ======================================================================
11332 def mode_iter_inv_prod(MATR_A,MATR_C,TYPE_RESU,**args ):
11333 if TYPE_RESU == "MODE_FLAMB" : return mode_flamb
11334 if AsType(MATR_C) == matr_asse_depl_r : return mode_meca_c
11335 if AsType(MATR_A) == matr_asse_depl_r : return mode_meca
11336 if AsType(MATR_A) == matr_asse_pres_r : return mode_acou
11337 if AsType(MATR_A) == matr_asse_gene_r : return mode_gene
11338 raise AsException("type de concept resultat non prevu")
11340 MODE_ITER_INV=OPER(nom="MODE_ITER_INV",op= 44,sd_prod=mode_iter_inv_prod
11341 ,fr="Modes propres par itérations inverses ; valeurs propres et modes réels ou complexes",
11342 docu="U4.52.04-f",reentrant='n',
11343 MATR_A =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_gene_r,matr_asse_pres_r ) ),
11344 MATR_B =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_gene_r,matr_asse_pres_r ) ),
11345 MATR_C =SIMP(statut='f',typ=matr_asse_depl_r ),
11346 TYPE_RESU =SIMP(statut='f',position='global',typ='TXM',defaut="DYNAMIQUE",
11347 into=("MODE_FLAMB","DYNAMIQUE"),fr="Type d analyse" ),
11348 b_dynam =BLOC(condition = "TYPE_RESU == 'DYNAMIQUE'",
11349 CALC_FREQ =FACT(statut='o',min=1,max=1,fr="Choix des paramètres pour le calcul des valeurs propres",
11351 OPTION =SIMP(statut='f',typ='TXM',defaut="AJUSTE",into=("SEPARE","AJUSTE","PROCHE"),
11352 fr="Choix de l option pour estimer les valeurs propres" ),
11353 FREQ =SIMP(statut='o',typ='R',max='**'),
11354 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**'),
11355 NMAX_FREQ =SIMP(statut='f',typ='I',defaut= 0,val_min=0 ),
11356 NMAX_ITER_SEPARE=SIMP(statut='f',typ='I' ,defaut= 30,val_min=0 ),
11357 PREC_SEPARE =SIMP(statut='f',typ='R',defaut= 1.E-4,val_min=0.E+0 ),
11358 NMAX_ITER_AJUSTE=SIMP(statut='f',typ='I',defaut= 15,val_min=0 ),
11359 PREC_AJUSTE =SIMP(statut='f',typ='R',defaut= 1.E-4,val_min=0.E+0 ),
11361 NPREC_SOLVEUR =SIMP(statut='f',typ='I',defaut= 8,val_min=0 ),
11362 NMAX_ITER_SHIFT =SIMP(statut='f',typ='I',defaut= 5,val_min=0 ),
11363 PREC_SHIFT =SIMP(statut='f',typ='R',defaut= 5.E-2,val_min=0.E+0, ),
11364 SEUIL_FREQ =SIMP(statut='f',typ='R',defaut= 1.E-2,val_min=0.E+0, ),
11367 b_flamb =BLOC(condition = "TYPE_RESU == 'MODE_FLAMB'",
11368 CALC_FREQ =FACT(statut='o',min=1,max=1,fr="Choix des paramètres pour le calcul des valeurs propres",
11370 OPTION =SIMP(statut='f',typ='TXM',defaut="AJUSTE",into=("SEPARE","AJUSTE","PROCHE"),
11371 fr="Choix de l option pour estimer les valeurs propres" ),
11372 CHAR_CRIT =SIMP(statut='o',typ='R',max='**' ),
11373 NMAX_FREQ =SIMP(statut='f',typ='I',defaut= 0,val_min=0 ),
11374 NMAX_ITER_SEPARE=SIMP(statut='f',typ='I' ,defaut= 30,val_min=0 ),
11375 PREC_SEPARE =SIMP(statut='f',typ='R',defaut= 1.E-4,val_min=0.E+0, ),
11376 NMAX_ITER_AJUSTE=SIMP(statut='f',typ='I',defaut= 15 ),
11377 PREC_AJUSTE =SIMP(statut='f',typ='R',defaut= 1.E-4,val_min=0.E+0, ),
11379 NPREC_SOLVEUR =SIMP(statut='f',typ='I',defaut= 8,val_min=0 ),
11380 NMAX_ITER_SHIFT =SIMP(statut='f',typ='I',defaut= 5,val_min=0 ),
11381 PREC_SHIFT =SIMP(statut='f',typ='R',defaut= 5.E-2,val_min=0.E+0, ),
11382 SEUIL_FREQ =SIMP(statut='f',typ='R',defaut= 1.E-2,val_min=0.E+0, ),
11385 CALC_MODE =FACT(statut='d',min=0,max=1,fr="Choix des paramètres pour le calcul des vecteurs propres",
11386 OPTION =SIMP(statut='f',typ='TXM',defaut="DIRECT",into=("DIRECT","RAYLEIGH") ),
11387 PREC =SIMP(statut='f',typ='R',defaut= 1.E-5,val_min=0.E+0,fr="Précision de convergence" ),
11388 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 30,val_min=0 ),
11390 VERI_MODE =FACT(statut='d',min=0,max=1,
11391 STOP_ERREUR =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
11392 SEUIL =SIMP(statut='f',typ='R',defaut= 1.E-2,val_min=0.E+0,
11393 fr="Valeur limite admise pour l ereur a posteriori des modes" ),
11395 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
11396 TITRE =SIMP(statut='f',typ='TXM',max='**'),
11398 #& MODIF COMMANDE DATE 23/01/2002 AUTEUR CIBHHLV L.VIVAN
11399 # CONFIGURATION MANAGEMENT OF EDF VERSION
11400 # ======================================================================
11401 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11402 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11403 # REDISTRIBUTION OF THIS FILE.
11404 # ======================================================================
11405 def mode_iter_simult_prod(MATR_A,MATR_C,TYPE_RESU,**args ):
11406 if TYPE_RESU == "MODE_FLAMB" : return mode_flamb
11407 if AsType(MATR_C) == matr_asse_depl_r : return mode_meca_c
11408 if AsType(MATR_A) == matr_asse_depl_r : return mode_meca
11409 if AsType(MATR_A) == matr_asse_pres_r : return mode_acou
11410 if AsType(MATR_A) == matr_asse_gene_r : return mode_gene
11411 raise AsException("type de concept resultat non prevu")
11413 MODE_ITER_SIMULT=OPER(nom="MODE_ITER_SIMULT",op= 45,sd_prod=mode_iter_simult_prod,
11414 fr="Modes propres par itérations simultanées ; valeurs propres et modes propres réels ou complexes",
11415 docu="U4.52.03-e",reentrant='n',
11416 MATR_A =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_gene_r,matr_asse_pres_r ) ),
11417 MATR_B =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_gene_r,matr_asse_pres_r ) ),
11418 MATR_C =SIMP(statut='f',position='global',typ=matr_asse_depl_r ),
11419 METHODE =SIMP(statut='f',position='global',typ='TXM',defaut="SORENSEN",
11420 into=("TRI_DIAG","JACOBI","SORENSEN") ),
11421 TYPE_RESU =SIMP(statut='f',position='global',typ='TXM',defaut="DYNAMIQUE",
11422 into=("MODE_FLAMB","DYNAMIQUE"),
11423 fr="Type d analyse" ),
11424 OPTION =SIMP(statut='f',typ='TXM',defaut="SANS",into=("MODE_RIGIDE","SANS"),
11425 fr="Calcul des modes de corps rigide, uniquement pour la méthode TRI_DIAG" ),
11427 b_flamb =BLOC(condition = "TYPE_RESU == 'MODE_FLAMB'",
11428 CALC_FREQ =FACT(statut='d',min=0,max=1,
11429 OPTION =SIMP(statut='f',typ='TXM',defaut="PLUS_PETITE",into=("PLUS_PETITE","BANDE","CENTRE"),
11430 fr="Choix de l option et par conséquent du shift du problème modal" ),
11431 b_plus_petite =BLOC(condition = "OPTION == 'PLUS_PETITE'",fr="Recherche des plus petites valeurs propres",
11432 NMAX_FREQ =SIMP(statut='f',typ='I',defaut= 10,val_min=0 ),
11434 b_centre =BLOC(condition = "OPTION == 'CENTRE'",
11435 fr="Recherche des valeurs propres les plus proches d une valeur donnée",
11436 CHAR_CRIT =SIMP(statut='o',typ='R',min=1,max=1,
11437 fr="Charge critique autour de laquelle on cherche les charges critiques propres"),
11439 b_bande =BLOC(condition = "(OPTION == 'BANDE')",
11440 fr="Recherche des valeurs propres dans une bande donnée",
11441 CHAR_CRIT =SIMP(statut='o',typ='R',min=2,max=2,
11442 fr="Valeur des deux charges critiques délimitant la bande de recherche"),
11444 APPROCHE =SIMP(statut='f',typ='TXM',defaut="REEL",into=("REEL","IMAG"),
11445 fr="Choix du pseudo-produit scalaire pour la résolution du problème quadratique" ),
11446 regles=(EXCLUS('DIM_SOUS_ESPACE','COEF_DIM_ESPACE'),),
11447 DIM_SOUS_ESPACE =SIMP(statut='f',typ='I' ),
11448 COEF_DIM_ESPACE =SIMP(statut='f',typ='I' ),
11449 b_tri_diag =BLOC(condition = "METHODE == 'TRI_DIAG'",
11450 PREC_ORTHO =SIMP(statut='f',typ='R',defaut= 1.E-12,val_min=0.E+0 ),
11451 NMAX_ITER_ORTHO =SIMP(statut='f',typ='I',defaut= 5,val_min=0 ),
11452 PREC_LANCZOS =SIMP(statut='f',typ='R',defaut= 1.E-8,val_min=0.E+0 ),
11453 NMAX_ITER_QR =SIMP(statut='f',typ='I',defaut= 30,val_min=0 ),
11455 b_jacobi =BLOC(condition = "METHODE == 'JACOBI'",
11456 PREC_BATHE =SIMP(statut='f',typ='R',defaut= 1.E-10,val_min=0.E+0 ),
11457 NMAX_ITER_BATHE =SIMP(statut='f',typ='I',defaut= 40,val_min=0 ),
11458 PREC_JACOBI =SIMP(statut='f',typ='R',defaut= 1.E-2,val_min=0.E+0 ),
11459 NMAX_ITER_JACOBI=SIMP(statut='f',typ='I',defaut= 12,val_min=0 ),
11461 b_sorensen =BLOC(condition = "METHODE == 'SORENSEN'",
11462 PREC_SOREN =SIMP(statut='f',typ='R',defaut= 0.E+0,val_min=0.E+0 ),
11463 NMAX_ITER_SOREN =SIMP(statut='f',typ='I',defaut= 20,val_min=0 ),
11464 PARA_ORTHO_SOREN=SIMP(statut='f',typ='R',defaut= 0.717,val_min=0.E+0 ),
11466 NPREC_SOLVEUR =SIMP(statut='f',typ='I',defaut= 8,val_min=0 ),
11467 NMAX_ITER_SHIFT =SIMP(statut='f',typ='I',defaut= 5,val_min=0 ),
11468 PREC_SHIFT =SIMP(statut='f',typ='R',defaut= 5.E-2,val_min=0.E+0 ),
11469 SEUIL_FREQ =SIMP(statut='f',typ='R',defaut= 1.E-2,val_min=0.E+0 ),
11473 b_dynam =BLOC(condition = "TYPE_RESU == 'DYNAMIQUE'",
11474 CALC_FREQ =FACT(statut='d',min=0,max=1,
11475 OPTION =SIMP(statut='f',typ='TXM',defaut="PLUS_PETITE",into=("PLUS_PETITE","BANDE","CENTRE"),
11476 fr="Choix de l option et par conséquent du shift du problème modal" ),
11477 b_plus_petite =BLOC(condition = "OPTION == 'PLUS_PETITE'",fr="Recherche des plus petites valeurs propres",
11478 NMAX_FREQ =SIMP(statut='f',typ='I',defaut= 10,val_min=0 ),
11480 b_centre =BLOC(condition = "OPTION == 'CENTRE'",
11481 fr="Recherche des valeurs propres les plus proches d une valeur donnée",
11482 FREQ =SIMP(statut='o',typ='R',min=1,max=1,
11483 fr="Fréquence autour de laquelle on cherche les fréquences propres"),
11484 AMOR_REDUIT =SIMP(statut='f',typ='R',max=1,),
11485 NMAX_FREQ =SIMP(statut='f',typ='I',defaut= 10,val_min=0 ),
11487 b_bande =BLOC(condition = "(OPTION == 'BANDE')",
11488 fr="Recherche des valeurs propres dans une bande donnée",
11489 FREQ =SIMP(statut='o',typ='R',min=2,max=2,
11490 fr="Valeur des deux fréquences délimitant la bande de recherche"),
11492 APPROCHE =SIMP(statut='f',typ='TXM',defaut="REEL",into=("REEL","IMAG"),
11493 fr="Choix du pseudo-produit scalaire pour la résolution du problème quadratique" ),
11494 regles=(EXCLUS('DIM_SOUS_ESPACE','COEF_DIM_ESPACE'),),
11495 DIM_SOUS_ESPACE =SIMP(statut='f',typ='I' ),
11496 COEF_DIM_ESPACE =SIMP(statut='f',typ='I' ),
11497 b_tri_diag =BLOC(condition = "METHODE == 'TRI_DIAG'",
11498 PREC_ORTHO =SIMP(statut='f',typ='R',defaut= 1.E-12,val_min=0.E+0 ),
11499 NMAX_ITER_ORTHO =SIMP(statut='f',typ='I',defaut= 5,val_min=0 ),
11500 PREC_LANCZOS =SIMP(statut='f',typ='R',defaut= 1.E-8,val_min=0.E+0 ),
11501 NMAX_ITER_QR =SIMP(statut='f',typ='I',defaut= 30,val_min=0 ),
11503 b_jacobi =BLOC(condition = "METHODE == 'JACOBI'",
11504 PREC_BATHE =SIMP(statut='f',typ='R',defaut= 1.E-10,val_min=0.E+0 ),
11505 NMAX_ITER_BATHE =SIMP(statut='f',typ='I',defaut= 40,val_min=0 ),
11506 PREC_JACOBI =SIMP(statut='f',typ='R',defaut= 1.E-2,val_min=0.E+0 ),
11507 NMAX_ITER_JACOBI=SIMP(statut='f',typ='I',defaut= 12,val_min=0 ),
11509 b_sorensen =BLOC(condition = "METHODE == 'SORENSEN'",
11510 PREC_SOREN =SIMP(statut='f',typ='R',defaut= 0.E+0,val_min=0.E+0 ),
11511 NMAX_ITER_SOREN =SIMP(statut='f',typ='I',defaut= 20,val_min=0 ),
11512 PARA_ORTHO_SOREN=SIMP(statut='f',typ='R',defaut= 0.717,val_min=0.E+0 ),
11514 NPREC_SOLVEUR =SIMP(statut='f',typ='I',defaut= 8,val_min=0 ),
11515 NMAX_ITER_SHIFT =SIMP(statut='f',typ='I',defaut= 5,val_min=0 ),
11516 PREC_SHIFT =SIMP(statut='f',typ='R',defaut= 5.E-2,val_min=0.E+0 ),
11517 SEUIL_FREQ =SIMP(statut='f',typ='R',defaut= 1.E-2,val_min=0.E+0 ),
11521 VERI_MODE =FACT(statut='d',min=0,max=1,
11522 STOP_ERREUR =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
11523 PREC_SHIFT =SIMP(statut='f',typ='R',defaut= 5.E-3,val_min=0.E+0 ),
11524 SEUIL =SIMP(statut='f',typ='R',defaut= 1.E-6,val_min=0.E+0,
11525 fr="Valeur limite admise pour l ereur a posteriori des modes" ),
11526 STURM =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
11528 STOP_FREQ_VIDE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
11529 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
11530 TITRE =SIMP(statut='f',typ='TXM',max='**'),
11532 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
11533 # CONFIGURATION MANAGEMENT OF EDF VERSION
11534 # ======================================================================
11535 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11536 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11537 # REDISTRIBUTION OF THIS FILE.
11538 # ======================================================================
11539 def mode_stat_prod(MODE_STAT,FORCE_NODALE,PSEUDO_MODE,**args):
11540 if (MODE_STAT != None) : return mode_stat_depl
11541 if (PSEUDO_MODE !=None) : return mode_stat_acce
11542 if (FORCE_NODALE != None) : return mode_stat_forc
11543 raise AsException("type de concept resultat non prevu")
11544 MODE_STATIQUE=OPER(nom="MODE_STATIQUE",op= 93,sd_prod=mode_stat_prod,
11545 fr="Calcul de modes statiques",
11546 docu="U4.52.14-e",reentrant='n',
11547 MATR_RIGI =SIMP(statut='o',typ=matr_asse_depl_r ),
11548 MATR_MASS =SIMP(statut='f',typ=matr_asse_depl_r ),
11549 regles=(UN_PARMI('MODE_STAT','FORCE_NODALE','PSEUDO_MODE'),),
11550 MODE_STAT =FACT(statut='f',min=01,max='**',
11551 regles=(UN_PARMI('TOUT','NOEUD','GROUP_NO'),
11552 UN_PARMI('TOUT_CMP','AVEC_CMP','SANS_CMP'),),
11553 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ,),
11554 NOEUD =SIMP(statut='f',typ=no,max='**'),
11555 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
11556 TOUT_CMP =SIMP(statut='f',typ='TXM',into=("OUI",) ,),
11557 AVEC_CMP =SIMP(statut='f',typ='TXM',max='**'),
11558 SANS_CMP =SIMP(statut='f',typ='TXM',max='**'),
11560 FORCE_NODALE =FACT(statut='f',min=01,max='**',
11561 regles=(UN_PARMI('TOUT','NOEUD','GROUP_NO'),
11562 UN_PARMI('TOUT_CMP','AVEC_CMP','SANS_CMP'),),
11563 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",), ),
11564 NOEUD =SIMP(statut='f',typ=no,max='**'),
11565 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
11566 TOUT_CMP =SIMP(statut='f',typ='TXM',into=("OUI",), ),
11567 AVEC_CMP =SIMP(statut='f',typ='TXM',max='**'),
11568 SANS_CMP =SIMP(statut='f',typ='TXM',max='**'),
11570 PSEUDO_MODE =FACT(statut='f',min=01,max='**',
11571 regles=(UN_PARMI('AXE','DIRECTION','TOUT','NOEUD','GROUP_NO' ),),
11572 AXE =SIMP(statut='f',typ='TXM',into=("X","Y","Z"),max=3),
11573 DIRECTION =SIMP(statut='f',typ='R',min=3,max=3),
11574 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",)),
11575 NOEUD =SIMP(statut='f',typ=no,max='**'),
11576 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
11577 b_dir =BLOC(condition = "DIRECTION != None",
11578 NOM_DIR =SIMP(statut='f',typ='TXM' ),),
11579 b_cmp =BLOC(condition="TOUT!= None or NOEUD!=None or GROUP_NO!=None",
11580 regles=(UN_PARMI('TOUT_CMP','AVEC_CMP','SANS_CMP'),),
11581 TOUT_CMP =SIMP(statut='f',typ='TXM',into=("OUI",) ),
11582 AVEC_CMP =SIMP(statut='f',typ='TXM',max='**'),
11583 SANS_CMP =SIMP(statut='f',typ='TXM',max='**'),
11586 TITRE =SIMP(statut='f',typ='TXM',max='**'),
11587 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2 ,) ),
11589 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
11590 # CONFIGURATION MANAGEMENT OF EDF VERSION
11591 # ======================================================================
11592 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11593 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11594 # REDISTRIBUTION OF THIS FILE.
11595 # ======================================================================
11596 MODI_BASE_MODALE=OPER(nom="MODI_BASE_MODALE",op= 149,sd_prod=mode_meca,
11597 docu="U4.66.21-c",reentrant='f',
11598 # la commande modi_base _modale : reentrant = f ou o
11599 regles=(EXCLUS('AMOR_UNIF','AMOR_REDUIT', ),),
11600 BASE =SIMP(statut='o',typ=mode_meca ),
11601 BASE_ELAS_FLUI =SIMP(statut='o',typ=melasflu ),
11602 NUME_VITE_FLUI =SIMP(statut='o',typ='I' ),
11603 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
11604 AMOR_REDUIT =SIMP(statut='f',typ='R',max='**'),
11605 AMOR_UNIF =SIMP(statut='f',typ='R' ),
11606 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
11607 TITRE =SIMP(statut='f',typ='TXM',max='**'),
11609 #& MODIF COMMANDE DATE 29/01/2002 AUTEUR CIBHHPD D.NUNEZ
11610 # CONFIGURATION MANAGEMENT OF EDF VERSION
11611 # ======================================================================
11612 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11613 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11614 # REDISTRIBUTION OF THIS FILE.
11615 # ======================================================================
11616 # RESPONSABLE G8BHHXD X.DESROCHES
11617 MODI_MAILLAGE=OPER(nom="MODI_MAILLAGE",op= 154,sd_prod=maillage,
11618 fr="Modification de la connectivité de groupes de mailles 2D ou 3D affectées à la modélisation de contact",
11619 docu="U4.23.04-c",reentrant='o',
11620 regles=(UN_PARMI('ORIE_CONTACT','DEFORME','EQUE_PIQUA','ORIE_PEAU_2D',
11621 'ORIE_PEAU_3D','ORIE_NORM_COQUE','PLAQ_TUBE','MODI_MAILLE'),
11622 EXCLUS('EQUE_PIQUA','PLAQ_TUBE'),
11623 EXCLUS('EQUE_PIQUA','TUBE_COUDE'),),
11624 MAILLAGE =SIMP(statut='o',typ=maillage ),
11626 ORIE_CONTACT =FACT(statut='f',min=01,max=01,
11627 GROUP_MA =SIMP(statut='o',typ=grma,max='**'),
11630 DEFORME =FACT(statut='f',min=01,max=01,
11631 OPTION =SIMP(statut='o',typ='TXM',into=("TRAN","TRAN_APPUI") ),
11632 DEPL =SIMP(statut='o',typ=cham_no_depl_r ),
11633 b_deform =BLOC(condition = "OPTION=='TRAN_APPUI'",
11634 GROUP_NO_APPUI = SIMP(statut='o',typ=grno,max='**' ),
11635 GROUP_NO_STRU = SIMP(statut='o',typ=grno,max='**' ),),
11638 EQUE_PIQUA =FACT(statut='f',min=01,max=01,
11639 GROUP_NO =SIMP(statut='o',typ=grno),
11640 E_BASE =SIMP(statut='o',typ='R' ),
11641 DEXT_BASE =SIMP(statut='o',typ='R' ),
11642 L_BASE =SIMP(statut='o',typ='R' ),
11643 L_CHANF =SIMP(statut='o',typ='R' ),
11644 H_SOUD =SIMP(statut='o',typ='R' ),
11645 ANGL_SOUD =SIMP(statut='o',typ='R' ),
11646 JEU_SOUD =SIMP(statut='o',typ='R' ),
11647 E_CORP =SIMP(statut='o',typ='R' ),
11648 DEXT_CORP =SIMP(statut='o',typ='R' ),
11649 AZIMUT =SIMP(statut='o',typ='R' ),
11650 RAFF_MAIL =SIMP(statut='o',typ='TXM' ),
11651 X_MAX =SIMP(statut='o',typ='R' ),
11653 ORIE_PEAU_2D =FACT(statut='f',min=01,max='**',
11654 GROUP_MA =SIMP(statut='o',typ=grma,max='**'),
11656 ORIE_PEAU_3D =FACT(statut='f',min=01,max='**',
11657 GROUP_MA =SIMP(statut='o',typ=grma,max='**'),
11659 ORIE_NORM_COQUE =FACT(statut='f',min=01,max='**',
11660 regles=(EXCLUS('NOEUD','GROUP_NO'),
11661 PRESENT_PRESENT('NOEUD','VECT_NORM'),
11662 PRESENT_PRESENT('GROUP_NO','VECT_NORM'),),
11663 GROUP_MA =SIMP(statut='o',typ=grma,max='**'),
11664 VECT_NORM =SIMP(statut='f',typ='R',max=03),
11665 NOEUD =SIMP(statut='f',typ=no),
11666 GROUP_NO =SIMP(statut='f',typ=grno),
11668 b_modele =BLOC(condition = "(ORIE_PEAU_2D != None) or (ORIE_PEAU_3D != None) or(ORIE_NORM_COQUE != None)",
11669 MODELE =SIMP(statut='o',typ=modele ),
11671 PLAQ_TUBE =FACT(statut='f',min=01,max=01,
11672 DEXT =SIMP(statut='o',typ='R' ),
11673 EPAIS =SIMP(statut='o',typ='R' ),
11674 L_TUBE_P1 =SIMP(statut='o',typ='R' ),
11675 AZIMUT =SIMP(statut='f',typ='R',defaut= 90. ),
11676 COUTURE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON",) ),
11678 TUBE_COUDE =FACT(statut='f',min=01,max=01,
11679 ANGLE =SIMP(statut='o',typ='R' ),
11680 R_CINTR =SIMP(statut='o',typ='R' ),
11681 L_TUBE_P1 =SIMP(statut='o',typ='R' ),
11683 MODI_MAILLE =FACT(statut='f',min=01,max=01,
11684 regles=(AU_MOINS_UN('GROUP_MA_FOND','MAILLE_FOND','GROUP_NO_FOND','NOEUD_FOND'),),
11685 OPTION =SIMP(statut='o',typ='TXM',into=("NOEUD_QUART",) ),
11686 GROUP_MA_FOND =SIMP(statut='f',typ=grma,max='**'),
11687 MAILLE_FOND =SIMP(statut='f',typ=ma,max='**'),
11688 GROUP_NO_FOND =SIMP(statut='f',typ=grno,max='**'),
11689 NOEUD_FOND =SIMP(statut='f',typ=no,max='**'),
11691 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
11693 #& MODIF COMMANDE DATE 15/01/2002 AUTEUR CIBHHLV L.VIVAN
11694 # CONFIGURATION MANAGEMENT OF EDF VERSION
11695 # ======================================================================
11696 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11697 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11698 # REDISTRIBUTION OF THIS FILE.
11699 # ======================================================================
11700 MODI_OBSTACLE=OPER(nom="MODI_OBSTACLE",op=182,sd_prod=obstacle,
11701 fr=" ",docu="U4.44.22-a",reentrant='f',
11702 regles=(PRESENT_ABSENT('R_MOBILE','CRAYON'),
11703 PRESENT_PRESENT('TUBE_NEUF','TABL_USURE'),
11704 PRESENT_PRESENT('V_USUR_TUBE','V_USUR_OBST'),),
11705 TUBE_NEUF =SIMP(statut='f',typ='TXM',into=("OUI",) ),
11706 V_USUR_TUBE =SIMP(statut='f',typ='R',max='**'),
11707 V_USUR_OBST =SIMP(statut='f',typ='R',max='**'),
11708 TABL_USURE =SIMP(statut='f',typ=tabl_post_usur),
11709 INST =SIMP(statut='f',typ='R'),
11710 OBSTACLE =SIMP(statut='f',typ=obstacle),
11711 GUIDE =SIMP(statut='o',typ=obstacle),
11712 CRAYON =SIMP(statut='f',typ=obstacle),
11713 R_MOBILE =SIMP(statut='f',typ='R'),
11714 PERCEMENT =SIMP(statut='f',typ='R',defaut=1),
11715 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
11717 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
11718 # CONFIGURATION MANAGEMENT OF EDF VERSION
11719 # ======================================================================
11720 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11721 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11722 # REDISTRIBUTION OF THIS FILE.
11723 # ======================================================================
11724 # RESPONSABLE JMBHH01 J.M.PROIX
11725 def modi_repere_prod(RESULTAT,**args):
11726 if AsType(RESULTAT) == evol_elas : return evol_elas
11727 if AsType(RESULTAT) == evol_noli : return evol_noli
11728 if AsType(RESULTAT) == evol_ther : return evol_ther
11729 if AsType(RESULTAT) == dyna_trans : return dyna_trans
11730 if AsType(RESULTAT) == dyna_harmo : return dyna_harmo
11731 if AsType(RESULTAT) == mode_meca : return mode_meca
11732 if AsType(RESULTAT) == mode_flamb : return mode_flamb
11733 if AsType(RESULTAT) == mult_elas : return mult_elas
11734 if AsType(RESULTAT) == base_modale : return base_modale
11735 raise AsException("type de concept resultat non prevu")
11737 MODI_REPERE=OPER(nom="MODI_REPERE",op=191,sd_prod=modi_repere_prod,docu="U4.74.01-a1",reentrant='n',
11738 fr="Impression des resultats dans un repere cylindrique",
11739 RESULTAT =SIMP(statut='o',typ=(evol_elas,dyna_trans,dyna_harmo,mode_meca,
11740 evol_noli,mult_elas,
11741 evol_ther,base_modale,mode_flamb) ),
11742 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','FREQ','NUME_MODE',
11743 'NOEUD_CMP','LIST_INST','LIST_FREQ','NOM_CAS'),),
11744 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
11745 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
11746 NUME_MODE =SIMP(statut='f',typ='I',max='**'),
11747 NOEUD_CMP =SIMP(statut='f',typ='TXM',max='**'),
11748 NOM_CAS =SIMP(statut='f',typ='TXM' ),
11750 INST =SIMP(statut='f',typ='R',max='**'),
11751 FREQ =SIMP(statut='f',typ='R',max='**'),
11752 LIST_INST =SIMP(statut='f',typ=listr8),
11753 LIST_FREQ =SIMP(statut='f',typ=listr8),
11755 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3 ),
11756 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU",),),
11758 MODI_CHAM =FACT(statut='o',min=01,max='**',
11759 TYPE_CHAM =SIMP(statut='o',typ='TXM', max=1,
11760 into=("VECT_2D","VECT_3D","TORS_3D","TENS_2D","TENS_3D"),),
11761 NOM_CHAM =SIMP(statut='o',typ='TXM',max=1 ),
11762 b_vect_2d =BLOC(condition = "TYPE_CHAM=='VECT_2D'",
11763 NOM_CMP =SIMP(statut='o',typ='TXM',min=2,max=2 ),),
11764 b_vect_3d =BLOC(condition = "TYPE_CHAM=='VECT_3D'",
11765 NOM_CMP =SIMP(statut='o',typ='TXM',min=3,max=3 ),),
11766 b_tors_3d =BLOC(condition = "TYPE_CHAM=='TORS_3D'",
11767 NOM_CMP =SIMP(statut='o',typ='TXM',min=6,max=6 ),),
11768 b_tens_2d =BLOC(condition = "TYPE_CHAM=='TENS_2D'",
11769 NOM_CMP =SIMP(statut='o',typ='TXM',min=4,max=4 ),),
11770 b_tens_3d =BLOC(condition = "TYPE_CHAM=='TENS_3D'",
11771 NOM_CMP =SIMP(statut='o',typ='TXM',min=6,max=6 ),),
11773 DEFI_REPERE =FACT(statut='o',min=1,max=1,
11774 regles=(UN_PARMI('ANGL_NAUT','ORIGINE'),),
11775 REPERE =SIMP(statut='f',typ='TXM',defaut="UTILISATEUR",
11776 into=("UTILISATEUR","CYLINDRIQUE"),),
11777 ANGL_NAUT =SIMP(statut='f',typ='R',min=1,max=3),
11778 ORIGINE =SIMP(statut='f',typ='R',min=2,max=3),
11779 AXE_Z =SIMP(statut='f',typ='R',min=3,max=3),
11781 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
11783 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
11784 # CONFIGURATION MANAGEMENT OF EDF VERSION
11785 # ======================================================================
11786 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11787 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11788 # REDISTRIBUTION OF THIS FILE.
11789 # ======================================================================
11790 def norm_mode_prod(MODE,**args ):
11791 if AsType(MODE) == mode_meca : return mode_meca
11792 if AsType(MODE) == mode_meca_c : return mode_meca_c
11793 if AsType(MODE) == mode_flamb : return mode_flamb
11794 raise AsException("type de concept resultat non prevu")
11796 NORM_MODE=OPER(nom="NORM_MODE",op= 37,sd_prod=norm_mode_prod,
11797 fr="Normalisation de modes propres",
11798 docu="U4.52.11-e",reentrant='f',
11799 regles=(UN_PARMI('NORME','NOEUD','AVEC_CMP','SANS_CMP'),),
11800 MODE =SIMP(statut='o',typ=(mode_meca,mode_flamb) ),
11801 NORME =SIMP(statut='f',typ='TXM',fr="Norme prédéfinie : masse généralisée, euclidienne,...",
11802 into=("MASS_GENE","RIGI_GENE","EUCL","EUCL_TRAN","TRAN","TRAN_ROTA") ),
11803 NOEUD =SIMP(statut='f',typ=no, fr="Composante donnée d un noeud spécifié égale à 1"),
11804 b_noeud =BLOC(condition = "NOEUD != None",
11805 NOM_CMP =SIMP(statut='o',typ='TXM' ),
11807 AVEC_CMP =SIMP(statut='f',typ='TXM',max='**'),
11808 SANS_CMP =SIMP(statut='f',typ='TXM',max='**'),
11809 MASS_INER =SIMP(statut='f',typ=tabl_mass_iner ),
11810 MODE_SIGNE =FACT(statut='f',min=00,max=01,fr="Imposer un signe sur une des composantes des modes",
11811 NOEUD =SIMP(statut='o',typ=no,fr="Noeud ou sera imposé le signe"),
11812 NOM_CMP =SIMP(statut='o',typ='TXM',fr="Composante du noeud ou sera imposé le signe" ),
11813 SIGNE =SIMP(statut='f',typ='TXM',defaut="POSITIF",into=("NEGATIF","POSITIF"),
11814 fr="Choix du signe" ),
11816 TITRE =SIMP(statut='f',typ='TXM',max='**'),
11817 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
11819 #& MODIF COMMANDE DATE 22/01/2002 AUTEUR CIBHHPD D.NUNEZ
11820 # CONFIGURATION MANAGEMENT OF EDF VERSION
11821 # ======================================================================
11822 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11823 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11824 # REDISTRIBUTION OF THIS FILE.
11825 # ======================================================================
11826 # RESPONSABLE VABHHTS J.PELLET
11827 NUME_DDL=OPER(nom="NUME_DDL",op=11,sd_prod=nume_ddl,docu="U4.61.11-f",reentrant='n',
11828 fr="Etablissement de la numérotation des ddl avec ou sans renumérotation et du stockage de la matrice",
11829 regles=(UN_PARMI('MATR_RIGI','MODELE'),),
11830 MATR_RIGI =SIMP(statut='f',typ=(matr_elem_depl_r ,matr_elem_depl_c,
11831 matr_elem_temp_r,matr_elem_pres_c),max=100 ),
11832 MODELE =SIMP(statut='f',typ=modele ),
11833 b_modele =BLOC(condition = "MODELE != None",
11834 CHARGE =SIMP(statut='f',max='**',typ=(char_meca,char_ther,char_acou, ),),
11836 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
11837 b_mult_front =BLOC(condition="METHODE=='MULT_FRONT'",fr="paramètres associés à la méthode multifrontale",
11838 RENUM =SIMP(statut='f',typ='TXM',into=("MD","MDA","METIS"),defaut="METIS" ),
11840 b_ldlt =BLOC(condition="METHODE=='LDLT'",fr="paramètres associés à la méthode LDLT",
11841 RENUM =SIMP(statut='f',typ='TXM',into=("RCMK","SANS"),defaut="RCMK" ),
11843 b_gcpc =BLOC(condition="METHODE=='GCPC'",fr="paramètres associés à la méthode gradient conjugué",
11844 RENUM =SIMP(statut='f',typ='TXM',into=("RCMK","SANS"),defaut="RCMK" ),
11846 INFO =SIMP(statut='f',typ='I',into=(1,2)),
11848 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
11849 # CONFIGURATION MANAGEMENT OF EDF VERSION
11850 # ======================================================================
11851 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11852 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11853 # REDISTRIBUTION OF THIS FILE.
11854 # ======================================================================
11855 NUME_DDL_GENE=OPER(nom="NUME_DDL_GENE",op= 127,sd_prod=nume_ddl_gene,
11856 fr="Etablissement de la numérotation des ddl d un modèle établi en coordonnées généralisées",
11857 docu="U4.65.03-d",reentrant='n',
11858 MODELE_GENE =SIMP(statut='f',typ=modele_gene ),
11859 BASE =SIMP(statut='f',typ=(mode_meca,base_modale,mode_gene ) ),
11860 NB_VECT =SIMP(statut='f',typ='I',defaut= 9999 ),
11861 STOCKAGE =SIMP(statut='f',typ='TXM',defaut="LIGN_CIEL",into=("PLEIN","DIAG","LIGN_CIEL") ),
11863 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
11864 # CONFIGURATION MANAGEMENT OF EDF VERSION
11865 # ======================================================================
11866 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11867 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11868 # REDISTRIBUTION OF THIS FILE.
11869 # ======================================================================
11870 POST_DYNA_ALEA=OPER(nom="POST_DYNA_ALEA",op= 132,sd_prod=tabl_post_alea,
11871 fr="Traitements statistiques de résultats de type interspectre et impression sur fichiers",
11872 docu="U4.84.04-d",reentrant='n',
11873 regles=(UN_PARMI('NOEUD_I','NUME_ORDRE_I','OPTION'),),
11874 INTE_SPEC =SIMP(statut='o',typ=tabl_intsp ),
11875 NUME_VITE_FLUI =SIMP(statut='f',typ='I' ),
11876 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
11877 NUME_ORDRE_I =SIMP(statut='f',typ='I',max='**' ),
11878 NOEUD_I =SIMP(statut='f',typ=no,max='**'),
11879 OPTION =SIMP(statut='f',typ='TXM',into=("DIAG",) ),
11880 b_nume_ordre_i =BLOC(condition = "NUME_ORDRE_I != None",
11881 NUME_ORDRE_J =SIMP(statut='o',typ='I',max='**' ),
11883 b_noeud_i =BLOC(condition = "NOEUD_I != None",
11884 NOEUD_J =SIMP(statut='o',typ=no,max='**'),
11885 NOM_CMP_I =SIMP(statut='o',typ='TXM',max='**' ),
11886 NOM_CMP_J =SIMP(statut='o',typ='TXM',max='**' ),
11888 DEPASSEMENT =FACT(statut='f',min=01,max='**',
11889 fr="Loi de dépassement d un seuil pendant une durée donnée",
11890 regles=(ENSEMBLE('VALE_MIN','VALE_MAX'),),
11891 VALE_MIN =SIMP(statut='f',typ='R' ),
11892 VALE_MAX =SIMP(statut='f',typ='R' ),
11893 PAS =SIMP(statut='f',typ='R' ),
11894 DUREE =SIMP(statut='f',typ='R',defaut= 1. ),
11896 RAYLEIGH =FACT(statut='f',min=01,max='**',
11897 fr="Densité de probabilité de pic positif, loi adaptée à des signaux à bande étroite",
11898 regles=(ENSEMBLE('VALE_MIN','VALE_MAX'),),
11899 VALE_MIN =SIMP(statut='f',typ='R' ),
11900 VALE_MAX =SIMP(statut='f',typ='R' ),
11901 PAS =SIMP(statut='f',typ='R' ),
11903 GAUSS =FACT(statut='f',min=01,max='**',
11904 fr="Densité de probabilité de pic positif, loi normale adaptée à des signaux large bande",
11905 regles=(ENSEMBLE('VALE_MIN','VALE_MAX'),),
11906 VALE_MIN =SIMP(statut='f',typ='R' ),
11907 VALE_MAX =SIMP(statut='f',typ='R' ),
11908 PAS =SIMP(statut='f',typ='R' ),
11910 VANMARCKE =FACT(statut='f',min=01,max='**',
11911 fr="Probabilité de non dépassement de seuil pendant une durée donnée (analyse sismique)",
11912 regles=(ENSEMBLE('VALE_MIN','VALE_MAX'),),
11913 VALE_MIN =SIMP(statut='f',typ='R' ),
11914 VALE_MAX =SIMP(statut='f',typ='R' ),
11915 PAS =SIMP(statut='f',typ='R' ),
11916 DUREE =SIMP(statut='f',typ='R',defaut= 10. ),
11918 MOMENT =SIMP(statut='f',typ='I',max='**',fr="Moments spectraux en complément des cinq premiers" ),
11919 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
11920 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
11922 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
11923 # CONFIGURATION MANAGEMENT OF EDF VERSION
11924 # ======================================================================
11925 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11926 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11927 # REDISTRIBUTION OF THIS FILE.
11928 # ======================================================================
11929 POST_DYNA_MODA_T=OPER(nom="POST_DYNA_MODA_T",op= 130,sd_prod=tabl_post_dyna,
11930 fr="Post-traitements en coordonnées généralisées issus de DYNA_TRAN_MODAL",
11931 docu="U4.84.02-d",reentrant='n',
11932 regles=(UN_PARMI('CHOC','RELA_EFFO_DEPL', ),),
11933 RESU_GENE =SIMP(statut='o',typ=tran_gene ),
11934 CHOC =FACT(statut='f',min=01,max='**',
11935 fr="Analyse des non linéarités de choc",
11936 INST_INIT =SIMP(statut='f',typ='R',defaut= -1. ),
11937 INST_FIN =SIMP(statut='f',typ='R',defaut= 999. ),
11938 NB_BLOC =SIMP(statut='f',typ='I',defaut= 1 ),
11939 SEUIL_FORCE =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
11940 DUREE_REPOS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
11941 OPTION =SIMP(statut='f',typ='TXM',defaut="USURE",into=("IMPACT","USURE") ),
11942 NB_CLASSE =SIMP(statut='f',typ='I',defaut= 10 ),
11944 RELA_EFFO_DEPL =FACT(statut='f',min=01,max=01,
11945 fr="Analyse des relationsnon linéaires effort-déplacement",
11946 NOEUD =SIMP(statut='o',typ=no),
11947 NOM_CMP =SIMP(statut='o',typ='TXM' ),
11949 INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
11950 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
11952 #& MODIF COMMANDE DATE 30/01/2002 AUTEUR VABHHTS J.TESELET
11953 # CONFIGURATION MANAGEMENT OF EDF VERSION
11954 # ======================================================================
11955 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
11956 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
11957 # REDISTRIBUTION OF THIS FILE.
11958 # ======================================================================
11959 # RESPONSABLE G8BHHXD X.DESROCHES
11960 def post_elem_prod( MASS_INER,ENER_POT,ENER_CIN,ENER_EXT,WEIBULL,
11961 CARA_GEOM,CARA_POUTRE,RICE_TRACEY,CHAR_LIMITE,
11962 INDIC_ENER,INDIC_SEUIL,ENER_ELAS,ENER_TOTALE,
11963 AIRE_INTERNE,**args ):
11964 if MASS_INER != None : return tabl_mass_iner
11965 if ENER_POT != None : return tabl_ener_pot
11966 if ENER_CIN != None : return tabl_ener_cin
11967 if ENER_EXT != None : return tabl_ener_ext
11968 if WEIBULL != None : return tabl_weibull
11969 if CARA_GEOM != None : return tabl_cara_geom
11970 if CARA_POUTRE != None : return tabl_cara_geom
11971 if RICE_TRACEY != None : return tabl_rice_tracey
11972 if CHAR_LIMITE != None : return tabl_char_limite
11973 if INDIC_ENER != None : return tabl_indic_ener
11974 if INDIC_SEUIL != None : return tabl_indic_seuil
11975 if ENER_ELAS != None : return tabl_ener_elas
11976 if ENER_TOTALE != None : return tabl_ener_totale
11977 if AIRE_INTERNE != None : return tabl_aire_int
11978 raise AsException("type de concept resultat non prevu")
11980 POST_ELEM=OPER(nom="POST_ELEM",op=107,sd_prod=post_elem_prod,docu="U4.81.22-d1",reentrant='f',
11981 fr="Calcul de quantités globales (masse, inerties, énergie, ...) sur tout ou partie du modèle",
11982 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','FREQ','NUME_MODE',
11983 'NOEUD_CMP','LIST_ORDRE','LIST_INST','LIST_FREQ','NOM_CAS'),
11984 EXCLUS('CHAM_GD','RESULTAT'),
11985 UN_PARMI('MASS_INER', 'ENER_POT', 'ENER_CIN','ENER_EXT',
11986 'WEIBULL', 'RICE_TRACEY', 'CARA_GEOM','CHAR_LIMITE',
11987 'CARA_POUTRE', 'INDIC_ENER', 'INDIC_SEUIL',
11988 'AIRE_INTERNE','ENER_ELAS','ENER_TOTALE'),
11989 PRESENT_PRESENT( 'MASS_INER', 'MODELE' ),
11990 PRESENT_PRESENT( 'CARA_GEOM', 'MODELE' ),
11991 PRESENT_PRESENT( 'AIRE_INTERNE', 'MODELE' ),
11992 PRESENT_PRESENT( 'CARA_POUTRE', 'MODELE' ),
11993 PRESENT_PRESENT( 'ENER_POT', 'MODELE', 'CHAM_MATER' ),
11994 PRESENT_PRESENT( 'ENER_CIN', 'MODELE', 'CHAM_MATER' ),
11995 PRESENT_PRESENT( 'WEIBULL', 'MODELE', 'CHAM_MATER' ),
11996 PRESENT_PRESENT( 'RICE_TRACEY', 'MODELE', 'CHAM_MATER' ),
11997 PRESENT_PRESENT( 'INDIC_ENER', 'MODELE', 'CHAM_MATER' ),
11998 PRESENT_PRESENT( 'INDIC_SEUIL', 'MODELE', 'CHAM_MATER' ),
11999 PRESENT_PRESENT( 'ENER_ELAS', 'MODELE', 'CHAM_MATER' ),
12000 PRESENT_PRESENT( 'ENER_TOTALE', 'MODELE', 'CHAM_MATER' ),
12001 PRESENT_PRESENT( 'CHAR_LIMITE', 'MODELE', 'CHAM_MATER' ),
12003 MODELE =SIMP(statut='f',typ=modele),
12004 CHAM_MATER =SIMP(statut='f',typ=cham_mater),
12005 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
12006 CHARGE =SIMP(statut='f',typ=(char_meca,char_ther,char_acou),max='**' ),
12007 MODE_FOURIER =SIMP(statut='f',typ='I',defaut=0),
12008 NUME_COUCHE =SIMP(statut='f',typ='I',defaut=1),
12009 NIVE_COUCHE =SIMP(statut='f',typ='TXM',defaut="MOY",into=("INF","SUP","MOY"),),
12010 ANGLE =SIMP(statut='f',typ='I',defaut=0),
12011 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
12012 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
12013 GEOMETRIE =SIMP(statut='f',typ='TXM',defaut="INITIALE",into=("INITIALE","DEFORMEE")),
12014 CHAM_GD =SIMP(statut='f',typ=(cham_no_depl_r,cham_no_temp_r,cham_elem_ener_r) ),
12015 RESULTAT =SIMP(statut='f',typ=(mode_meca,evol_elas,evol_ther,evol_noli,mult_elas,
12016 fourier_elas,dyna_trans) ),
12017 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12018 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
12019 LIST_ORDRE =SIMP(statut='f',typ=listis),
12020 INST =SIMP(statut='f',typ='R',max='**'),
12021 LIST_INST =SIMP(statut='f',typ=listr8),
12022 FREQ =SIMP(statut='f',typ='R',max='**'),
12023 LIST_FREQ =SIMP(statut='f',typ=listr8),
12024 NUME_MODE =SIMP(statut='f',typ='I',max='**'),
12025 NOEUD_CMP =SIMP(statut='f',typ='TXM',max='**'),
12026 NOM_CAS =SIMP(statut='f',typ='TXM',max='**'),
12027 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3),
12028 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU")),
12030 MASS_INER =FACT(statut='f',min=1,max='**',
12031 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),),
12032 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12033 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12034 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12035 ORIG_INER =SIMP(statut='f',typ='R',min=3,max=3 ),
12038 ENER_POT =FACT(statut='f',min=1,max='**',
12039 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),),
12040 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12041 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12042 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12045 ENER_CIN =FACT(statut='f',min=1,max='**',
12046 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),),
12047 OPTION =SIMP(statut='f',typ='TXM',into=("MASS_MECA","MASS_MECA_DIAG"),
12048 defaut="MASS_MECA" ),
12049 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12050 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12051 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12054 WEIBULL =FACT(statut='f',min=1,max='**',
12055 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),),
12056 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12057 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12058 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12059 OPTION =SIMP(statut='f',typ='TXM',defaut="SIGM_ELGA",into=("SIGM_ELGA","SIGM_ELMOY")),
12060 CORR_PLAST =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
12061 COEF_MULT =SIMP(statut='f',typ='R',defaut=1.),
12064 RICE_TRACEY =FACT(statut='f',min=1,max='**',
12065 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),),
12066 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12067 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12068 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12069 OPTION =SIMP(statut='f',typ='TXM',defaut="SIGM_ELGA",into=("SIGM_ELGA","SIGM_ELMOY")),
12070 LOCAL =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON")),
12073 INDIC_ENER =FACT(statut='f',min=1,max='**',
12074 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),),
12075 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12076 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12077 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12080 ENER_ELAS =FACT(statut='f',min=1,max='**',
12081 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),),
12082 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12083 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12084 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12087 ENER_TOTALE =FACT(statut='f',min=1,max='**',
12088 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),),
12089 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12090 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12091 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12094 ENER_EXT =FACT(statut='f',min=00,max=01,
12095 TOUT =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI",) ),
12098 CHAR_LIMITE =FACT(statut='f',min=00,max=01,
12099 CHAR_CSTE = SIMP(statut='f',typ='TXM',into=("OUI","NON"),defaut="NON")
12102 INDIC_SEUIL =FACT(statut='f',min=1,max='**',
12103 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),),
12104 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12105 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12106 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12109 CARA_GEOM =FACT(statut='f',min=1,max='**',
12110 regles=(AU_MOINS_UN('TOUT','GROUP_MA','MAILLE'),),
12111 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12112 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12113 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12114 SYME_X =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
12115 SYME_Y =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
12116 ORIG_INER =SIMP(statut='f',typ='R',min=2,max=2),
12119 CARA_POUTRE =FACT(statut='f',min=1,max='**',
12120 regles=(AU_MOINS_UN('TOUT','GROUP_MA'),
12121 ENSEMBLE('LONGUEUR','LIAISON','MATERIAU'),),
12122 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12123 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12124 GROUP_MA_INTE =SIMP(statut='f',typ=grma,max='**'),
12125 CARA_GEOM =SIMP(statut='f',typ=tabl_cara_geom),
12126 LAPL_PHI =SIMP(statut='f',typ=evol_ther),
12127 LAPL_PHI_Y =SIMP(statut='f',typ=evol_ther),
12128 LAPL_PHI_Z =SIMP(statut='f',typ=evol_ther),
12129 LIAISON =SIMP(statut='f',typ='TXM',into=("ROTULE","ENCASTREMENT")),
12130 LONGUEUR =SIMP(statut='f',typ='R'),
12131 MATERIAU =SIMP(statut='f',typ=mater),
12132 OPTION =SIMP(statut='f',typ='TXM',into=("CARA_TORSION","CARA_CISAILLEMENT","CARA_GAUCHI") ),
12135 AIRE_INTERNE =FACT(statut='f',min=1,max='**',
12136 GROUP_MA_BORD =SIMP(statut='o',typ=grma,max='**'),
12139 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
12140 # CONFIGURATION MANAGEMENT OF EDF VERSION
12141 # ======================================================================
12142 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12143 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12144 # REDISTRIBUTION OF THIS FILE.
12145 # ======================================================================
12146 POST_FATI_ALEA=OPER(nom="POST_FATI_ALEA",op=170,sd_prod=tabl_post_f_alea,docu="U4.84.03-c",reentrant='n',
12147 fr="Calcul du dommage subi par une structure soumise à unesollicitation de type aléatoire",
12148 regles=(ENSEMBLE('MOMENT_SPEC_0','MOMENT_SPEC_2'),
12149 PRESENT_PRESENT( 'MOMENT_SPEC_4','MOMENT_SPEC_0'),
12150 UN_PARMI('TABL_POST_ALEA','MOMENT_SPEC_0'), ),
12151 MOMENT_SPEC_0 =SIMP(statut='f',typ='R'),
12152 MOMENT_SPEC_2 =SIMP(statut='f',typ='R'),
12153 MOMENT_SPEC_4 =SIMP(statut='f',typ='R'),
12154 TABL_POST_ALEA =SIMP(statut='f',typ=tabl_post_alea),
12155 COMPTAGE =SIMP(statut='o',typ='TXM',into=("PIC","NIVEAU")),
12156 DUREE =SIMP(statut='f',typ='R',defaut= 1.),
12157 CORR_KE =SIMP(statut='f',typ='TXM',into=("RCCM",)),
12158 DOMMAGE =SIMP(statut='o',typ='TXM',into=("WOHLER",)),
12159 MATER =SIMP(statut='o',typ=mater),
12160 TITRE =SIMP(statut='f',typ='TXM',max='**'),
12162 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
12163 # CONFIGURATION MANAGEMENT OF EDF VERSION
12164 # ======================================================================
12165 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12166 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12167 # REDISTRIBUTION OF THIS FILE.
12168 # ======================================================================
12169 POST_FATIGUE=OPER(nom="POST_FATIGUE",op=136,sd_prod=tabl_post_fatig,docu="U4.83.01-c",reentrant='n',
12170 fr="Calcul du dommage subi par une structure soumise à une histoire de chargement",
12172 CHARGEMENT = SIMP(statut='o',typ='TXM',into=("UNIAXIAL","PERIODIQUE","QUELCONQUE")),
12174 b_uniaxial = BLOC( condition = "CHARGEMENT=='UNIAXIAL'",
12175 regles=(PRESENT_PRESENT('CORR_KE','MATER'),
12176 PRESENT_PRESENT('CORR_SIGM_MOYE','MATER'),
12177 PRESENT_PRESENT('DOMMAGE','MATER'),),
12178 HISTOIRE = FACT(statut='o',min=1,max=1,
12179 regles=(UN_PARMI('SIGM','EPSI'),),
12180 SIGM = SIMP(statut='f',typ=fonction),
12181 EPSI = SIMP(statut='f',typ=fonction),),
12182 COMPTAGE = SIMP(statut='o',typ='TXM',into=("RAINFLOW","RCCM","NATUREL")),
12183 DELTA_OSCI = SIMP(statut='f',typ='R',defaut= 0.0E+0),
12184 COEF_MULT = FACT(statut='f',min=1,max=1,
12185 KT = SIMP(statut='o',typ='R'),),
12186 CORR_KE = SIMP(statut='f',typ='TXM',into=("RCCM",)),
12187 DOMMAGE = SIMP(statut='f',typ='TXM',into=("WOHLER","MANSON_COFFIN",
12188 "TAHERI_MANSON","TAHERI_MIXTE")),
12189 MATER = SIMP(statut='f',typ=mater),
12190 CORR_SIGM_MOYE = SIMP(statut='f',typ='TXM',into=("GOODMAN","GERBER")),
12191 TAHERI_NAPPE = SIMP(statut='f',typ=fonction),
12192 TAHERI_FONC = SIMP(statut='f',typ=fonction),
12193 CUMUL = SIMP(statut='f',typ='TXM',into=("LINEAIRE",)),
12196 b_periodique = BLOC( condition = "CHARGEMENT=='PERIODIQUE'",
12197 HISTOIRE = FACT(statut='o',min=1,max=1,
12198 SIGM_XX = SIMP(statut='o',typ=fonction),
12199 SIGM_YY = SIMP(statut='o',typ=fonction),
12200 SIGM_ZZ = SIMP(statut='o',typ=fonction),
12201 SIGM_XY = SIMP(statut='o',typ=fonction),
12202 SIGM_XZ = SIMP(statut='f',typ=fonction),
12203 SIGM_YZ = SIMP(statut='f',typ=fonction),),
12204 CRITERE = SIMP(statut='o',typ='TXM',into=("CROSSLAND","PAPADOPOULOS")),
12205 DOMMAGE = SIMP(statut='f',typ='TXM',into=("WOHLER",)),
12206 MATER = SIMP(statut='o',typ=mater),
12207 COEF_CORR = SIMP(statut='f',typ='R'),
12210 b_quelconque = BLOC( condition = "CHARGEMENT=='QUELCONQUE'",
12211 HISTOIRE = FACT(statut='o',min=1,max=1,
12212 SIGM_XX = SIMP(statut='o',typ=fonction),
12213 SIGM_YY = SIMP(statut='o',typ=fonction),
12214 SIGM_ZZ = SIMP(statut='o',typ=fonction),
12215 SIGM_XY = SIMP(statut='o',typ=fonction),
12216 SIGM_XZ = SIMP(statut='f',typ=fonction),
12217 SIGM_YZ = SIMP(statut='f',typ=fonction),
12218 EPSP = SIMP(statut='o',typ=fonction),
12219 TEMP = SIMP(statut='o',typ=fonction),),
12220 DOMMAGE = SIMP(statut='f',typ='TXM',into=("LEMAITRE",),defaut="LEMAITRE"),
12221 MATER = SIMP(statut='o',typ=mater),
12222 CUMUL = SIMP(statut='f',typ='TXM',into=("LINEAIRE",)),
12225 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
12226 TITRE =SIMP(statut='f',typ='TXM',max='**'),
12228 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
12229 # CONFIGURATION MANAGEMENT OF EDF VERSION
12230 # ======================================================================
12231 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12232 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12233 # REDISTRIBUTION OF THIS FILE.
12234 # ======================================================================
12235 POST_GOUJ2E=OPER(nom="POST_GOUJ2E",op=187,sd_prod=tabl_post_gouj2e,reentrant='n',
12236 fr=" ",docu="U4.GJ.30-a",
12237 TABLE =SIMP(statut='o',typ=tabl_post_rele),
12239 #& MODIF COMMANDE DATE 09/07/2001 AUTEUR CIBHHLV L.VIVAN
12240 # CONFIGURATION MANAGEMENT OF EDF VERSION
12241 # ======================================================================
12242 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12243 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12244 # REDISTRIBUTION OF THIS FILE.
12245 # ======================================================================
12246 # RESPONSABLE JMBHH01 J.M.PROIX
12247 POST_K1_K2_K3=OPER(nom="POST_K1_K2_K3",op=188,sd_prod=tabl_post_k,
12248 fr="Calcul des FIC par extrapolation du champ de déplacements sur les lèvres de la fissure",
12249 docu="U4.82.05-a",reentrant='n',
12250 MODELISATION =SIMP(statut='o',typ='TXM',
12251 into=("3D","AXIS","D_PLAN","C_PLAN"),
12252 fr="Modélisation cohérente avec celle utilisée pour le calcul des déplacements"),
12253 FOND_3D =SIMP(statut='f',typ=fond_fiss,fr="Fond de fissure issu de DEFI_FOND_FISS"),
12254 b_fond_3d =BLOC (condition="(FOND_3D != None)",
12255 MAILLAGE = SIMP(statut='o',typ=maillage),
12256 PRECISION = SIMP(statut='f',typ='R',defaut=0.001),
12257 NOEUD = SIMP(statut='f',typ=no,max='**'),
12258 GROUP_NO = SIMP(statut='f',typ=grno,max='**'),
12259 SANS_NOEUD = SIMP(statut='f',typ=no,max='**'),
12260 SANS_GROUP_NO = SIMP(statut='f',typ=grno,max='**')
12262 MATER =SIMP(statut='o',typ=mater,
12263 fr="Matériau homogène et isotrope cohérent avec celui utilisé pour le calcul des déplacements"),
12264 TABL_DEPL_SUP =SIMP(statut='o',typ=tabl_post_rele,
12265 fr="Table issue de post_releve_t sur les noeuds de la lèvre supérieure"),
12266 TABL_DEPL_INF =SIMP(statut='o',typ=tabl_post_rele,
12267 fr="Table issue de post_releve_t sur les noeuds de la lèvre inférieure"),
12268 ABSC_CURV_MAXI=SIMP(statut='f',typ='R',
12269 fr="distance maximum à partir du fond de fissure à utiliser pour le calcul"),
12270 PREC_VIS_A_VIS= SIMP(statut='f',typ='R',defaut=0.001),
12271 INST =SIMP(statut='f',typ='R',max='**'),
12272 LIST_INST =SIMP(statut='f',typ=listr8),
12273 b_acce_reel =BLOC(condition="(INST != None)or(LIST_INST != None)",
12274 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-6),
12275 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
12277 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
12278 VECT_K1 =SIMP(statut='o',typ='R',max='**',
12279 fr="Vecteur normal au plan de fissure, orienté de la lèvre inférieure vers la lèvre supérieure"),
12280 TITRE =SIMP(statut='f',typ='TXM',max='**'),
12282 #& MODIF COMMANDE DATE 23/01/2002 AUTEUR CIBHHLV L.VIVAN
12283 # CONFIGURATION MANAGEMENT OF EDF VERSION
12284 # ======================================================================
12285 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12286 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12287 # REDISTRIBUTION OF THIS FILE.
12288 # ======================================================================
12289 # RESPONSABLE JMBHH01 J.M.PROIX
12290 POST_RCCM=OPER(nom="POST_RCCM",op= 165,sd_prod=tabl_post_rccm,
12291 fr="Vérification des critères de niveau 0 et certains critères de niveau A du RCC-M-B3200 (Edition 1991)",
12292 docu="U4.83.11-c",reentrant='n',
12293 MATER =SIMP(statut='o',typ=mater ),
12294 TYPE_RESU =SIMP(statut='f',typ='TXM',defaut="VALE_MAX",into=("VALE_MAX","VALE_INST") ),
12295 TITRE =SIMP(statut='f',typ='TXM',max='**'),
12296 MAILLAGE =SIMP(statut='f',typ=maillage),
12297 OPTION =SIMP(statut='o',typ='TXM',max='**',
12303 SEGMENT =FACT(statut='o',min=01,max='**',fr="Segment sur lequel s effectue le depouillement",
12304 regles=(AU_MOINS_UN('CHEMIN','GROUP_NO','NOEUD'),
12305 EXCLUS('CHEMIN','GROUP_NO'),
12306 EXCLUS('CHEMIN','NOEUD'),),
12307 INTITULE =SIMP(statut='f',typ='TXM' ),
12308 CHEMIN =SIMP(statut='f',typ=(courbe,surface),),
12309 NOEUD =SIMP(statut='f',typ=no,max='**'),
12310 GROUP_NO =SIMP(statut='f',typ=grno),
12311 b_acce_noeud =BLOC(condition="(NOEUD != None)or(GROUP_NO != None)",
12312 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3),
12313 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
12316 TRANSITOIRE =FACT(statut='o',min=01,max='**',fr="transitoire à dépouiller",
12317 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','LIST_INST','LIST_ORDRE'),),
12318 RESULTAT =SIMP(statut='o',typ=(evol_elas,evol_noli) ),
12319 RESU_SIGM_THER =SIMP(statut='f',typ=(evol_elas,evol_noli),fr="résultat sous chargement thermique seul" ),
12320 NB_OCCUR =SIMP(statut='f',typ='I',defaut= 1,fr="nombre d occurences réelles de ce transitoire" ),
12321 NOM_CHAM =SIMP(statut='o',typ='TXM',into=("SIEF_ELNO_ELGA","SIGM_ELNO_DEPL") ),
12322 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12323 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
12324 LIST_ORDRE =SIMP(statut='f',typ=listis ),
12325 INST =SIMP(statut='f',typ='R',max='**'),
12326 LIST_INST =SIMP(statut='f',typ=listr8 ),
12327 b_inst =BLOC(condition = "(INST != None) or (LIST_INST != None)" ,
12328 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
12329 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("ABSOLU","RELATIF") ),
12333 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
12334 # ======================================================================
12335 # CONFIGURATION MANAGEMENT OF EDF VERSION
12336 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12337 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12338 # REDISTRIBUTION OF THIS FILE.
12339 # ======================================================================
12340 # RESPONSABLE G8BHHXD X.DESROCHES
12341 POST_RELEVE_T=OPER(nom="POST_RELEVE_T",op=51,sd_prod=tabl_post_rele,docu="U4.81.21-d",reentrant='n',
12342 ACTION =FACT(statut='o',min=01,max='**',
12343 regles=(AU_MOINS_UN('CHEMIN','GROUP_NO','NOEUD'),
12344 EXCLUS('CHEMIN','GROUP_NO'),
12345 EXCLUS('CHEMIN','NOEUD'),
12346 PRESENT_ABSENT('CHEMIN','GROUP_MA','MAILLE'),
12347 UN_PARMI('RESULTAT','CHAM_GD'),
12348 UN_PARMI('TOUT_CMP','NOM_CMP','INVARIANT','ELEM_PRINCIPAUX','RESULTANTE'),
12349 PRESENT_PRESENT('TRAC_DIR','DIRECTION'),
12350 PRESENT_PRESENT('TRAC_DIRECTION','DIRECTION'),
12351 ENSEMBLE('MOMENT','POINT'),
12352 PRESENT_PRESENT('MOMENT','RESULTANTE'),
12353 PRESENT_ABSENT('TOUT_CMP','TRAC_DIRECTION','TRAC_NORMALE'),
12354 PRESENT_ABSENT('TOUT_CMP','TRAC_DIR','TRAC_NOR'),
12355 PRESENT_PRESENT('ORIGINE','AXE_Z'),),
12356 INTITULE =SIMP(statut='o',typ='TXM'),
12357 CHEMIN =SIMP(statut='f',typ=(courbe,surface) ),
12358 NOEUD =SIMP(statut='f',typ=no,max='**'),
12359 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12360 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12361 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12362 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
12363 FORMAT_C =SIMP(statut='f',typ='TXM',defaut="MODULE",into=("MODULE","REEL","IMAG")),
12364 CHAM_GD =SIMP(statut='f',typ=(cham_no_depl_r,cham_no_temp_r,cham_no_pres_r,cham_no_var2_r,
12365 cham_elem_sief_r,cham_elem_epsi_r,cham_elem_flux_r,cham_elem_crit_r,
12366 cham_elem_ener_r,cham_elem_dbel_r,cham_elem_pres_r,cham_elem_erreur,
12367 cham_elem_vari_r,cham_no_depl_c,cham_no_temp_c,cham_no_pres_c,
12368 cham_elem_sief_c,cham_elem_epsi_c)),
12369 RESULTAT =SIMP(statut='f',typ=(evol_elas,evol_ther,evol_noli,dyna_trans,
12370 mode_meca,mode_flamb,mode_acou,base_modale,mode_stat,
12371 mult_elas,fourier_elas,dyna_harmo,acou_harmo)),
12372 b_sensibilite =BLOC(condition="RESULTAT != None",
12373 fr="Définition des paramètres de sensibilité",
12374 ang="Definition of sensitivity parameters",
12375 SENSIBILITE =SIMP(statut='f',typ=(para_sensi,theta_geom),max='**',
12376 fr="Liste des paramètres de sensibilité.",
12377 ang="List of sensitivity parameters"),),
12379 b_extrac =BLOC(condition = "RESULTAT != None",fr="extraction des résultats",
12380 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','LIST_ORDRE','NUME_MODE','LIST_MODE',
12381 'INST','LIST_INST','FREQ','LIST_FREQ','NOEUD_CMP','NOM_CAS'), ),
12382 NOM_CHAM =SIMP(statut='o',typ='TXM' ),
12383 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12384 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
12385 LIST_ORDRE =SIMP(statut='f',typ=listis),
12386 NUME_MODE =SIMP(statut='f',typ='I',max='**'),
12387 LIST_MODE =SIMP(statut='f',typ=listis),
12388 NOEUD_CMP =SIMP(statut='f',typ='TXM',max='**'),
12389 NOM_CAS =SIMP(statut='f',typ='TXM',max='**'),
12390 FREQ =SIMP(statut='f',typ='R',max='**'),
12391 LIST_FREQ =SIMP(statut='f',typ=listr8),
12392 INST =SIMP(statut='f',typ='R',max='**'),
12393 LIST_INST =SIMP(statut='f',typ=listr8),
12394 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-6),
12395 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU")),
12397 TOUT_CMP =SIMP(statut='f',typ='TXM',into=("OUI",)),
12398 NOM_CMP =SIMP(statut='f',typ='TXM',max='**'),
12399 INVARIANT =SIMP(statut='f',typ='TXM',into=("OUI",)),
12400 ELEM_PRINCIPAUX =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12401 RESULTANTE =SIMP(statut='f',typ='TXM',max='**'),
12402 MOMENT =SIMP(statut='f',typ='TXM',max='**'),
12403 POINT =SIMP(statut='f',typ='R',max='**'),
12405 REPERE =SIMP(statut='f',typ='TXM',defaut="GLOBAL",
12406 into=("GLOBAL","LOCAL","POLAIRE","UTILISATEUR","CYLINDRIQUE"),),
12407 ANGL_NAUT =SIMP(statut='f',typ='R',min=3,max=3),
12408 ORIGINE =SIMP(statut='f',typ='R',min=3,max=3),
12409 AXE_Z =SIMP(statut='f',typ='R',min=3,max=3),
12411 TRAC_NOR =SIMP(statut='f',typ='TXM',into=("OUI",)),
12412 TRAC_DIR =SIMP(statut='f',typ='TXM',into=("OUI",)),
12413 DIRECTION =SIMP(statut='f',typ='R',max='**'),
12414 TRAC_DIRECTION =SIMP(statut='f',typ='TXM',into=("OUI",)),
12415 TRAC_NORMALE =SIMP(statut='f',typ='TXM',into=("OUI",)),
12417 VECT_Y =SIMP(statut='f',typ='R',max='**'),
12418 MOYE_NOEUD =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON")),
12419 OPERATION =SIMP(statut='o',typ='TXM',into=("EXTRACTION","MOYENNE","MOYENNE_RCCM"),max=2),
12421 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
12422 TITRE =SIMP(statut='f',typ='TXM',max='**'),
12424 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
12425 # CONFIGURATION MANAGEMENT OF EDF VERSION
12426 # ======================================================================
12427 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12428 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12429 # REDISTRIBUTION OF THIS FILE.
12430 # ======================================================================
12431 POST_SIMPLIFIE=OPER(nom="POST_SIMPLIFIE",op=185,sd_prod=tabl_post_simpli,
12432 fr=" ",docu="U4.PS.10-a",reentrant='n',
12433 MATER =SIMP(statut='o',typ=(mater) ),
12434 DEF_EQUI =FACT(statut='f',min=01,max=01,
12435 METHODE =SIMP(statut='f',typ='TXM',max='**',defaut="UTO_2_3",
12436 into=("UTO_2_3",) ),
12437 EPAIS =SIMP(statut='o',typ='R'),
12438 LONG_FISS =SIMP(statut='o',typ='R'),
12439 LONG_LIGA_INT =SIMP(statut='o',typ='R'),
12440 DEXT =SIMP(statut='o',typ='R'),
12441 TEMP_ANALYSE =SIMP(statut='f',typ='R'),
12444 #& MODIF COMMANDE DATE 07/02/2001 AUTEUR D6BHHJP J.P.LEFEBVRE
12445 # CONFIGURATION MANAGEMENT OF EDF VERSION
12446 # ======================================================================
12447 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12448 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12449 # REDISTRIBUTION OF THIS FILE.
12450 # ======================================================================
12451 POST_USURE=OPER(nom="POST_USURE",op=153,sd_prod=tabl_post_usur,docu="U4.84.05-c",reentrant='f',
12452 fr="Calcul des volumes d'usure et des profondeurs d'usure",
12453 regles=(UN_PARMI('RESU_GENE','PUIS_USURE'),
12454 PRESENT_PRESENT('RESU_GENE','NOEUD'),
12455 UN_PARMI('INST','LIST_INST'),),
12456 ETAT_INIT =FACT(statut='f',min=01,max=01,
12457 TABL_USURE =SIMP(statut='f',typ=tabl_post_usur),
12458 INST_INIT =SIMP(statut='f',typ='R'),
12460 RESU_GENE =SIMP(statut='f',typ=tran_gene),
12461 NOEUD =SIMP(statut='f',typ=no,max=1),
12462 INST_INIT =SIMP(statut='f',typ='R',defaut=-1.0E+0),
12463 INST_FIN =SIMP(statut='f',typ='R'),
12464 NB_BLOC =SIMP(statut='f',typ='I',defaut= 1 ),
12465 PUIS_USURE =SIMP(statut='f',typ='R'),
12466 LOI_USURE =SIMP(statut='o',typ='TXM',into=("ARCHARD","KWU_EPRI","EDF_MZ")),
12467 b_archard =BLOC(condition = "LOI_USURE == 'ARCHARD'",
12468 regles=(EXCLUS('MATER_USURE','OBSTACLE'),
12469 EXCLUS('MOBILE','USURE_OBST'),),
12470 MOBILE =FACT(statut='f',min=01,max=01,
12471 COEF_USURE =SIMP(statut='o',typ='R'),
12473 OBSTACLE =FACT(statut='f',min=01,max=01,
12474 COEF_USURE =SIMP(statut='o',typ='R'),
12476 MATER_USURE =SIMP(statut='f',typ='TXM'),
12477 USURE_OBST =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
12479 b_kwu_epri =BLOC(condition = "LOI_USURE == 'KWU_EPRI'",
12480 regles=(UN_PARMI('MOBILE','MATER_USURE'),
12481 EXCLUS('MATER_USURE','OBSTACLE'),
12482 EXCLUS('MOBILE','USURE_OBST'),),
12483 MOBILE =FACT(statut='f',min=01,max=01,
12484 COEF_FNOR =SIMP(statut='f',typ='R'),
12485 COEF_VTAN =SIMP(statut='f',typ='R'),
12486 COEF_USURE =SIMP(statut='f',typ='R'),
12487 COEF_K =SIMP(statut='f',typ='R',defaut=5.0E+0),
12488 COEF_C =SIMP(statut='f',typ='R',defaut=10.0E+0),
12490 OBSTACLE =FACT(statut='f',min=01,max=01,
12491 COEF_FNOR =SIMP(statut='f',typ='R' ),
12492 COEF_VTAN =SIMP(statut='f',typ='R' ),
12493 COEF_USURE =SIMP(statut='o',typ='R'),
12494 COEF_K =SIMP(statut='f',typ='R',defaut=5.0E+0),
12495 COEF_C =SIMP(statut='f',typ='R',defaut=10.0E+0),
12497 MATER_USURE =SIMP(statut='f',typ='TXM'),
12498 USURE_OBST =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
12499 FNOR_MAXI =SIMP(statut='f',typ='R' ),
12500 VTAN_MAXI =SIMP(statut='f',typ='R' ),
12502 b_edf_mz =BLOC(condition = "LOI_USURE == 'EDF_MZ'",
12503 regles=(UN_PARMI('MOBILE','MATER_USURE'),
12504 EXCLUS('MATER_USURE','OBSTACLE'),
12505 EXCLUS('MOBILE','USURE_OBST'),),
12506 MOBILE =FACT(statut='f',min=01,max=01,
12507 COEF_USURE =SIMP(statut='f',typ='R',defaut=1.0E-13),
12508 COEF_B =SIMP(statut='f',typ='R',defaut=1.2E+0),
12509 COEF_N =SIMP(statut='f',typ='R',defaut=2.44E-8),
12510 COEF_S =SIMP(statut='f',typ='R',defaut=1.14E-16),
12512 OBSTACLE =FACT(statut='f',min=01,max=01,
12513 COEF_USURE =SIMP(statut='o',typ='R',defaut=1.0E-13),
12514 COEF_B =SIMP(statut='f',typ='R',defaut=1.2E+0),
12515 COEF_N =SIMP(statut='f',typ='R',defaut=2.44E-8),
12516 COEF_S =SIMP(statut='f',typ='R',defaut=1.14E-16),
12518 MATER_USURE =SIMP(statut='f',typ='TXM'),
12519 USURE_OBST =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
12521 SECTEUR =FACT(statut='f',min=01,max='**',
12522 CONTACT =SIMP(statut='f',typ='TXM',into=("TUBE_BAV","TUBE_ALESAGE","TUBE_4_ENCO",
12523 "GRAPPE_ALESAGE","TUBE_3_ENCO","TUBE_TUBE",
12524 "GRAPPE_1_ENCO","GRAPPE_2_ENCO")),
12525 COEF_USUR_MOBILE=SIMP(statut='f',typ='R'),
12526 COEF_USUR_OBST =SIMP(statut='f',typ='R'),
12527 ANGL_INIT =SIMP(statut='f',typ='R'),
12528 ANGL_FIN =SIMP(statut='f',typ='R'),
12530 CONTACT =SIMP(statut='f',typ='TXM',into=("TUBE_BAV","TUBE_ALESAGE","TUBE_4_ENCO",
12531 "GRAPPE_ALESAGE","TUBE_3_ENCO","TUBE_TUBE",
12532 "GRAPPE_1_ENCO","GRAPPE_2_ENCO")),
12533 RAYON_MOBILE =SIMP(statut='f',typ='R'),
12534 RAYON_OBST =SIMP(statut='f',typ='R'),
12535 LARGEUR_OBST =SIMP(statut='f',typ='R'),
12536 ANGL_INCLI =SIMP(statut='f',typ='R'),
12537 ANGL_ISTHME =SIMP(statut='f',typ='R'),
12538 ANGL_IMPACT =SIMP(statut='f',typ='R'),
12539 INST =SIMP(statut='f',typ='R',max='**'),
12540 LIST_INST =SIMP(statut='f',typ=listr8),
12541 COEF_INST =SIMP(statut='f',typ='R',defaut=1.0E+0),
12542 INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
12543 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
12545 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
12546 # CONFIGURATION MANAGEMENT OF EDF VERSION
12547 # ======================================================================
12548 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12549 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12550 # REDISTRIBUTION OF THIS FILE.
12551 # ======================================================================
12552 POST_ZAC=OPER(nom="POST_ZAC",op= 175,sd_prod=mult_elas,docu="U4.83.21-b",reentrant='n',
12553 fr="Donne l'état adapté ou accommodé d'une structure sous chargement cyclique élastique affine ou non",
12554 MODELE =SIMP(statut='o',typ=modele),
12555 CHAM_MATER =SIMP(statut='o',typ=cham_mater),
12556 EXCIT =FACT(statut='o',min=01,max='**',
12557 CHARGE =SIMP(statut='o',typ=char_meca),
12558 FONC_MULT =SIMP(statut='f',typ=fonction),
12559 TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FIXE_CSTE",into=("FIXE_CSTE",)),
12561 EVOL_ELAS =SIMP(statut='o',typ=evol_elas),
12562 b_evol_elas =BLOC(condition="EVOL_ELAS != None",
12563 regles=(UN_PARMI('NUME_ORDRE','LIST_INST','INST'),),
12564 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
12565 LIST_INST =SIMP(statut='f',typ=listr8),
12566 INST =SIMP(statut='f',typ='R',max='**'),
12568 TEMP_ZAC =SIMP(statut='f',typ='R',defaut=0.0E+0),
12569 EVOL_NOLI =SIMP(statut='f',typ=evol_noli),
12570 b_evol_noli =BLOC(condition="EVOL_NOLI != None",
12571 INST_MAX =SIMP(statut='o',typ='R'),
12573 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3),
12574 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU")),
12577 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
12578 # CONFIGURATION MANAGEMENT OF EDF VERSION
12579 # ======================================================================
12580 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12581 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12582 # REDISTRIBUTION OF THIS FILE.
12583 # ======================================================================
12584 POURSUITE=MACRO(nom="POURSUITE",op=0,repetable='n',fr="Poursuite d une étude",
12585 docu="U4.11.03-f1",sd_prod = ops.POURSUITE,
12586 op_init = ops.POURSUITE_context,fichier_ini = 1,
12587 PAR_LOT =SIMP(fr="mode de traitement des commandes",statut='f',typ='TXM',
12588 into=("OUI","NON"),defaut="OUI"),
12589 BASE =FACT(fr="définition des parmètres associés aux bases JEVEUX",
12590 statut='f',min=1,max=3,
12591 FICHIER =SIMP(fr="nom de la base",statut='o',typ='TXM'),
12592 TITRE =SIMP(statut='f',typ='TXM'),
12593 CAS =SIMP(statut='f',typ='TXM'),
12594 NMAX_ENRE =SIMP(fr="nombre maximum d enregistrements",statut='f',typ='I'),
12595 LONG_ENRE =SIMP(fr="longueur des enregistrements",statut='f',typ='I'),
12596 LONG_REPE =SIMP(fr="longueur du répertoire",statut='f',typ='I'),
12598 IMPRESSION =FACT(statut='f',min=1,max=3,
12599 FICHIER =SIMP(statut='o',typ='TXM'),
12600 UNITE =SIMP(statut='o',typ='I'),
12602 CATALOGUE =FACT(statut='f',min=1,max=10,
12603 FICHIER =SIMP(statut='o',typ='TXM'),
12604 TITRE =SIMP(statut='f',typ='TXM'),
12605 UNITE =SIMP(statut='f',typ='I'),
12607 DEBUG =FACT(fr="option de déboggage reservée aux développeurs",
12608 statut='f',min=1,max=1,
12609 JXVERI =SIMP(fr="vérifie l intégrité de la segmentation mémoire",
12610 statut='f',typ='TXM',into=('OUI','NON'),defaut='NON'),
12611 JEVEUX =SIMP(fr="force les déchargement sur disque",
12612 statut='f',typ='TXM',into=('OUI','NON'),defaut='NON'),
12613 ENVIMA =SIMP(fr="imprime les valeurs définies dans ENVIMA",
12614 statut='f',typ='TXM',into=('TES',)),
12616 MEMOIRE =FACT(fr="mode de gestion mémoire utilisé",statut='f',min=1,max=1,
12617 GESTION =SIMP(statut='f',typ='TXM',into=('COMPACTE','RAPIDE'),defaut='RAPIDE'),
12618 TYPE_ALLOCATION =SIMP(statut='f',typ='I',into=(1,2,3,4),defaut=1),
12619 TAILLE =SIMP(statut='f',typ='I'),
12620 TAILLE_BLOC =SIMP(statut='f',typ='R',defaut=800.),
12621 PARTITION =SIMP(statut='f',typ='R' ),
12623 CODE =FACT("définition d un nom pour l'esemble d'une étude",
12624 statut='f',min=1,max=1,
12625 NOM =SIMP(statut='o',typ='TXM'),
12626 UNITE =SIMP(statut='f',typ='I',defaut=15),
12629 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
12630 # CONFIGURATION MANAGEMENT OF EDF VERSION
12631 # ======================================================================
12632 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12633 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12634 # REDISTRIBUTION OF THIS FILE.
12635 # ======================================================================
12636 PRE_CHAR_IDEAS=PROC(nom="PRE_CHAR_IDEAS",op=100,docu="U7.01.02-e",
12637 fr="Conversion de conditions aux limites et chargements IDEAS en commandes Aster",
12638 UNITE_IDEAS =SIMP(statut='f',typ='I',defaut=19),
12639 UNITE_ASTER =SIMP(statut='f',typ='I',defaut=21),
12640 MODELE =SIMP(statut='o',typ=modele),
12642 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
12643 # CONFIGURATION MANAGEMENT OF EDF VERSION
12644 # ======================================================================
12645 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12646 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12647 # REDISTRIBUTION OF THIS FILE.
12648 # ======================================================================
12649 PRE_GIBI=PROC(nom="PRE_GIBI",op=49,docu="U7.01.11-f",
12650 fr="Conversion d un fichier de maillage GIBI",
12651 UNITE_GIBI =SIMP(statut='f',typ='I',defaut=19),
12652 UNITE_MAILLAGE =SIMP(statut='f',typ='I',defaut=20),
12654 #& MODIF COMMANDE DATE 17/09/2001 AUTEUR CIBHHGB G.BERTRAND
12655 # CONFIGURATION MANAGEMENT OF EDF VERSION
12656 # ======================================================================
12657 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12658 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12659 # REDISTRIBUTION OF THIS FILE.
12660 # ======================================================================
12661 PRE_GMSH=PROC(nom="PRE_GMSH",op=47,docu="U7.01.01-f",
12662 fr="Conversion d un fichier universel GMSH au format Aster",
12663 UNITE_GMSH =SIMP(statut='f',typ='I',defaut=19),
12664 UNITE_MAILLAGE =SIMP(statut='f',typ='I',defaut=20),
12666 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
12667 # CONFIGURATION MANAGEMENT OF EDF VERSION
12668 # ======================================================================
12669 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12670 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12671 # REDISTRIBUTION OF THIS FILE.
12672 # ======================================================================
12673 PRE_IDEAS=PROC(nom="PRE_IDEAS",op=47,docu="U7.01.01-f",
12674 fr="Conversion d un fichier universel IDEAS-SUPERTAB au format Aster",
12675 UNITE_IDEAS =SIMP(statut='f',typ='I',defaut=19),
12676 UNITE_MAILLAGE =SIMP(statut='f',typ='I',defaut=20),
12678 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
12679 # CONFIGURATION MANAGEMENT OF EDF VERSION
12680 # ======================================================================
12681 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12682 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12683 # REDISTRIBUTION OF THIS FILE.
12684 # ======================================================================
12685 PROCEDURE=PROC(nom="PROCEDURE",op=-3, docu="U4.13.03-e",
12686 fr="Nommer le fichier de commandes secondaires",
12687 NOM =SIMP(statut='f',typ='TXM',defaut=" "),
12689 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
12690 # CONFIGURATION MANAGEMENT OF EDF VERSION
12691 # ======================================================================
12692 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12693 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12694 # REDISTRIBUTION OF THIS FILE.
12695 # ======================================================================
12696 def prod_matr_cham_prod(MATR_ASSE,**args):
12697 if AsType(MATR_ASSE) == matr_asse_depl_r : return cham_no_depl_r
12698 if AsType(MATR_ASSE) == matr_asse_depl_c : return cham_no_depl_c
12699 if AsType(MATR_ASSE) == matr_asse_temp_r : return cham_no_temp_r
12700 if AsType(MATR_ASSE) == matr_asse_pres_c : return cham_no_pres_c
12701 raise AsException("type de concept resultat non prevu")
12703 PROD_MATR_CHAM=OPER(nom="PROD_MATR_CHAM",op= 156,sd_prod=prod_matr_cham_prod,
12704 fr="Effectuer le produit d une matrice par un vecteur",
12705 docu="U4.72.06-b",reentrant='n',
12706 MATR_ASSE =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_depl_c,matr_asse_temp_r,matr_asse_pres_c ) ),
12707 CHAM_NO =SIMP(statut='o',typ=(cham_no_depl_r,cham_no_depl_c,cham_no_temp_r,cham_no_pres_c ) ),
12708 TITRE =SIMP(statut='f',typ='TXM',max='**'),
12710 #& MODIF COMMANDE DATE 12/09/2001 AUTEUR MCOURTOI M.COURTOIS
12711 # CONFIGURATION MANAGEMENT OF EDF VERSION
12712 # ======================================================================
12713 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12714 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12715 # REDISTRIBUTION OF THIS FILE.
12716 # ======================================================================
12717 # RESPONSABLE VABHHTS J.PELLET
12718 def proj_champ_prod(RESULTAT=None,CHAM_NO_REFE=None,**args ):
12719 if AsType(RESULTAT) == evol_ther : return evol_ther
12720 if AsType(RESULTAT) == evol_elas : return evol_elas
12721 if AsType(RESULTAT) == evol_noli : return evol_noli
12722 if AsType(RESULTAT) == evol_char : return evol_char
12723 if AsType(CHAM_NO_REFE) == cham_no_depl_r : return cham_no_depl_r
12724 if AsType(CHAM_NO_REFE) == cham_no_depl_c : return cham_no_depl_c
12725 if AsType(CHAM_NO_REFE) == cham_no_pres_c : return cham_no_pres_c
12726 if AsType(CHAM_NO_REFE) == cham_no_temp_r : return cham_no_temp_r
12727 if AsType(CHAM_NO_REFE) == cham_no_epsi_r : return cham_no_epsi_r
12728 if AsType(CHAM_NO_REFE) == cham_no_sief_r : return cham_no_sief_r
12729 if AsType(CHAM_NO_REFE) == cham_no_flux_r : return cham_no_flux_r
12730 raise AsException("type de concept resultat non prevu")
12732 PROJ_CHAMP=OPER(nom="PROJ_CHAMP",op= 166,sd_prod=proj_champ_prod,docu="U4.72.05-c1",reentrant='n',
12733 fr="Projection d un champ aux noeuds sur les noeuds d un autre maillage",
12735 METHODE =SIMP(statut='f',typ='TXM',defaut="NUAGE_DEG_1",
12736 into=("NUAGE_DEG_0","NUAGE_DEG_1","ELEM",) ),
12737 b_nuage =BLOC(condition="(METHODE=='NUAGE_DEG_1') or (METHODE=='NUAGE_DEG_0')",
12738 fr="Lissage d un nuage de points",
12739 CHAM_NO =SIMP(statut='f',typ=(cham_no_depl_r,cham_no_depl_c,cham_no_pres_c,cham_no_temp_r,
12740 cham_no_epsi_r,cham_no_sief_r,cham_no_flux_r)),
12741 CHAM_NO_REFE =SIMP(statut='f',typ=(cham_no_depl_r,cham_no_depl_c,cham_no_pres_c,cham_no_temp_r,
12742 cham_no_epsi_r,cham_no_sief_r,cham_no_flux_r)),
12744 b_elem =BLOC(condition="METHODE=='ELEM'",
12745 fr="Utilisation des fonctions de forme",
12746 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','FREQ','LIST_INST','LIST_FREQ','LIST_ORDRE'), ),
12747 RESULTAT =SIMP(statut='f',typ=(evol_ther,evol_elas,evol_noli,evol_char) ),
12748 MODELE_1 =SIMP(statut='f',typ=modele),
12749 MODELE_2 =SIMP(statut='f',typ=modele),
12750 TOUT_ORDRE =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI",) ),
12751 NUME_ORDRE =SIMP(statut='f',typ='I',max='**' ),
12752 LIST_ORDRE =SIMP(statut='f',typ=listis),
12753 INST =SIMP(statut='f',typ='R',max='**' ),
12754 LIST_INST =SIMP(statut='f',typ=listr8),
12755 FREQ =SIMP(statut='f',typ='R',max='**' ),
12756 LIST_FREQ =SIMP(statut='f',typ=listr8),
12759 VIS_A_VIS =FACT(statut='f',min=01,max='**',
12760 regles=(AU_MOINS_UN('TOUT_1','GROUP_MA_1','MAILLE_1','GROUP_NO_1','NOEUD_1'),
12761 AU_MOINS_UN('TOUT_2','GROUP_MA_2','MAILLE_2','GROUP_NO_2','NOEUD_2'),),
12762 TOUT_1 =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12763 GROUP_MA_1 =SIMP(statut='f',typ=grma,max='**'),
12764 MAILLE_1 =SIMP(statut='f',typ=ma,max='**'),
12765 GROUP_NO_1 =SIMP(statut='f',typ=grno,max='**'),
12766 NOEUD_1 =SIMP(statut='f',typ=no,max='**'),
12767 TOUT_2 =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12768 GROUP_MA_2 =SIMP(statut='f',typ=grma,max='**'),
12769 MAILLE_2 =SIMP(statut='f',typ=ma,max='**'),
12770 GROUP_NO_2 =SIMP(statut='f',typ=grno,max='**'),
12771 NOEUD_2 =SIMP(statut='f',typ=no,max='**'),
12774 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
12776 #& MODIF COMMANDE DATE 26/09/2001 AUTEUR CIBHHPD D.NUNEZ
12777 # CONFIGURATION MANAGEMENT OF EDF VERSION
12778 # ======================================================================
12779 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12780 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12781 # REDISTRIBUTION OF THIS FILE.
12782 # ======================================================================
12783 def matr_asse_gene_prod(MATR_ASSE,MATR_ASSE_GENE,**args):
12784 if AsType(MATR_ASSE) == matr_asse_depl_r : return matr_asse_gene_r
12785 if AsType(MATR_ASSE_GENE) == matr_asse_gene_r : return matr_asse_gene_r
12786 if AsType(MATR_ASSE) == matr_asse_depl_c : return matr_asse_gene_c
12787 if AsType(MATR_ASSE_GENE) == matr_asse_gene_c : return matr_asse_gene_c
12788 raise AsException("type de concept resultat non prevu")
12790 PROJ_MATR_BASE=OPER(nom="PROJ_MATR_BASE",op= 71,sd_prod=matr_asse_gene_prod,
12791 fr="Projection d une matrice assemblée sur une base (modale ou de RITZ)",
12792 docu="U4.63.12-e",reentrant='n',
12793 regles=(UN_PARMI('MATR_ASSE','MATR_ASSE_GENE'),),
12794 BASE =SIMP(statut='o',typ=(mode_meca,base_modale,mode_gene ) ),
12795 NUME_DDL_GENE =SIMP(statut='o',typ=nume_ddl_gene ),
12796 NB_VECT =SIMP(statut='f',typ='I',defaut= 9999 ),
12797 MATR_ASSE =SIMP(statut='f',typ=(matr_asse_depl_r,matr_asse_depl_c) ),
12798 MATR_ASSE_GENE =SIMP(statut='f',typ=(matr_asse_gene_r,matr_asse_gene_c) ),
12801 #& MODIF COMMANDE DATE 19/12/2001 AUTEUR CIBHHAB N.RAHNI
12802 # CONFIGURATION MANAGEMENT OF EDF VERSION
12803 # ======================================================================
12804 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12805 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12806 # REDISTRIBUTION OF THIS FILE.
12807 # ======================================================================
12808 def proj_mesu_modal_prod(MESURE,**args):
12809 vale=MESURE['NOM_PARA']
12810 if vale == 'INST' : return tran_gene
12811 raise AsException("type de concept resultat non prevu")
12813 PROJ_MESU_MODAL=OPER(nom="PROJ_MESU_MODAL",op= 193,
12814 sd_prod=proj_mesu_modal_prod,
12815 docu="U4.73.01-a",reentrant='n',
12816 fr="Extrapolation de resultats experimentaux sur un modele numerique en dynamique",
12818 # commentaire C. Durand-13/10/2000 :
12819 #le mot cle NOM_PARA, par construction, vaut tjs INST : donc on retourne TRAN_GENE a chaque fois
12820 #def proj_mesu_modal_prod(**args):
12821 # vale=args['MESURE'].get_child('NOM_PARA').get_valeur()
12822 # if vale == 'INST' : return tran_gene
12823 # raise AsException("type de concept resultat non prevu")
12824 #PROJ_MESU_MODAL=OPER(nom="PROJ_MESU_MODAL",op= 193,sd_prod=proj_mesu_modal_prod,)
12826 MODELE =SIMP(statut='f',typ=(modele) ),
12827 MASS_GENE =SIMP(statut='o',typ=(matr_asse_gene_r) ),
12828 RIGI_GENE =SIMP(statut='o',typ=(matr_asse_gene_r) ),
12829 MESURE =FACT(statut='o',min=01,max=01,
12830 MODELE =SIMP(statut='o',typ=(modele) ),
12831 MAILLAGE =SIMP(statut='o',typ=(maillage) ),
12832 CARA_ELEM =SIMP(statut='o',typ=(cara_elem) ),
12833 UNITE =SIMP(statut='f',typ='I',defaut= 33 ),
12834 NOM_PARA =SIMP(statut='f',typ='TXM',defaut="INST",into=("INST",) ),
12835 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
12836 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU",) ),
12837 NOM_CHAM =SIMP(statut='f',typ='TXM',defaut="DEPL",into=("DEPL","SIGM_NOEU_DEPL","EPSI_NOEU_DEPL",) ),
12839 REGULARISATION =FACT(statut='f',min=01,max=01,
12840 regles=(UN_PARMI('COEF_PONDER','COEF_PONDER_F', ),),
12841 METHODE =SIMP(statut='f',typ='TXM',defaut="TIKHONOV",into=("TIKHONOV",) ),
12842 NORM_MIN =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON",) ),
12843 COEF_PONDER =SIMP(statut='f',typ='R',max='**' ),
12844 COEF_PONDER_F =SIMP(statut='f',typ=(fonction),max='**' ),
12847 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
12848 # CONFIGURATION MANAGEMENT OF EDF VERSION
12849 # ======================================================================
12850 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12851 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12852 # REDISTRIBUTION OF THIS FILE.
12853 # ======================================================================
12854 PROJ_SPEC_BASE=OPER(nom="PROJ_SPEC_BASE",op= 146,sd_prod=tabl_intsp,docu="U4.63.14-c",reentrant='n',
12855 fr="Projection d un ou plusieurs spectres de turbulenc sur un ensemble de bases modales ",
12856 regles=(UN_PARMI('BASE_ELAS_FLUI','MODE_MECA','CHAM_NO'),
12857 ENSEMBLE('FREQ_INIT','FREQ_FIN','NB_POIN'),),
12858 SPEC_TURB =SIMP(statut='o',typ=spectre,max='**' ),
12859 BASE_ELAS_FLUI =SIMP(statut='f',typ=melasflu ),
12860 MODE_MECA =SIMP(statut='f',typ=mode_meca ),
12861 CHAM_NO =SIMP(statut='f',typ=cham_no_depl_r ),
12862 FREQ_INIT =SIMP(statut='f',typ='R',val_min=0.E+0 ),
12863 FREQ_FIN =SIMP(statut='f',typ='R',val_min=0.E+0 ),
12864 NB_POIN =SIMP(statut='f',typ='I' ),
12865 OPTION =SIMP(statut='f',typ='TXM',defaut="TOUT",into=("TOUT","DIAG")),
12866 GROUP_MA =SIMP(statut='f',typ=grma),
12867 # Quel est le type attendu derriere MODELE_INTERFACE
12868 MODELE_INTERFACE=SIMP(statut='f',typ=modele),
12869 VECT_X =SIMP(statut='f',typ='R',min=3,max=3 ),
12870 VECT_Y =SIMP(statut='f',typ='R',min=3,max=3 ),
12871 ORIG_AXE =SIMP(statut='f',typ='R',min=3,max=3 ),
12872 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
12874 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
12875 # CONFIGURATION MANAGEMENT OF EDF VERSION
12876 # ======================================================================
12877 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12878 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12879 # REDISTRIBUTION OF THIS FILE.
12880 # ======================================================================
12881 PROJ_VECT_BASE=OPER(nom="PROJ_VECT_BASE",op= 72,sd_prod=vect_asse_gene,
12882 fr="Projection d un vecteur assemblé sur une base (modale ou de RITZ)",
12883 docu="U4.63.13-e",reentrant='n',
12884 regles=(UN_PARMI('VECT_ASSE','VECT_ASSE_GENE'),),
12885 BASE =SIMP(statut='o',typ=(mode_meca,base_modale,mode_gene ) ),
12886 NUME_DDL_GENE =SIMP(statut='o',typ=nume_ddl_gene ),
12887 NB_VECT =SIMP(statut='f',typ='I',defaut= 9999 ),
12888 TYPE_VECT =SIMP(statut='f',typ='TXM',defaut="FORC"),
12889 VECT_ASSE =SIMP(statut='f',typ=cham_no_depl_r ),
12890 VECT_ASSE_GENE =SIMP(statut='f',typ=vect_asse_gene ),
12892 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
12893 # CONFIGURATION MANAGEMENT OF EDF VERSION
12894 # ======================================================================
12895 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12896 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12897 # REDISTRIBUTION OF THIS FILE.
12898 # ======================================================================
12899 RECA_WEIBULL=OPER(nom="RECA_WEIBULL",op= 197,sd_prod=tabl_reca_weib,
12900 fr=" ",docu="U4.82.06-a",reentrant='n',
12901 LIST_PARA =SIMP(statut='o',typ='TXM',max='**',into=("SIGM_REFE","M",) ),
12902 RESU =FACT(statut='o',min=01,max='**',
12903 regles=(EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','LIST_INST',),
12904 AU_MOINS_UN('TOUT','GROUP_MA','MAILLE', ),),
12905 EVOL_NOLI =SIMP(statut='o',typ=(evol_noli) ),
12906 MODELE =SIMP(statut='o',typ=(modele) ),
12907 CHAM_MATER =SIMP(statut='o',typ=(cham_mater) ),
12908 TEMPE =SIMP(statut='f',typ='R' ),
12909 LIST_INST_RUPT =SIMP(statut='o',typ='R',max='**' ),
12910 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12911 NUME_ORDRE =SIMP(statut='f',typ='I',max='**' ),
12912 INST =SIMP(statut='f',typ='R',max='**' ),
12913 LIST_INST =SIMP(statut='f',typ=(listr8) ),
12914 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12915 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
12916 MAILLE =SIMP(statut='f',typ=ma,max='**'),
12917 COEF_MULT =SIMP(statut='f',typ='R',defaut= 1.E0 ),
12919 OPTION =SIMP(statut='f',typ='TXM',defaut="SIGM_ELGA",into=("SIGM_ELGA","SIGM_ELMOY",) ),
12920 CORR_PLAST =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON",) ),
12921 METHODE =SIMP(statut='f',typ='TXM',defaut="MAXI_VRAI",into=("MAXI_VRAI","REGR_LINE",) ),
12922 INCO_GLOB_RELA =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
12923 ITER_GLOB_MAXI =SIMP(statut='f',typ='I',defaut= 10 ),
12924 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2 ,) ),
12926 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
12927 # CONFIGURATION MANAGEMENT OF EDF VERSION
12928 # ======================================================================
12929 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
12930 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
12931 # REDISTRIBUTION OF THIS FILE.
12932 # ======================================================================
12933 # RESPONSABLE MCOURTOI M.COURTOIS
12934 def recu_fonction_prod(RESULTAT=None,TABLE=None,OBSTACLE=None,
12935 RESU_GENE=None,BASE_ELAS_FLUI=None,CHAM_GD=None,
12936 TYPE_RESU=None,**args):
12937 if AsType(RESULTAT) == dyna_harmo : return fonction_c
12938 # On ne sait pas interpreter les deux conditions suivantes
12940 if TYPE_RESU != None :
12941 if TYPE_RESU == "FONCTION_C" : return fonction_c
12942 if TYPE_RESU == "FONCTION" : return fonction
12945 if RESU_GENE != None : return fonction
12946 if BASE_ELAS_FLUI != None : return fonction
12947 if RESULTAT != None : return fonction
12948 if CHAM_GD != None : return fonction
12949 if OBSTACLE != None : return fonction
12950 raise AsException("type de concept resultat non prevu")
12952 RECU_FONCTION=OPER(nom="RECU_FONCTION",op= 90,sd_prod=recu_fonction_prod,
12953 fr="Extraire sous forme d une fonction, l évolution temporelle d une composante d un champ ou d une table",
12954 docu="U4.32.03-e1",reentrant='n',
12955 regles=(UN_PARMI('CHAM_GD','RESULTAT','RESU_GENE','TABLE','BASE_ELAS_FLUI','OBSTACLE'),),
12957 CHAM_GD =SIMP(statut='f',typ=(cham_no_depl_r,cham_no_temp_r,cham_no_pres_r,cham_elem_sief_r,
12958 cham_elem_vari_r,cham_elem_epsi_r,cham_elem_flux_r,
12959 cham_elem_pres_r,cham_elem_meta_r ) ),
12960 RESULTAT =SIMP(statut='f',typ=(evol_elas,dyna_trans,evol_noli,evol_ther,dyna_harmo ) ),
12961 RESU_GENE =SIMP(statut='f',typ=tran_gene),
12962 # concept table à créer
12963 TABLE =SIMP(statut='f',typ=table),
12964 BASE_ELAS_FLUI =SIMP(statut='f',typ=melasflu),
12965 REPERE =SIMP(statut='f',typ='TXM',into=("POLAIRE","GLOBAL") ),
12966 OBSTACLE =SIMP(statut='f',typ=obstacle),
12968 b_tran_gene = BLOC ( condition = "RESU_GENE != None",
12969 fr="Récupération de la fonction concernant les chocs à partir d un concept TRAN_GENE",
12970 regles=(PRESENT_PRESENT('SOUS_STRUC','INTITULE'),
12971 PRESENT_ABSENT('MULT_APPUI','CORR_STAT'),),
12972 MULT_APPUI =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
12973 CORR_STAT =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
12974 ACCE_MONO_APPUI =SIMP(statut='f',typ=fonction),
12975 PARA_X =SIMP(statut='f',typ='TXM' ),
12976 PARA_Y =SIMP(statut='f',typ='TXM' ),
12977 SOUS_STRUC =SIMP(statut='f',typ='TXM' ),
12978 LIST_PARA =SIMP(statut='f',typ=listr8 ),
12979 INTITULE =SIMP(statut='f',typ='TXM' ),
12981 b_base_elas_flui = BLOC ( condition = "BASE_ELAS_FLUI != None",
12982 fr="Récupération de la fonction à partir d un concept melasflu",
12983 regles=(UN_PARMI('TOUT_ORDRE','NUME_ORDRE'),),
12984 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
12985 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
12986 NUME_MODE =SIMP(statut='o',typ='I' ),
12987 PARA_X =SIMP(statut='o',typ='TXM',into=("VITE_FLU",) ),
12988 PARA_Y =SIMP(statut='o',typ='TXM',into=("FREQ","AMOR") ),
12990 b_table = BLOC ( condition = "TABLE != None",fr="Récupération de la fonction à partir d un concept table",
12991 regles=(UN_PARMI('PARA_X','NOM_PARA_TABL'),
12992 PRESENT_PRESENT('PARA_X','PARA_Y'),),
12993 PARA_X =SIMP(statut='f',typ='TXM',
12994 fr="1ère colonne de la table qui définit la fonction à récupérer", ),
12995 PARA_Y =SIMP(statut='f',typ='TXM',
12996 fr="2ème colonne de la table qui définit la fonction à récupérer", ),
12997 NOM_PARA_TABL =SIMP(statut='f',typ='TXM',into=("FONCTION",),
12998 fr="Nom du paramètre de la table à qui est associé la fonction" ),
12999 b_nom_para_tabl = BLOC (condition = "NOM_PARA_TABL != None",
13000 TYPE_RESU =SIMP(statut='f',typ='TXM',defaut="FONCTION",into=("FONCTION","FONCTION_C") ),
13003 FILTRE =FACT(statut='f',min=1,max='**',
13004 NOM_PARA =SIMP(statut='o',typ='TXM' ),
13005 CRIT_COMP =SIMP(statut='f',typ='TXM',defaut="EQ",
13006 into=("EQ","LT","GT","NE","LE","GE","VIDE",
13007 "NON_VIDE","MAXI","ABS_MAXI","MINI","ABS_MINI") ),
13008 b_vale =BLOC(condition = "(CRIT_COMP in ('EQ','NE','GT','LT','GE','LE'))",
13009 regles=(UN_PARMI('VALE','VALE_I','VALE_K','VALE_C',),),
13010 VALE =SIMP(statut='f',typ='R' ),
13011 VALE_I =SIMP(statut='f',typ='I' ),
13012 VALE_C =SIMP(statut='f',typ='C' ),
13013 VALE_K =SIMP(statut='f',typ='TXM' ),),
13015 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
13016 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
13020 b_resu = BLOC ( condition = "RESULTAT != None", fr="Opérandes en cas de RESULTAT",
13022 # A voir par Mathieu Courtois : il existe de tests (SDNX300B) qui ne satisfont pas ce UN_PARMI
13023 # UN_PARMI('TOUT_ORDRE','NUME_ORDRE','LIST_ORDRE','TOUT_INST','LIST_INST','FREQ','LIST_FREQ'),
13024 AU_MOINS_UN('MAILLE','GROUP_MA','GROUP_NO','NOEUD','NOEUD_CHOC','GROUP_NO_CHOC','NOM_PARA_RESU'),
13025 PRESENT_PRESENT('MAILLE','NOM_CMP'),
13026 PRESENT_PRESENT('GROUP_MA','NOM_CMP'),
13027 PRESENT_PRESENT('NOEUD','NOM_CMP'),
13028 PRESENT_PRESENT('GROUP_NO','NOM_CMP'),
13029 PRESENT_PRESENT('POINT','NOM_CMP'),
13030 EXCLUS('POINT','NOEUD'),
13031 EXCLUS('GROUP_MA','MAILLE'),
13032 EXCLUS('GROUP_NO','NOEUD'),
13033 EXCLUS('NOEUD_CHOC','GROUP_NO_CHOC'),
13034 UN_PARMI('NOM_CHAM','NOM_PARA_RESU'),),
13035 NOM_CHAM =SIMP(statut='f',typ='TXM' ),
13036 NOM_PARA_RESU =SIMP(statut='f',typ='TXM' ),
13037 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
13038 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
13039 LIST_ORDRE =SIMP(statut='f',typ=listis ),
13040 TOUT_INST =SIMP(statut='f',typ='TXM',into=("OUI",) ),
13041 INST =SIMP(statut='f',typ='R',max='**'),
13042 LIST_INST =SIMP(statut='f',typ=listr8 ),
13043 FREQ =SIMP(statut='f',typ='R',max='**'),
13044 LIST_FREQ =SIMP(statut='f',typ=listr8 ),
13045 b_prec = BLOC ( condition = "(INST != None) or (LIST_INST != None) or (FREQ != None) or (LIST_FREQ != None)",
13046 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
13047 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
13048 INTERP_NUME =SIMP(statut='f',typ='TXM',max=2,into=("NON","LIN") ),
13050 NOM_CMP =SIMP(statut='f',typ='TXM' ),
13052 MAILLE =SIMP(statut='f',typ=ma),
13053 GROUP_MA =SIMP(statut='f',typ=grma),
13054 NOEUD =SIMP(statut='f',typ=no),
13055 GROUP_NO =SIMP(statut='f',typ=grno),
13056 POINT =SIMP(statut='f',typ='I' ),
13057 SOUS_POINT =SIMP(statut='f',typ='I' ),
13058 NOEUD_CHOC =SIMP(statut='f',typ=no),
13059 GROUP_NO_CHOC =SIMP(statut='f',typ=grno),
13062 b_resu_gene = BLOC ( condition = "RESU_GENE != None", fr="Opérandes en cas de RESU_GENE",
13063 # A voir par Mathieu Courtois : il existe de tests (SDNX300B) qui ne satisfont pas ce UN_PARMI
13064 # regles=(UN_PARMI('TOUT_ORDRE','NUME_ORDRE','LIST_ORDRE','TOUT_INST','LIST_INST','FREQ','LIST_FREQ'),),
13065 NOM_CHAM =SIMP(statut='f',typ='TXM',into=("DEPL","VITE","ACCE","PTEM") ),
13066 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
13067 NUME_ORDRE =SIMP(statut='f',typ='I',max='**'),
13068 LIST_ORDRE =SIMP(statut='f',typ=listis ),
13069 TOUT_INST =SIMP(statut='f',typ='TXM',into=("OUI",) ),
13070 INST =SIMP(statut='f',typ='R',max='**'),
13071 LIST_INST =SIMP(statut='f',typ=listr8 ),
13072 FREQ =SIMP(statut='f',typ='R',max='**'),
13073 LIST_FREQ =SIMP(statut='f',typ=listr8 ),
13074 b_prec = BLOC ( condition = "(INST != None) or (LIST_INST != None) or (FREQ != None) or (LIST_FREQ != None)",
13075 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
13076 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
13077 INTERP_NUME =SIMP(statut='f',typ='TXM',max=2,into=("NON","LIN") ),
13079 b_local_cham = BLOC ( condition = "NOM_CHAM!='PTEM'", fr="Opérandes de localisation du champ",
13080 regles=(AU_MOINS_UN('MAILLE','GROUP_MA','GROUP_NO','NOEUD','NOEUD_CHOC','GROUP_NO_CHOC'),
13081 PRESENT_PRESENT('MAILLE','NOM_CMP'),
13082 PRESENT_PRESENT('GROUP_MA','NOM_CMP'),
13083 PRESENT_PRESENT('NOEUD','NOM_CMP'),
13084 PRESENT_PRESENT('GROUP_NO','NOM_CMP'),
13085 PRESENT_PRESENT('POINT','NOM_CMP'),
13086 EXCLUS('POINT','NOEUD'),
13087 EXCLUS('GROUP_MA','MAILLE'),
13088 EXCLUS('GROUP_NO','NOEUD'),
13089 EXCLUS('NOEUD_CHOC','GROUP_NO_CHOC'),),
13090 NOM_CMP =SIMP(statut='f',typ='TXM' ),
13092 MAILLE =SIMP(statut='f',typ=ma),
13093 GROUP_MA =SIMP(statut='f',typ=grma),
13094 NOEUD =SIMP(statut='f',typ=no),
13095 GROUP_NO =SIMP(statut='f',typ=grno),
13096 POINT =SIMP(statut='f',typ='I' ),
13097 SOUS_POINT =SIMP(statut='f',typ='I' ),
13098 NOEUD_CHOC =SIMP(statut='f',typ=no),
13099 GROUP_NO_CHOC =SIMP(statut='f',typ=grno),
13103 b_cham_gd = BLOC ( condition = "(CHAM_GD != None)", fr="Opérandes en cas de CHAM_GD",
13105 regles=(AU_MOINS_UN('MAILLE','GROUP_MA','GROUP_NO','NOEUD','NOEUD_CHOC','GROUP_NO_CHOC'),
13106 PRESENT_PRESENT('MAILLE','NOM_CMP'),
13107 PRESENT_PRESENT('GROUP_MA','NOM_CMP'),
13108 PRESENT_PRESENT('NOEUD','NOM_CMP'),
13109 PRESENT_PRESENT('GROUP_NO','NOM_CMP'),
13110 PRESENT_PRESENT('POINT','NOM_CMP'),
13111 EXCLUS('POINT','NOEUD'),
13112 EXCLUS('GROUP_MA','MAILLE'),
13113 EXCLUS('GROUP_NO','NOEUD'),
13114 EXCLUS('NOEUD_CHOC','GROUP_NO_CHOC'),),
13115 NOM_CMP =SIMP(statut='f',typ='TXM' ),
13117 MAILLE =SIMP(statut='f',typ=ma),
13118 GROUP_MA =SIMP(statut='f',typ=grma),
13119 NOEUD =SIMP(statut='f',typ=no),
13120 GROUP_NO =SIMP(statut='f',typ=grno),
13121 POINT =SIMP(statut='f',typ='I' ),
13122 SOUS_POINT =SIMP(statut='f',typ='I' ),
13123 NOEUD_CHOC =SIMP(statut='f',typ=no),
13124 GROUP_NO_CHOC =SIMP(statut='f',typ=grno),
13127 NOM_PARA =SIMP(statut='f',typ='TXM',
13128 into=("DX","DY","DZ","DRX","DRY","DRZ","TEMP",
13129 "INST","X","Y","Z","EPSI","FREQ","PULS","AMOR","ABSC") ),
13130 NOM_RESU =SIMP(statut='f',typ='TXM' ),
13131 INTERPOL =SIMP(statut='f',typ='TXM',max=2,into=("NON","LIN","LOG") ),
13132 PROL_DROITE =SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
13133 PROL_GAUCHE =SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
13135 TITRE =SIMP(statut='f',typ='TXM',max='**'),
13136 INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2 ) ),
13138 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
13139 # CONFIGURATION MANAGEMENT OF EDF VERSION
13140 # ======================================================================
13141 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
13142 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
13143 # REDISTRIBUTION OF THIS FILE.
13144 # ======================================================================
13145 RECU_GENE=OPER(nom="RECU_GENE",op= 76,sd_prod=vect_asse_gene,docu="U4.71.03-e",reentrant='n',
13146 fr="Récupération d un champ de grandeur à partir d un résultat en coordonnées généralisées",
13147 RESU_GENE =SIMP(statut='o',typ=tran_gene ),
13148 INST =SIMP(statut='o',typ='R' ),
13149 NOM_CHAM =SIMP(statut='f',typ='TXM',defaut="DEPL",into=("DEPL","VITE","ACCE") ),
13150 INTERPOL =SIMP(statut='f',typ='TXM',defaut="NON",into=("NON","LIN") ),
13151 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF" ,into=("ABSOLU","RELATIF") ),
13152 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
13154 #& MODIF COMMANDE DATE 19/12/2001 AUTEUR PBBHHPB P.BADEL
13155 # CONFIGURATION MANAGEMENT OF EDF VERSION
13156 # ======================================================================
13157 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
13158 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
13159 # REDISTRIBUTION OF THIS FILE.
13160 # ======================================================================
13161 # RESPONSABLE VABHHTS J.PELLET
13162 RECU_TABLE=OPER(nom="RECU_TABLE",op= 174,sd_prod=table,
13163 fr=" ",docu="U4.71.02-a1",reentrant='n',
13164 CO =SIMP(statut='o',typ=assd),
13165 regles=(PRESENT_ABSENT('NOM_TABLE','NOM_PARA')),
13166 NOM_TABLE =SIMP(statut='f',typ='TXM' ),
13167 NOM_PARA =SIMP(statut='f',typ='TXM' ),
13168 TITRE =SIMP(statut='f',typ='TXM',max='**'),
13170 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
13171 # CONFIGURATION MANAGEMENT OF EDF VERSION
13172 # ======================================================================
13173 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
13174 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
13175 # REDISTRIBUTION OF THIS FILE.
13176 # ======================================================================
13177 def reso_grad_prod(MATR_ASSE,**args ):
13178 if AsType(MATR_ASSE) == matr_asse_depl_r : return cham_no_depl_r
13179 if AsType(MATR_ASSE) == matr_asse_temp_r : return cham_no_temp_r
13180 if AsType(MATR_ASSE) == matr_asse_pres_r : return cham_no_pres_r
13181 raise AsException("type de concept resultat non prevu")
13183 RESO_GRAD=OPER(nom="RESO_GRAD",op= 84,sd_prod=reso_grad_prod,
13184 fr="Résolution par la méthode du gradient conjugué préconditionné",
13185 docu="U4.55.04-e",reentrant='f',
13186 MATR_ASSE =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_temp_r,matr_asse_pres_r ) ),
13187 CHAM_NO =SIMP(statut='o',typ=(cham_no_depl_r,cham_no_temp_r,cham_no_pres_r ) ),
13188 CHAM_CINE =SIMP(statut='f',typ=(cham_no_temp_r,cham_no_depl_r,cham_no_pres_r ) ),
13189 MATR_FACT =SIMP(statut='f',typ=(matr_asse_depl_r,matr_asse_temp_r,matr_asse_pres_r ) ),
13190 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
13191 REPRISE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
13192 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1E-6 ),
13193 INFO =SIMP(statut='f',typ='I',into=(1,2) ),
13195 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
13196 # CONFIGURATION MANAGEMENT OF EDF VERSION
13197 # ======================================================================
13198 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
13199 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
13200 # REDISTRIBUTION OF THIS FILE.
13201 # ======================================================================
13202 # RESPONSABLE VABHHTS J.PELLET
13203 def reso_ldlt_prod(CHAM_NO,**args ):
13204 if AsType(CHAM_NO) == cham_no_temp_r : return cham_no_temp_r
13205 if AsType(CHAM_NO) == cham_no_depl_r : return cham_no_depl_r
13206 if AsType(CHAM_NO) == cham_no_pres_r : return cham_no_pres_r
13207 if AsType(CHAM_NO) == cham_no_temp_c : return cham_no_temp_c
13208 if AsType(CHAM_NO) == cham_no_depl_c : return cham_no_depl_c
13209 if AsType(CHAM_NO) == cham_no_pres_c : return cham_no_pres_c
13210 raise AsException("type de concept resultat non prevu")
13212 RESO_LDLT=OPER(nom="RESO_LDLT",op=15,sd_prod=reso_ldlt_prod,reentrant='f',
13213 fr="Résolution en place ou hors place d un système factorisé",docu="U4.55.02-f",
13214 MATR_FACT =SIMP(statut='o',typ=(matr_asse_depl_r,matr_asse_depl_c,matr_asse_temp_r,
13215 matr_asse_temp_c,matr_asse_pres_r,matr_asse_pres_c) ),
13216 CHAM_NO =SIMP(statut='o',typ=(cham_no_temp_r,cham_no_depl_r,cham_no_pres_r,
13217 cham_no_temp_c,cham_no_depl_c,cham_no_pres_c) ),
13218 CHAM_CINE =SIMP(statut='f',typ=(cham_no_temp_r,cham_no_depl_r,cham_no_pres_c) ),
13219 TITRE =SIMP(statut='f',typ='TXM',max='**'),
13220 INFO =SIMP(statut='f',typ='I',into=(1,2) ),
13222 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
13223 # CONFIGURATION MANAGEMENT OF EDF VERSION
13224 # ======================================================================
13225 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
13226 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
13227 # REDISTRIBUTION OF THIS FILE.
13228 # ======================================================================
13229 def rest_base_phys_prod(RESU_GENE,RESULTAT,**args ):
13230 if AsType(RESU_GENE) == tran_gene : return dyna_trans
13231 if AsType(RESU_GENE) == mode_gene : return mode_meca
13232 if AsType(RESU_GENE) == mode_cycl : return mode_meca
13233 if AsType(RESU_GENE) == harm_gene : return dyna_harmo
13234 if AsType(RESULTAT) == mode_meca : return mode_meca
13235 raise AsException("type de concept resultat non prevu")
13237 REST_BASE_PHYS=OPER(nom="REST_BASE_PHYS",op= 75,sd_prod=rest_base_phys_prod,
13238 fr="Restituer dans la base physique des résultats en coordonnées généralisées",
13239 docu="U4.63.21-e",reentrant='n',
13240 regles=(UN_PARMI('RESU_GENE','RESULTAT'),
13241 EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','LIST_INST','TOUT_INST'),
13242 EXCLUS('TOUT_INST','NUME_ORDRE','INST','LIST_INST','TOUT_ORDRE'),
13244 PRESENT_ABSENT('MULT_APPUI','CORR_STAT'),
13245 EXCLUS('MULT_APPUI','NOEUD','GROUP_NO'),
13246 EXCLUS('CORR_STAT','NOEUD','GROUP_NO'),
13247 EXCLUS('NOEUD','GROUP_NO'),
13248 PRESENT_PRESENT('RESULTAT','SQUELETTE'),
13249 PRESENT_PRESENT('ACCE_MONO_APPUI','DIRECTION'),),
13250 RESU_GENE =SIMP(statut='f',typ=(tran_gene,mode_gene,mode_cycl,harm_gene ) ),
13251 RESULTAT =SIMP(statut='f',typ=mode_meca ),
13253 MODE_MECA =SIMP(statut='f',typ=mode_meca ),
13254 TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
13255 NUME_ORDRE =SIMP(statut='f',typ='I',max='**' ),
13256 TOUT_INST =SIMP(statut='f',typ='TXM',into=("OUI",) ),
13257 INST =SIMP(statut='f',typ='R',max='**' ),
13258 LIST_INST =SIMP(statut='f',typ=listr8 ),
13259 FREQ =SIMP(statut='f',typ='R',max='**' ),
13260 LIST_FREQ =SIMP(statut='f',typ=listr8 ),
13261 b_prec_crit =BLOC(condition = "INST != None or LIST_INST != None or FREQ != None or LIST_FREQ != None",
13262 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("ABSOLU","RELATIF") ),
13263 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
13265 INTERPOL =SIMP(statut='f',typ='TXM',defaut="NON",into=("NON","LIN") ),
13267 MULT_APPUI =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
13268 CORR_STAT =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
13269 NOM_CHAM =SIMP(statut='f',typ='TXM',max=8,defaut="ACCE",
13270 into=("DEPL","VITE","ACCE","ACCE_ABSOLU","EFGE_ELNO_DEPL","SIPO_ELNO_DEPL",
13271 "SIGM_ELNO_DEPL","FORC_NODA",) ),
13272 TOUT_CHAM =SIMP(statut='f',typ='TXM',into=("OUI",) ),
13273 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
13274 NOEUD =SIMP(statut='f',typ=no,max='**'),
13276 ACCE_MONO_APPUI =SIMP(statut='f',typ=fonction),
13277 DIRECTION =SIMP(statut='f',typ='R',max='**' ),
13279 SQUELETTE =SIMP(statut='f',typ=squelette ),
13280 SOUS_STRUC =SIMP(statut='f',typ='TXM' ),
13281 SECTEUR =SIMP(statut='f',typ='I',defaut= 1 ),
13282 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
13284 #& MODIF COMMANDE DATE 28/03/2001 AUTEUR CIBHHLV L.VIVAN
13285 # CONFIGURATION MANAGEMENT OF EDF VERSION
13286 # ======================================================================
13287 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
13288 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
13289 # REDISTRIBUTION OF THIS FILE.
13290 # ======================================================================
13291 REST_SPEC_PHYS=OPER(nom="REST_SPEC_PHYS",op= 148,sd_prod=tabl_intsp,
13292 docu="U4.63.22-c",reentrant='n',
13293 regles=(AU_MOINS_UN('BASE_ELAS_FLUI','MODE_MECA'),),
13294 BASE_ELAS_FLUI =SIMP(statut='f',typ=melasflu ),
13295 MODE_MECA =SIMP(statut='f',typ=mode_meca ),
13296 BANDE =SIMP(statut='f',typ='R',min=02,max=02 ),
13297 NUME_ORDRE =SIMP(statut='f',typ='I',max='**' ),
13298 INTE_SPEC_GENE =SIMP(statut='o',typ=tabl_intsp ),
13299 NOEUD =SIMP(statut='o',typ=no,max='**'),
13300 NOM_CMP =SIMP(statut='o',typ='TXM',max='**' ),
13301 MAILLE =SIMP(statut='f',typ=ma,max='**'),
13302 NOM_CHAM =SIMP(statut='o',typ='TXM',max=07,
13303 into=("DEPL","VITE","ACCE","EFGE_ELNO_DEPL",
13304 "SIPO_ELNO_DEPL","SIGM_ELNO_DEPL","FORC_NODA") ),
13305 MODE_STAT =SIMP(statut='f',typ=(mode_stat_depl,mode_stat_acce,mode_stat_forc), ),
13306 EXCIT =FACT(statut='f',max=01,
13307 NOEUD =SIMP(statut='o',typ=no,max='**'),
13308 NOM_CMP =SIMP(statut='o',typ='TXM',max='**' ),
13310 MOUVEMENT =SIMP(statut='f',typ='TXM',defaut="ABSOLU",into=("RELATIF","ABSOLU","DIFFERENTIEL") ),
13311 OPTION =SIMP(statut='f',typ='TXM',defaut="DIAG_DIAG",
13312 into=("DIAG_TOUT","DIAG_DIAG","TOUT_TOUT","TOUT_DIAG") ),
13313 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
13315 #& MODIF COMMANDE DATE 21/12/2000 AUTEUR DURAND C.DURAND
13316 # CONFIGURATION MANAGEMENT OF EDF VERSION
13317 # ======================================================================
13318 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
13319 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
13320 # REDISTRIBUTION OF THIS FILE.
13321 # ======================================================================
13322 RETOUR=PROC(nom="RETOUR",op= -2,docu="U4.13.02-e",
13323 fr="Retour au fichier de commandes appelant",
13325 #& MODIF COMMANDE DATE 30/01/2002 AUTEUR VABHHTS J.TESELET
13326 # CONFIGURATION MANAGEMENT OF EDF VERSION
13327 # ======================================================================
13328 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
13329 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
13330 # REDISTRIBUTION OF THIS FILE.
13331 # ======================================================================
13332 # RESPONSABLE ADBHHVV V.CANO
13333 STAT_NON_LINE=OPER(nom="STAT_NON_LINE",op=70,sd_prod=evol_noli,
13334 fr="Analyse mécanique statique non linéaire",
13335 docu="U4.51.03-e1",reentrant='f',
13336 regles=(AU_MOINS_UN('COMP_INCR','COMP_ELAS'),),
13337 MODELE =SIMP(statut='o',typ=modele),
13338 CHAM_MATER =SIMP(statut='o',typ=cham_mater),
13339 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
13340 EXCIT =FACT(statut='o',min=1,max='**',
13341 CHARGE =SIMP(statut='o',typ=char_meca),
13342 FONC_MULT =SIMP(statut='f',typ=fonction),
13343 TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FIXE_CSTE",
13344 into=("FIXE_CSTE","FIXE_PILO","SUIV","DIDI")),
13346 VARI_COMM =FACT(statut='f',
13347 regles=(AU_MOINS_UN('SECH','IRRA','HYDR'),),
13348 IRRA =SIMP(statut='f',typ=evol_varc),
13349 SECH =SIMP(statut='f',typ=evol_ther),
13350 HYDR =SIMP(statut='f',typ=evol_ther),
13352 COMP_INCR =FACT(statut='f',min=1,max='**',
13353 RELATION =SIMP(statut='o',typ='TXM',defaut="VMIS_ISOT_TRAC",
13362 "BETON_ENDO_LOCAL",
13378 "META_P_INL_PT_RE",
13382 "META_V_INL_PT_RE",
13418 "GRILLE_ISOT_LINE",
13419 "GRILLE_CINE_LINE",
13420 "GRILLE_PINTO_MEN",
13439 ELAS =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13440 VMIS_ISOT_TRAC =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13441 VMIS_ISOT_LINE =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13442 VMIS_ECMI_TRAC =SIMP(statut='c',typ='I',defaut=8,into=(8,)),
13443 VMIS_ECMI_LINE =SIMP(statut='c',typ='I',defaut=8,into=(8,)),
13444 LABORD_1D =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
13445 ENDO_LOCAL =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13446 ENDO_FRAGILE =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
13447 BETON_ENDO_LOCAL=SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13448 RUPT_FRAG =SIMP(statut='c',typ='I',defaut=4,into=(4,)),
13449 PLAS_GRAD_LINE =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
13450 PLAS_GRAD_TRAC =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
13451 DURC_GRAD =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
13452 META_P_IL =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13453 META_P_IL_PT =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13454 META_P_IL_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13455 META_P_IL_PT_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13456 META_V_IL =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13457 META_V_IL_PT =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13458 META_V_IL_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13459 META_V_IL_PT_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13460 META_P_INL =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13461 META_P_INL_PT =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13462 META_P_INL_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13463 META_P_INL_PT_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13464 META_V_INL =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13465 META_V_INL_PT =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13466 META_V_INL_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13467 META_V_INL_PT_RE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13468 META_P_CL =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
13469 META_P_CL_PT =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
13470 META_P_CL_RE =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
13471 META_P_CL_PT_RE =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
13472 META_V_CL =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
13473 META_V_CL_PT =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
13474 META_V_CL_RE =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
13475 META_V_CL_PT_RE =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
13476 VMIS_CINE_LINE =SIMP(statut='c',typ='I',defaut=7,into=(7,)),
13477 CHABOCHE =SIMP(statut='c',typ='I',defaut=14,into=(14,)),
13478 VISCOCHAB =SIMP(statut='c',typ='I',defaut=28,into=(28,)),
13479 VMIS_CIN1_CHAB =SIMP(statut='c',typ='I',defaut=8,into=(8,)),
13480 VMIS_CIN2_CHAB =SIMP(statut='c',typ='I',defaut=14,into=(14,)),
13481 POLY_CFC =SIMP(statut='c',typ='I',defaut=1688,into=(1688,)),
13482 LMARC =SIMP(statut='c',typ='I',defaut=20,into=(20,)),
13483 VISC_TAHERI =SIMP(statut='c',typ='I',defaut=9,into=(9,)),
13484 ROUSSELIER =SIMP(statut='c',typ='I',defaut=9,into=(9,)),
13485 ROUSS_PR =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
13486 ROUSS_VISC =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
13487 VMIS_POU_LINE =SIMP(statut='c',typ='I',defaut=9,into=(9,)),
13488 VMIS_POU_FLEJOU =SIMP(statut='c',typ='I',defaut=9 ,into=(9,)),
13489 COULOMB =SIMP(statut='c',typ='I',defaut=4,into=(4,)),
13490 ASSE_CORN =SIMP(statut='c',typ='I',defaut=4,into=(4,)),
13491 ARME =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13492 NORTON_HOFF =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13493 LEMAITRE =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13494 ZIRC_CYRA2 =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13495 ZIRC_EPRI =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13496 ASSE_COMBU =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
13497 NADAI_B =SIMP(statut='c',typ='I',defaut=34,into=(34,)),
13498 VENDOCHAB =SIMP(statut='c',typ='I',defaut=10,into=(10,)),
13499 GRILLE_ISOT_LINE=SIMP(statut='c',typ='I',defaut=4,into=(4,)),
13500 GRILLE_CINE_LINE=SIMP(statut='c',typ='I',defaut=4,into=(4,)),
13501 GRILLE_PINTO_MEN=SIMP(statut='c',typ='I',defaut=16,into=(16,)),
13502 DIS_CONTACT =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
13503 DIS_CHOC =SIMP(statut='c',typ='I',defaut=7,into=(7,)),
13504 DIS_GOUJ2E_PLAS =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13505 DIS_GOUJ2E_ELAS =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13506 PINTO_MENEGOTTO =SIMP(statut='c',typ='I',defaut=8,into=(8,)),
13507 CJS =SIMP(statut='c',typ='I',defaut=16,into=(16,)),
13508 OHNO =SIMP(statut='c',typ='I',defaut=32,into=(32,)),
13509 GRANGER_FP =SIMP(statut='c',typ='I',defaut=55,into=(55,)),
13510 GRANGER_FP_V =SIMP(statut='c',typ='I',defaut=55,into=(55,)),
13511 BETON_DOUBLE_DP =SIMP(statut='c',typ='I',defaut=4,into=(4,)),
13512 KIT_HM =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
13513 KIT_HHM =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
13514 KIT_THH =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
13515 KIT_THM =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
13516 KIT_THHM =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
13517 VMIS_ASYM_LINE =SIMP(statut='c',typ='I',defaut=4,into=(4,)),
13519 RELATION_KIT =SIMP(statut='f',typ='TXM',max='**',
13557 ELAS_THM =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13558 SURF_ETAT_NSAT =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13559 SURF_ETAT_SATU =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13560 CAM_CLAY_THM =SIMP(statut='c',typ='I',defaut=6,into=(6,)),
13561 GAZ =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13562 LIQU_SATU =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13563 LIQU_SATU_GAT =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13564 LIQU_GAZ_ATM =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13565 LIQU_VAPE_GAZ =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
13566 LIQU_NSAT_GAT =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
13567 LIQU_GAZ =SIMP(statut='c',typ='I',defaut=2,into=(2,)),
13568 THER_HOMO =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
13569 THER_POLY =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
13570 HYDR_UTIL =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
13571 HYDR =SIMP(statut='c',typ='I',defaut=0,into=(0,)),
13572 ACIER =SIMP(statut='c',typ='I',defaut=5,into=(5,)),
13573 ZIRC =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
13575 DEFORMATION =SIMP(statut='f',typ='TXM',defaut="PETIT",into=("PETIT","PETIT_REAC","SIMO_MIEHE","GREEN_GR","GREEN",)),
13576 ALGO_C_PLAN =SIMP(statut='f',typ='TXM',defaut="ANALYTIQUE",into=("DEBORST","ANALYTIQUE",)),
13577 regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
13578 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
13579 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
13580 MAILLE =SIMP(statut='f',typ=ma,max='**'),
13582 COMP_ELAS =FACT(statut='f',min=1,max='**',
13583 RELATION =SIMP(statut='o',typ='TXM',defaut="ELAS",
13584 into=("ELAS","ELAS_VMIS_LINE","ELAS_VMIS_TRAC",
13585 "ELAS_POUTRE_GR","CABLE")),
13586 ELAS =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13587 ELAS_VMIS_TRAC =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13588 ELAS_VMIS_LINE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13589 ELAS_POUTRE_GR =SIMP(statut='c',typ='I',defaut=3,into=(3,)),
13590 CABLE =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
13591 DEFORMATION =SIMP(statut='f',typ='TXM',defaut="PETIT" ,into=("PETIT","GREEN","GREEN_GR",) ),
13592 regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
13593 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
13594 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
13595 MAILLE =SIMP(statut='f',typ=ma,max='**'),
13597 ETAT_INIT =FACT(statut='f',min=1,max=1,
13598 regles=(AU_MOINS_UN('EVOL_NOLI','DEPL','SIGM','VARI','VARI_NON_LOCAL',),
13599 EXCLUS('EVOL_NOLI','DEPL',),
13600 EXCLUS('EVOL_NOLI','SIGM',),
13601 EXCLUS('EVOL_NOLI','VARI',),
13602 EXCLUS('EVOL_NOLI','VARI_NON_LOCAL',),
13603 EXCLUS('NUME_ORDRE','INST'), ),
13604 DEPL =SIMP(statut='f',typ=cham_no_depl_r),
13605 SIGM =SIMP(statut='f',typ=(cham_elem_sief_r,carte_sief_r)),
13606 VARI =SIMP(statut='f',typ=cham_elem_vari_r),
13607 VARI_NON_LOCAL =SIMP(statut='f',typ=cham_no_vanl_r),
13608 EVOL_NOLI =SIMP(statut='f',typ=evol_noli),
13609 NUME_ORDRE =SIMP(statut='f',typ='I'),
13610 INST =SIMP(statut='f',typ='R'),
13611 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
13612 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
13613 NUME_DIDI =SIMP(statut='f',typ='I'),
13614 INST_ETAT_INIT =SIMP(statut='f',typ='R'),
13616 INCREMENT =FACT(statut='o',min=1,max=1,
13617 regles=(EXCLUS('NUME_INST_INIT','INST_INIT'),
13618 EXCLUS('NUME_INST_FIN','INST_FIN'),),
13619 LIST_INST =SIMP(statut='o',typ=listr8),
13620 EVOLUTION =SIMP(statut='f',typ='TXM',defaut="CHRONOLOGIQUE",
13621 into=("CHRONOLOGIQUE","RETROGRADE","SANS",) ),
13622 NUME_INST_INIT =SIMP(statut='f',typ='I'),
13623 INST_INIT =SIMP(statut='f',typ='R'),
13624 NUME_INST_FIN =SIMP(statut='f',typ='I'),
13625 INST_FIN =SIMP(statut='f',typ='R'),
13626 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3 ),
13627 SUBD_PAS =SIMP(statut='f',typ='I',defaut=1),
13628 SUBD_PAS_MINI =SIMP(statut='f',typ='R'),
13629 COEF_SUBD_PAS_1 =SIMP(statut='f',typ='R',defaut= 1.0E+0),
13631 NEWTON =FACT(statut='d',min=1,max=1,
13632 REAC_INCR =SIMP(statut='f',typ='I',defaut= 1 ),
13633 PREDICTION =SIMP(statut='f',typ='TXM',into=("DEPL_CALCULE","TANGENTE","ELASTIQUE","EXTRAPOL") ),
13634 MATRICE =SIMP(statut='f',typ='TXM',defaut="TANGENTE",into=("TANGENTE","ELASTIQUE") ),
13635 PAS_MINI_ELAS =SIMP(statut='f',typ='R',defaut=0.0E+0),
13636 REAC_ITER =SIMP(statut='f',typ='I',defaut=0),
13637 EVOL_NOLI =SIMP(statut='f',typ=evol_noli),
13639 RECH_LINEAIRE =FACT(statut='f',min=1,max=1,
13640 RESI_LINE_RELA =SIMP(statut='f',typ='R',defaut= 1.0E-1 ),
13641 ITER_LINE_MAXI =SIMP(statut='f',typ='I',defaut= 3),
13643 PILOTAGE =FACT(statut='f',min=1,max=1,
13644 regles=(EXCLUS('NOEUD','GROUP_NO'),PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
13645 TYPE =SIMP(statut='o',typ='TXM',into=("DDL_IMPO","LONG_ARC","PRED_ELAS","PRED_ELAS_INCR","DEFORMATION","ANA_LIM") ),
13646 COEF_MULT =SIMP(statut='f',typ='R',defaut= 1.0E+0),
13647 ETA_PILO_MAX =SIMP(statut='f',typ='R'),
13648 ETA_PILO_MIN =SIMP(statut='f',typ='R'),
13649 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
13650 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
13651 MAILLE =SIMP(statut='f',typ=ma,max='**'),
13652 NOEUD =SIMP(statut='f',typ=no,max='**'),
13653 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
13654 NOM_CMP =SIMP(statut='f',typ='TXM',max='**' ),
13656 CONVERGENCE =FACT(statut='d',min=1,max=1,
13657 RESI_GLOB_MAXI =SIMP(statut='f',typ='R'),
13658 RESI_GLOB_RELA =SIMP(statut='f',typ='R'),
13659 ITER_GLOB_MAXI =SIMP(statut='f',typ='I',defaut=10),
13660 ITER_GLOB_ELAS =SIMP(statut='f',typ='I',defaut=25),
13661 ARRET =SIMP(statut='f',typ='TXM',defaut="OUI"),
13662 RESI_INTE_RELA =SIMP(statut='f',typ='R'
13664 ITER_INTE_MAXI =SIMP(statut='f',typ='I',defaut= 10 ),
13665 ITER_INTE_PAS =SIMP(statut='f',typ='I',defaut= 0 ),
13666 TYPE_MATR_COMP =SIMP(statut='f',typ='TXM',defaut="TANG_VIT",into=("TANG_VIT",)),
13667 RESO_INTE =SIMP(statut='f',typ='TXM',defaut="IMPLICITE",
13668 into=("RUNGE_KUTTA_2","RUNGE_KUTTA_4","IMPLICITE")),
13670 PARM_THETA =SIMP(statut='f',typ='R'
13672 SOLVEUR =FACT(statut='d',min=1,max=1,
13673 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
13674 b_mult_front =BLOC(condition = "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
13675 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
13677 b_ldlt =BLOC(condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
13678 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
13680 b_ldlt_mult =BLOC(condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
13681 fr="Paramètres relatifs à la non inversibilité de la matrice à factorise",
13682 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
13683 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON","DECOUPE") ),
13685 b_gcpc =BLOC(condition = "METHODE == 'GCPC' ", fr="Paramètres de la méthode du gradient conjugué",
13686 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
13687 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut= 0 ),
13688 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
13689 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
13690 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
13693 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
13694 SYME =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
13696 ARCHIVAGE =FACT(statut='f',min=1,max=1,
13697 regles=(EXCLUS('PAS_ARCH','LIST_INST','INST'),
13698 EXCLUS('ARCH_ETAT_INIT','NUME_INIT'), ),
13699 LIST_INST =SIMP(statut='f',typ=(listr8) ),
13700 INST =SIMP(statut='f',typ='R',max='**' ),
13701 PAS_ARCH =SIMP(statut='f',typ='I' ),
13702 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3),
13703 ARCH_ETAT_INIT =SIMP(statut='f',typ='TXM',into=("OUI",)),
13704 NUME_INIT =SIMP(statut='f',typ='I'),
13705 DETR_NUME_SUIV =SIMP(statut='f',typ='TXM',into=("OUI",)),
13706 CHAM_EXCLU =SIMP(statut='f',typ='TXM',max='**',into=("DEPL","SIEF_ELGA","VARI_ELGA",
13707 "VARI_NON_LOCAL","LANL_ELGA")),
13709 OBSERVATION =FACT(statut='f',min=1,max='**',
13710 regles=(UN_PARMI('NOEUD','GROUP_NO','MAILLE'),
13711 PRESENT_PRESENT('MAILLE','POINT'),),
13712 NOM_CHAM =SIMP(statut='o',typ='TXM',max='**',into=("DEPL","VITE","ACCE","SIEF_ELGA",
13713 "VARI_ELGA","DEPL_ABSOLU","VITE_ABSOLU","ACCE_ABSOLU")),
13714 NOM_CMP =SIMP(statut='o',typ='TXM',max='**' ),
13715 LIST_ARCH =SIMP(statut='f',typ=listis),
13716 LIST_INST =SIMP(statut='f',typ=listr8),
13717 INST =SIMP(statut='f',typ='R',max='**' ),
13718 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
13719 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
13720 PAS_OBSE =SIMP(statut='f',typ='I'),
13721 NOEUD =SIMP(statut='f',typ=no,max='**'),
13722 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
13723 MAILLE =SIMP(statut='f',typ=ma,max='**'),
13724 POINT =SIMP(statut='f',typ='I',max='**'),
13726 MODELE_NON_LOCAL=SIMP(statut='f',typ=modele ),
13727 b_non_local = BLOC ( condition = "MODELE_NON_LOCAL != None",
13728 fr="Données spécifiques au modèle non local",
13729 SOLV_NON_LOCAL =FACT(statut='f',min=1,max=1,
13730 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
13731 b_mult_front =BLOC(condition = "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
13732 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
13734 b_ldlt =BLOC(condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
13735 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
13737 b_ldlt_mult =BLOC(condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
13738 fr="Paramètres relatifs à la non inversibilité de la matrice à factorise",
13739 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
13740 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
13742 b_gcpc =BLOC(condition = "METHODE == 'GCPC' ", fr="Paramètres de la méthode du gradient conjugué",
13743 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
13744 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut= 0 ),
13745 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
13746 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
13748 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
13750 LAGR_NON_LOCAL =FACT(statut='f',max=1,
13751 ITER_DUAL_MAXI =SIMP(statut='f',typ='I',defaut= 50),
13752 RESI_DUAL_ABSO =SIMP(statut='o',typ='R'),
13753 RESI_PRIM_ABSO =SIMP(statut='o',typ='R'),
13754 RHO =SIMP(statut='f',typ='R',defaut= 1000.),
13755 ITER_PRIM_MAXI =SIMP(statut='f',typ='I',defaut= 10),
13758 INFO =SIMP(statut='f',typ='I',into=(1,2) ),
13759 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
13761 #& MODIF COMMANDE DATE 16/01/2002 AUTEUR DURAND C.DURAND
13762 # CONFIGURATION MANAGEMENT OF EDF VERSION
13763 # ======================================================================
13764 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
13765 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
13766 # REDISTRIBUTION OF THIS FILE.
13767 # ======================================================================
13768 # RESPONSABLE MCOURTOI M.COURTOIS
13769 TEST_FONCTION=PROC(nom="TEST_FONCTION",op= 135,fr="Extraction d une valeur numérique ou d un attribut de fonction",
13770 docu="U4.92.02-e1",
13771 FICHIER =SIMP(statut='f',typ='TXM',defaut="RESULTAT"),
13772 TEST_NOOK =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
13773 VALEUR =FACT(statut='f',min=01,max='**',
13774 fr="Tester la valeur d une fonction ou d une nappe",
13775 regles=(UN_PARMI('VALE_REFE','VALE_REFE_C', ),),
13776 FONCTION =SIMP(statut='o',typ=fonction ),
13777 NOM_PARA =SIMP(statut='f',typ='TXM',max=2),
13778 VALE_PARA =SIMP(statut='o',typ='R',max=2),
13779 VALE_REFE =SIMP(statut='f',typ='R' ),
13780 VALE_REFE_C =SIMP(statut='f',typ='C' ),
13781 CRITERE =SIMP(statut='f',typ='TXM',fr="Critère de comparaison avec la solution de référence",
13782 defaut="RELATIF",into=("RELATIF","ABSOLU") ),
13783 PRECISION =SIMP(statut='f',typ='R',fr="Ecart maximal autorisé avec la solution de référence",
13785 REFERENCE =SIMP(statut='f',typ='TXM',
13786 into=("ANALYTIQUE","SOURCE_EXTERNE","NON_REGRESSION","AUTRE_ASTER") ),
13787 b_version = BLOC (condition = "REFERENCE == 'NON_REGRESSION'",
13788 VERSION =SIMP(statut='f',typ='TXM' ),
13791 ATTRIBUT =FACT(statut='f',min=01,max='**',
13792 fr="Tester la valeur d un attribut d une fonction ou d''une nappe",
13793 FONCTION =SIMP(statut='o',typ=fonction ),
13794 PARA =SIMP(statut='f',typ='R' ),
13795 CRIT_PARA =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
13796 PREC_PARA =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
13797 ATTR =SIMP(statut='o',typ='TXM',
13798 into=("NOM_PARA","NOM_RESU","PROL_DROITE","PROL_GAUCHE","INTERPOL",
13799 "PROL_GAUCHE_FONC","PROL_DROITE_FONC","INTERPOL_FONC","NOM_PARA_FONC") ),
13800 ATTR_REFE =SIMP(statut='o',typ='TXM' ),
13801 REFERENCE =SIMP(statut='f',typ='TXM',
13802 into=("ANALYTIQUE","SOURCE_EXTERNE","NON_REGRESSION","AUTRE_ASTER") ),
13803 b_version =BLOC(condition = "REFERENCE == 'NON_REGRESSION'",
13804 VERSION =SIMP(statut='f',typ='TXM' ),
13807 TABL_INTSP =FACT(statut='f',min=01,max='**',
13808 fr="Tester la valeur d une fonction contenue dans une table interspectrale",
13809 regles=(UN_PARMI('NUME_ORDRE_I','NOEUD_I'),),
13810 INTE_SPEC =SIMP(statut='o',typ=tabl_intsp ),
13811 NOEUD_I =SIMP(statut='f',typ=no),
13812 NUME_ORDRE_I =SIMP(statut='f',typ='I' ),
13813 b_nume_ordre_i = BLOC (condition = "NUME_ORDRE_I != None",
13814 NUME_ORDRE_J =SIMP(statut='o',typ='I' ),
13816 b_noeud_i = BLOC (condition = "NOEUD_I != None",
13817 NOEUD_J =SIMP(statut='o',typ=no),
13818 NOM_CMP_I =SIMP(statut='o',typ='TXM' ),
13819 NOM_CMP_J =SIMP(statut='o',typ='TXM' ),
13821 NUME_VITE_FLUI =SIMP(statut='f',typ='I' ),
13822 VALE_PARA =SIMP(statut='o',typ='R' ),
13823 VALE_REFE_C =SIMP(statut='o',typ='C' ),
13824 CRITERE =SIMP(statut='f',typ='TXM',fr="Critère de comparaison avec la solution de référence",
13825 defaut="RELATIF",into=("RELATIF","ABSOLU") ),
13826 PRECISION =SIMP(statut='f',typ='R',fr="Ecart maximal autorisé avec la solution de référence",
13828 REFERENCE =SIMP(statut='f',typ='TXM',
13829 into=("ANALYTIQUE","SOURCE_EXTERNE","NON_REGRESSION","AUTRE_ASTER") ),
13830 b_version =BLOC(condition = "REFERENCE == 'NON_REGRESSION'",
13831 VERSION =SIMP(statut='f',typ='TXM' ),
13835 #& MODIF COMMANDE DATE 22/11/2001 AUTEUR VABHHTS J.PELLET
13836 # RESPONSABLE VABHHTS J.PELLET
13837 TEST_RESU=PROC(nom="TEST_RESU",op=23,docu="U4.92.01-f1",
13838 fr="Extraction d une valeur et comparaison à une valeur de référence",
13839 regles=(AU_MOINS_UN('CHAM_NO','CHAM_ELEM','RESU','OBJET')),
13840 FICHIER =SIMP(statut='f',typ='TXM',defaut="RESULTAT"),
13842 CHAM_NO =FACT(statut='f',min=01,max='**',
13843 regles=(UN_PARMI('NOEUD','GROUP_NO','TYPE_TEST'),
13844 EXCLUS('NOEUD','GROUP_NO'),
13845 PRESENT_PRESENT('NOEUD','NOM_CMP'),
13846 PRESENT_PRESENT( 'GROUP_NO','NOM_CMP'),
13847 UN_PARMI('VALE','VALE_I','VALE_C'),),
13848 CHAM_GD =SIMP(statut='o',typ=cham_no),
13849 NOEUD =SIMP(statut='f',typ=no,max='**'),
13850 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
13851 NOM_CMP =SIMP(statut='f',typ='TXM',max='**'),
13852 TYPE_TEST =SIMP(statut='f',typ='TXM',into=("SOMM_ABS","SOMM","MAX","MIN")),
13853 VALE =SIMP(statut='f',typ='R'),
13854 VALE_I =SIMP(statut='f',typ='I'),
13855 VALE_C =SIMP(statut='f',typ='C'),
13856 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU")),
13857 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3),
13858 REFERENCE =SIMP(statut='f',typ='TXM',into=("ANALYTIQUE","SOURCE_EXTERNE",
13859 "NON_REGRESSION","AUTRE_ASTER")),
13860 VERSION =SIMP(statut='f',typ='TXM'),
13863 CHAM_ELEM =FACT(statut='f',min=01,max='**',
13864 regles=(UN_PARMI('MAILLE','TYPE_TEST',),
13865 EXCLUS('NOEUD','GROUP_NO','POINT'),
13866 PRESENT_PRESENT('NOEUD','NOM_CMP'),
13867 PRESENT_PRESENT('GROUP_NO','NOM_CMP'),
13868 PRESENT_PRESENT('POINT','NOM_CMP'),
13869 UN_PARMI('VALE','VALE_I','VALE_C'), ),
13870 CHAM_GD =SIMP(statut='o',typ=cham_elem),# CO()
13871 MAILLE =SIMP(statut='f',typ=ma),# CO()
13872 POINT =SIMP(statut='f',typ='I' ),
13873 SOUS_POINT =SIMP(statut='f',typ='I'),
13874 NOEUD =SIMP(statut='f',typ=no),# CO()
13875 GROUP_NO =SIMP(statut='f',typ=grno),# CO()
13876 NOM_CMP =SIMP(statut='f',typ='TXM',max='**'),
13877 TYPE_TEST =SIMP(statut='f',typ='TXM',into=("SOMM_ABS","SOMM","MAX","MIN") ),
13878 VALE =SIMP(statut='f',typ='R' ),
13879 VALE_I =SIMP(statut='f',typ='I' ),
13880 VALE_C =SIMP(statut='f',typ='C' ),
13881 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU")),
13882 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
13883 REFERENCE =SIMP(statut='f',typ='TXM',into=("ANALYTIQUE","SOURCE_EXTERNE",
13884 "NON_REGRESSION","AUTRE_ASTER") ),
13885 VERSION =SIMP(statut='f',typ='TXM' ),
13888 RESU =FACT(statut='f',min=01,max='**',
13889 regles=(UN_PARMI('NUME_ORDRE','INST','FREQ','NUME_MODE','NOEUD_CMP','NOM_CAS','ANGL'),
13890 UN_PARMI('NOM_CHAM','PARA'),
13891 PRESENT_ABSENT('PARA','NOEUD','GROUP_NO','POINT','NOM_CMP','TYPE_TEST'),
13892 PRESENT_PRESENT('NOM_CMP','NOM_CHAM'),
13893 EXCLUS('NOEUD','GROUP_NO','POINT','TYPE_TEST'),
13894 PRESENT_PRESENT('NOEUD','NOM_CMP'),
13895 PRESENT_PRESENT('GROUP_NO','NOM_CMP'),
13896 PRESENT_PRESENT('POINT','NOM_CMP'),
13897 UN_PARMI('VALE','VALE_I','VALE_C') ,),
13898 RESULTAT =SIMP(statut='o',typ=resultat),
13899 SENSIBILITE =SIMP(statut='f',typ=(para_sensi,theta_geom),max='**',
13900 fr="Liste des paramètres de sensibilité.",
13901 ang="List of sensitivity parameters"),
13902 NUME_ORDRE =SIMP(statut='f',typ='I'),
13903 INST =SIMP(statut='f',typ='R'),
13904 FREQ =SIMP(statut='f',typ='R'),
13905 NUME_MODE =SIMP(statut='f',typ='I'),
13906 NOEUD_CMP =SIMP(statut='f',typ='TXM',max='**' ),
13907 NOM_CAS =SIMP(statut='f',typ='TXM'),
13908 ANGL =SIMP(statut='f',typ='R'),
13909 PARA =SIMP(statut='f',typ='TXM'),
13910 NOM_CHAM =SIMP(statut='f',typ='TXM'),
13911 NOM_CMP =SIMP(statut='f',typ='TXM',max='**'),
13912 MAILLE =SIMP(statut='f',typ=ma,max='**'),
13913 NOEUD =SIMP(statut='f',typ=no,max='**'),
13914 GROUP_NO =SIMP(statut='f',typ=grno,max='**'),
13915 POINT =SIMP(statut='f',typ='I'),
13916 SOUS_POINT =SIMP(statut='f',typ='I'),
13917 TYPE_TEST =SIMP(statut='f',typ='TXM',into=("SOMM_ABS","SOMM","MAX","MIN")),
13918 VALE =SIMP(statut='f',typ='R'),
13919 VALE_I =SIMP(statut='f',typ='I'),
13920 VALE_C =SIMP(statut='f',typ='C'),
13921 CRITERE =SIMP(statut='f',typ='TXM',into=("RELATIF","ABSOLU"),max=02),
13922 PRECISION =SIMP(statut='f',typ='R',max=02),
13923 REFERENCE =SIMP(statut='f',typ='TXM',into=("ANALYTIQUE","SOURCE_EXTERNE",
13924 "NON_REGRESSION","AUTRE_ASTER",) ),
13925 VERSION =SIMP(statut='f',typ='TXM' ),
13928 OBJET =FACT(statut='f',max='**',
13929 regles=(UN_PARMI('INDICE','S_I','S_R','RESUME',),
13930 UN_PARMI('VALE','VALE_I','VALE_C','RESUME','S_R','S_I'),),
13931 NOM =SIMP(statut='o',typ='TXM'),
13932 INDICE =SIMP(statut='f',typ='I'),
13933 NUM_OBJ =SIMP(statut='f',typ='I'),
13934 S_R =SIMP(statut='f',typ='R'),
13935 S_I =SIMP(statut='f',typ='I'),
13936 RESUME =SIMP(statut='f',typ='I'),
13937 VALE =SIMP(statut='f',typ='R'),
13938 VALE_I =SIMP(statut='f',typ='I'),
13939 VALE_C =SIMP(statut='f',typ='C'),
13940 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU")),
13941 PRECISION =SIMP(statut='f',typ='R',defaut=1.0E-3 ),
13942 REFERENCE =SIMP(statut='f',typ='TXM',into=("ANALYTIQUE","SOURCE_EXTERNE",
13943 "NON_REGRESSION","AUTRE_ASTER",) ),
13944 VERSION =SIMP(statut='f',typ='TXM' ),
13947 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
13948 # CONFIGURATION MANAGEMENT OF EDF VERSION
13949 # ======================================================================
13950 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
13951 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
13952 # REDISTRIBUTION OF THIS FILE.
13953 # ======================================================================
13954 # RESPONSABLE VABHHTS J.PELLET
13955 TEST_TABLE=PROC(nom="TEST_TABLE",op= 177,
13956 docu="U4.92.03-b1",
13957 regles=(UN_PARMI('VALE','VALE_I','VALE_C', ),),
13958 FICHIER =SIMP(statut='f',typ='TXM',defaut="RESULTAT"),
13959 # concept table à créer
13960 TABLE =SIMP(statut='o',typ=table),
13962 FILTRE =FACT(statut='f',min=1,max='**',
13963 NOM_PARA =SIMP(statut='o',typ='TXM' ),
13964 CRIT_COMP =SIMP(statut='f',typ='TXM',defaut="EQ",
13965 into=("EQ","LT","GT","NE","LE","GE","VIDE",
13966 "NON_VIDE","MAXI","ABS_MAXI","MINI","ABS_MINI") ),
13967 b_vale =BLOC(condition = "(CRIT_COMP in ('EQ','NE','GT','LT','GE','LE'))",
13968 regles=(UN_PARMI('VALE','VALE_I','VALE_K','VALE_C',),),
13969 VALE =SIMP(statut='f',typ='R' ),
13970 VALE_I =SIMP(statut='f',typ='I' ),
13971 VALE_C =SIMP(statut='f',typ='C' ),
13972 VALE_K =SIMP(statut='f',typ='TXM' ),),
13974 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
13975 PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
13977 TYPE_TEST =SIMP(statut='f',typ='TXM',into=("SOMM_ABS","SOMM","MAX","MIN") ),
13978 NOM_PARA =SIMP(statut='o',typ='TXM' ),
13979 VALE =SIMP(statut='f',typ='R' ),
13980 VALE_I =SIMP(statut='f',typ='I' ),
13981 VALE_C =SIMP(statut='f',typ='C' ),
13982 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
13983 PRECISION =SIMP(statut='f',typ='R',defaut= 1.2E-3 ),
13984 REFERENCE =SIMP(statut='f',typ='TXM',
13985 into=("ANALYTIQUE","SOURCE_EXTERNE","NON_REGRESSION","AUTRE_ASTER") ),
13986 b_version =BLOC(condition = "REFERENCE == 'NON_REGRESSION'",
13987 VERSION =SIMP(statut='f',typ='TXM' ),
13990 #& MODIF COMMANDE DATE 04/12/2001 AUTEUR GNICOLAS G.NICOLAS
13991 # CONFIGURATION MANAGEMENT OF EDF VERSION
13992 # ======================================================================
13993 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
13994 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
13995 # REDISTRIBUTION OF THIS FILE.
13996 # ======================================================================
13997 THER_LINEAIRE=OPER(nom="THER_LINEAIRE",op=25,sd_prod=evol_ther,docu="U4.54.01-f1",reentrant='f',
13998 fr="Analyse thermique linéaire stationnaire ou transitoire",
13999 MODELE =SIMP(statut='o',typ=modele),
14000 CHAM_MATER =SIMP(statut='o',typ=cham_mater),
14001 CARA_ELEM =SIMP(statut='f',typ=cara_elem),
14002 EXCIT =FACT(statut='o',min=1,max='**',
14003 CHARGE =SIMP(statut='o',typ=(char_ther,char_cine_ther)),
14004 FONC_MULT =SIMP(statut='f',typ=fonction),
14006 INCREMENT =FACT(statut='f',min=1,max=1,
14007 LIST_INST =SIMP(statut='o',typ=listr8 ),
14008 NUME_INIT =SIMP(statut='f',typ='I'),
14009 NUME_FIN =SIMP(statut='f',typ='I'),
14011 TEMP_INIT =FACT(statut='f',min=1,max=1,
14012 regles=(EXCLUS('STATIONNAIRE','EVOL_THER','CHAM_NO','VALE'),),
14013 STATIONNAIRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
14014 EVOL_THER =SIMP(statut='f',typ=evol_ther),
14015 CHAM_NO =SIMP(statut='f',typ=cham_no_temp_r),
14016 VALE =SIMP(statut='f',typ='R'),
14017 NUME_INIT =SIMP(statut='f',typ='I'),
14019 SENSIBILITE =SIMP(statut='f',typ=(para_sensi,theta_geom),max='**',
14020 fr="Liste des paramètres de sensibilité.",
14021 ang="List of sensitivity parameters",
14023 SENS_INIT =FACT(statut='f',min=1,max=1,
14024 regles=(EXCLUS('STATIONNAIRE','EVOL_THER', ),),
14025 STATIONNAIRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
14026 EVOL_THER =SIMP(statut='f',typ=evol_ther),
14027 NUME_INIT =SIMP(statut='f',typ='I'),
14029 SOLVEUR =FACT(statut='d',min=1,max=1,
14030 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
14031 b_mult_front =BLOC(condition = "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
14032 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
14034 b_ldlt =BLOC(condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
14035 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
14036 TAILLE_BLOC =SIMP(statut='f',typ='R',defaut= 400. ),
14038 b_ldlt_mult =BLOC(condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
14039 fr="Paramètres relatifs à la non inversibilité de la matrice à factorise",
14040 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
14041 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
14043 b_gcpc =BLOC(condition = "METHODE == 'GCPC' ", fr="Paramètres de la méthode du gradient conjugué",
14044 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
14045 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut= 0 ),
14046 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
14047 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
14048 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
14051 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
14053 PARM_THETA =SIMP(statut='f',typ='R',defaut= 0.57),
14054 ARCHIVAGE =FACT(statut='f',min=1,max=1,
14055 regles=(UN_PARMI('LIST_ARCH','PAS_ARCH','LIST_INST','INST'),),
14056 LIST_ARCH =SIMP(statut='f',typ=listis),
14057 LIST_INST =SIMP(statut='f',typ=listr8),
14058 INST =SIMP(statut='f',typ='R',max='**'),
14059 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
14060 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",
14061 into=("RELATIF","ABSOLU")),
14062 PAS_ARCH =SIMP(statut='f',typ='I'),
14063 CHAM_EXCLU =SIMP(statut='f',typ='TXM',into=("VARI",)),
14065 TITRE =SIMP(statut='f',typ='TXM',max='**'),
14066 INFO =SIMP(statut='f',typ='I',into=(1,2)),
14068 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
14069 # CONFIGURATION MANAGEMENT OF EDF VERSION
14070 # ======================================================================
14071 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
14072 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
14073 # REDISTRIBUTION OF THIS FILE.
14074 # ======================================================================
14075 THER_NON_LINE=OPER(nom="THER_NON_LINE",op= 186,sd_prod=evol_ther,docu="U4.54.02-d",reentrant='f',
14076 fr="Analyse thermique non linéaire stationnaire ou transitoire" ,
14077 MODELE =SIMP(statut='o',typ=(modele) ),
14078 CHAM_MATER =SIMP(statut='o',typ=(cham_mater) ),
14079 CARA_ELEM =SIMP(statut='c',typ=(cara_elem) ),
14080 COMP_THER_NL =FACT(statut='d',min=1,max='**',
14081 RELATION =SIMP(statut='f',typ='TXM',defaut="THER_NL",
14089 regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
14090 TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
14091 GROUP_MA =SIMP(statut='f',typ=grma,max='**'),
14092 MAILLE =SIMP(statut='f',typ=ma,max='**'),
14094 EVOL_THER_SECH =SIMP(statut='f',typ=evol_ther),
14095 EXCIT =FACT(statut='o',min=1,max='**',
14096 CHARGE =SIMP(statut='o',typ=char_ther),
14097 FONC_MULT =SIMP(statut='f',typ=fonction),
14099 INCREMENT =FACT(statut='f',min=1,max=1,
14100 LIST_INST =SIMP(statut='o',typ=listr8),
14101 NUME_INIT =SIMP(statut='f',typ='I'),
14102 NUME_FIN =SIMP(statut='f',typ='I'),
14104 TEMP_INIT =FACT(statut='f',min=1,max=1,
14105 regles=(EXCLUS('STATIONNAIRE','EVOL_THER','CHAM_NO','VALE'),),
14106 STATIONNAIRE =SIMP(statut='f',typ='TXM',into=("OUI",)),
14107 EVOL_THER =SIMP(statut='f',typ=evol_ther),
14108 CHAM_NO =SIMP(statut='f',typ=cham_no_temp_r),
14109 VALE =SIMP(statut='f',typ='R'),
14110 NUME_INIT =SIMP(statut='f',typ='I'),
14112 NEWTON =FACT(statut='d',min=1,max=1,
14113 REAC_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
14114 RESI_LINE_RELA =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
14115 ITER_LINE_MAXI =SIMP(statut='f',typ='I',defaut= 0 ),
14117 CONVERGENCE =FACT(statut='d',min=1,max=1,
14118 RESI_GLOB_MAXI =SIMP(statut='f',typ='R'),
14119 RESI_GLOB_RELA =SIMP(statut='f',typ='R'),
14120 ITER_GLOB_MAXI =SIMP(statut='f',typ='I',defaut= 10 ),
14122 SOLVEUR =FACT(statut='d',min=1,max=1,
14123 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
14124 b_mult_front =BLOC(condition = "METHODE == 'MULT_FRONT' ",fr="Parametres de la méthode multi frontale",
14125 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
14127 b_ldlt =BLOC(condition = "METHODE == 'LDLT' ",fr="Parametres de la méthode LDLT",
14128 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
14130 b_ldlt_mult =BLOC(condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
14131 fr="Parametres relatifs a la non inversibilité de la matrice a factorise",
14132 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
14133 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
14135 b_gcpc =BLOC(condition = "METHODE == 'GCPC' ", fr="Parametres de la méthode du gradient conjugué",
14136 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
14137 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut= 0 ),
14138 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
14139 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
14140 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
14143 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
14144 SYME =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON",) ),
14146 PARM_THETA =SIMP(statut='f',typ='R',defaut= 0.57 ),
14147 ARCHIVAGE =FACT(statut='f',min=1,max=1,
14148 regles=(UN_PARMI('LIST_ARCH','PAS_ARCH','LIST_INST','INST', ),),
14149 LIST_ARCH =SIMP(statut='f',typ=(listis) ),
14150 LIST_INST =SIMP(statut='f',typ=(listr8) ),
14151 INST =SIMP(statut='f',typ='R',max='**'),
14152 PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
14153 CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU",) ),
14154 PAS_ARCH =SIMP(statut='f',typ='I'),
14155 CHAM_EXCLU =SIMP(statut='f',typ='TXM',into=("VARI",)),
14157 TITRE =SIMP(statut='f',typ='TXM',max='**'),
14158 OPTION =SIMP(statut='f',typ='TXM',max='**',
14159 into=("FLUX_ELGA_TEMP","FLUX_ELNO_TEMP") ),
14160 INFO =SIMP(statut='f',typ='I',into=(1,2) ),
14162 #& MODIF COMMANDE DATE 05/12/2001 AUTEUR VABHHTS J.PELLET
14163 # CONFIGURATION MANAGEMENT OF EDF VERSION
14164 # ======================================================================
14165 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
14166 # SEE THE FILE "LICENSE.TERMS" FOR INFORMATION ON USAGE AND
14167 # REDISTRIBUTION OF THIS FILE.
14168 # ======================================================================
14169 THER_NON_LINE_MO=OPER(nom="THER_NON_LINE_MO",op= 171,sd_prod=evol_ther,
14170 fr="Thermique non lineaire en repere mobile",
14171 docu="U4.54.03-b",reentrant='f',
14172 MODELE =SIMP(statut='o',typ=modele ),
14173 CHAM_MATER =SIMP(statut='o',typ=cham_mater ),
14174 CARA_ELEM =SIMP(statut='c',typ=cara_elem ),
14175 EXCIT =FACT(statut='o',min=1,max='**',
14176 CHARGE =SIMP(statut='o',typ=char_ther ),
14177 FONC_MULT =SIMP(statut='c',typ=fonction ),
14179 TEMP_INIT =FACT(statut='f',min=1,max=1,
14180 EVOL_THER =SIMP(statut='f',typ=evol_ther ),
14181 NUME_INIT =SIMP(statut='f',typ='I',defaut= 0 ),
14183 CONVERGENCE =FACT(statut='d',min=1,max=1,
14184 CRIT_TEMP_RELA =SIMP(statut='f',typ='R',defaut= 1.E-3 ),
14185 CRIT_ENTH_RELA =SIMP(statut='f',typ='R',defaut= 1.E-2 ),
14186 ITER_GLOB_MAXI =SIMP(statut='f',typ='I',defaut= 10 ),
14187 ARRET =SIMP(statut='c',typ='TXM',defaut="OUI",into=("OUI","NON") ),
14189 SOLVEUR =FACT(statut='d',min=1,max=1,
14190 METHODE =SIMP(statut='f',typ='TXM',defaut="MULT_FRONT",into=("MULT_FRONT","LDLT","GCPC") ),
14191 b_mult_front =BLOC(condition = "METHODE == 'MULT_FRONT' ",fr="Paramètres de la méthode multi frontale",
14192 RENUM =SIMP(statut='f',typ='TXM',defaut="METIS",into=("MD","MDA","METIS") ),
14194 b_ldlt =BLOC(condition = "METHODE == 'LDLT' ",fr="Paramètres de la méthode LDLT",
14195 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("RCMK","SANS") ),
14197 b_ldlt_mult =BLOC(condition = "METHODE == 'LDLT' or METHODE == 'MULT_FRONT' ",
14198 fr="Paramètres relatifs à la non inversibilité de la matrice à factorise",
14199 NPREC =SIMP(statut='f',typ='I',defaut= 8 ),
14200 STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON") ),
14202 b_gcpc =BLOC(condition = "METHODE == 'GCPC' ", fr="Paramètres de la méthode du gradient conjugué",
14203 PRE_COND =SIMP(statut='f',typ='TXM',into=("LDLT_INC","SANS","DIAG") ),
14204 NIVE_REMPLISSAGE=SIMP(statut='f',typ='I',defaut= 0 ),
14205 RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
14206 RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6 ),
14207 NMAX_ITER =SIMP(statut='f',typ='I',defaut= 0 ),
14209 EPS =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
14210 SYME =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
14212 TITRE =SIMP(statut='f',typ='TXM',max='**' ),
14213 INFO =SIMP(statut='f',typ='I',into=(1,2) ),