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
64
65
66
67
|
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2012 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: emmanuel.boyere at edf.fr
def proj_base_prod(self,MATR_ASSE_GENE,VECT_ASSE_GENE,
RESU_GENE, NUME_DDL_GENE,
STOCKAGE,**args ):
if NUME_DDL_GENE is not None and NUME_DDL_GENE.is_typco():
self.type_sdprod(NUME_DDL_GENE, nume_ddl_gene)
if MATR_ASSE_GENE != None:
for m in MATR_ASSE_GENE:
self.type_sdprod(m['MATRICE'],matr_asse_gene_r)
if VECT_ASSE_GENE != None:
for v in VECT_ASSE_GENE:
self.type_sdprod(v['VECTEUR'],vect_asse_gene)
if RESU_GENE != None:
for v in RESU_GENE:
self.type_sdprod(v['RESULTAT'],tran_gene)
return None
PROJ_BASE=MACRO(nom="PROJ_BASE",
op=OPS('Macro.proj_base_ops.proj_base_ops'),
regles=(AU_MOINS_UN('MATR_ASSE_GENE','VECT_ASSE_GENE','RESU_GENE')),
UIinfo={"groupes":("Matrices et vecteurs","Dynamique",)},
sd_prod=proj_base_prod,
fr="Projection des matrices et/ou vecteurs assembles sur une base (modale ou de RITZ)",
BASE =SIMP(statut='o',typ=(mode_meca,mode_gene) ),
NB_VECT =SIMP(statut='f',typ='I',defaut= 9999),
STOCKAGE =SIMP(statut='f',typ='TXM',defaut="PLEIN",into=("PLEIN","DIAG") ),
NUME_DDL_GENE =SIMP(statut='f',typ=(nume_ddl_gene,CO),defaut=None),
MATR_ASSE_GENE =FACT(statut='f',max='**',
MATRICE =SIMP(statut='o',typ=CO,),
regles=(UN_PARMI('MATR_ASSE','MATR_ASSE_GENE',),),
MATR_ASSE =SIMP(statut='f',typ=matr_asse_depl_r),
MATR_ASSE_GENE =SIMP(statut='f',typ=matr_asse_gene_r),
),
VECT_ASSE_GENE =FACT(statut='f',max='**',
VECTEUR =SIMP(statut='o',typ=CO,),
regles=(UN_PARMI('VECT_ASSE','VECT_ASSE_GENE',),),
TYPE_VECT =SIMP(statut='f',typ='TXM',defaut="FORC"),
VECT_ASSE =SIMP(statut='f',typ=cham_no_sdaster),
VECT_ASSE_GENE =SIMP(statut='f',typ=vect_asse_gene),
),
RESU_GENE =FACT(statut='f',max='**',
RESULTAT =SIMP(statut='o',typ=CO,),
TYPE_VECT =SIMP(statut='f',typ='TXM',defaut="FORC"),
RESU =SIMP(statut='o',typ=dyna_trans),
),
INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2)),
) ;
|
