1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2013 EDF R&D WWW.CODE-ASTER.ORG
# THIS PROGRAM IS FREE SOFTWARE; YOU CAN REDISTRIBUTE IT AND/OR MODIFY
# IT UNDER THE TERMS OF THE GNU GENERAL PUBLIC LICENSE AS PUBLISHED BY
# THE FREE SOFTWARE FOUNDATION; EITHER VERSION 2 OF THE LICENSE, OR
# (AT YOUR OPTION) ANY LATER VERSION.
#
# THIS PROGRAM IS DISTRIBUTED IN THE HOPE THAT IT WILL BE USEFUL, BUT
# WITHOUT ANY WARRANTY; WITHOUT EVEN THE IMPLIED WARRANTY OF
# MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. SEE THE GNU
# GENERAL PUBLIC LICENSE FOR MORE DETAILS.
#
# YOU SHOULD HAVE RECEIVED A COPY OF THE GNU GENERAL PUBLIC LICENSE
# ALONG WITH THIS PROGRAM; IF NOT, WRITE TO EDF R&D CODE_ASTER,
# 1 AVENUE DU GENERAL DE GAULLE, 92141 CLAMART CEDEX, FRANCE.
# ======================================================================
# person_in_charge: mathieu.courtois at edf.fr
def extr_table_prod(TYPE_RESU,**args):
defs = globals()
typ = TYPE_RESU.lower()
if defs.get(typ) is not None:
return defs[typ]
raise AsException("type de concept resultat non prevu")
EXTR_TABLE=OPER(nom="EXTR_TABLE",
op=173,
sd_prod=extr_table_prod,
reentrant='n',
UIinfo={"groupes":("Résultats et champs","Tables")},
fr="Extraire d'une table des concepts Code_Aster",
TYPE_RESU =SIMP(statut='o',typ='TXM',
into=('MATR_ASSE_GENE_R', 'MATR_ELEM_DEPL_R',
'VECT_ELEM_DEPL_R',
'CHAM_GD_SDASTER', 'CHAM_NO_SDASTER',
'CARTE_SDASTER', 'CHAM_ELEM',
'MODE_MECA',
'FONCTION_SDASTER', 'FONCTION_C', 'NAPPE_SDASTER',
'ENTIER', 'REEL'),),
TABLE =SIMP(statut='o',typ=(table_sdaster,table_container)),
NOM_PARA =SIMP(statut='o',typ='TXM'),
FILTRE =FACT(statut='f',min=1,max='**',
NOM_PARA =SIMP(statut='o',typ='TXM'),
CRIT_COMP =SIMP(statut='f',typ='TXM',defaut="EQ",
into=("EQ","LT","GT","NE","LE","GE","VIDE",
"NON_VIDE","MAXI","MAXI_ABS","MINI","MINI_ABS") ),
b_vale =BLOC(condition = "(CRIT_COMP in ('EQ','NE','GT','LT','GE','LE'))",
regles=(UN_PARMI('VALE','VALE_I','VALE_K','VALE_C',),),
VALE =SIMP(statut='f',typ='R'),
VALE_I =SIMP(statut='f',typ='I'),
VALE_C =SIMP(statut='f',typ='C'),
VALE_K =SIMP(statut='f',typ='TXM'),),
CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU") ),
PRECISION =SIMP(statut='f',typ='R',defaut= 1.0E-3 ),
),
TITRE =SIMP(statut='f',typ='TXM',max='**' ),
) ;
|
