1 #@ MODIF macro_proj_base_ops Macro DATE 16/10/2007 AUTEUR REZETTE C.REZETTE
2 # -*- coding: iso-8859-1 -*-
3 # CONFIGURATION MANAGEMENT OF EDF VERSION
4 # ======================================================================
5 # COPYRIGHT (C) 1991 - 2002 EDF R&D WWW.CODE-ASTER.ORG
6 # THIS PROGRAM IS FREE SOFTWARE; YOU CAN REDISTRIBUTE IT AND/OR MODIFY
7 # IT UNDER THE TERMS OF THE GNU GENERAL PUBLIC LICENSE AS PUBLISHED BY
8 # THE FREE SOFTWARE FOUNDATION; EITHER VERSION 2 OF THE LICENSE, OR
9 # (AT YOUR OPTION) ANY LATER VERSION.
11 # THIS PROGRAM IS DISTRIBUTED IN THE HOPE THAT IT WILL BE USEFUL, BUT
12 # WITHOUT ANY WARRANTY; WITHOUT EVEN THE IMPLIED WARRANTY OF
13 # MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. SEE THE GNU
14 # GENERAL PUBLIC LICENSE FOR MORE DETAILS.
16 # YOU SHOULD HAVE RECEIVED A COPY OF THE GNU GENERAL PUBLIC LICENSE
17 # ALONG WITH THIS PROGRAM; IF NOT, WRITE TO EDF R&D CODE_ASTER,
18 # 1 AVENUE DU GENERAL DE GAULLE, 92141 CLAMART CEDEX, FRANCE.
19 # ======================================================================
23 def macro_proj_base_ops(self,BASE,NB_VECT,MATR_ASSE_GENE,VECT_ASSE_GENE,PROFIL,**args):
25 Ecriture de la macro MACRO_PROJ_BASE
28 from Utilitai.Utmess import UTMESS
29 # On importe les definitions des commandes a utiliser dans la macro
30 NUME_DDL_GENE =self.get_cmd('NUME_DDL_GENE')
31 PROJ_MATR_BASE =self.get_cmd('PROJ_MATR_BASE')
32 PROJ_VECT_BASE =self.get_cmd('PROJ_VECT_BASE')
33 # La macro compte pour 1 dans la numerotation des commandes
36 _num=NUME_DDL_GENE(BASE=BASE,NB_VECT=NB_VECT,STOCKAGE=PROFIL)
38 for m in MATR_ASSE_GENE:
40 if m['MATR_ASSE'] : motscles['MATR_ASSE'] =m['MATR_ASSE']
41 elif m['MATR_ASSE_GENE']: motscles['MATR_ASSE_GENE']=m['MATR_ASSE_GENE']
43 UTMESS('F','MODAL0_1')
44 self.DeclareOut('mm',m['MATRICE'])
45 mm=PROJ_MATR_BASE(BASE=BASE,NUME_DDL_GENE=_num,**motscles)
48 _num=NUME_DDL_GENE(BASE=BASE,NB_VECT=NB_VECT,STOCKAGE=PROFIL)
49 for v in VECT_ASSE_GENE:
51 if v['VECT_ASSE'] : motscles['VECT_ASSE'] =v['VECT_ASSE']
52 elif v['VECT_ASSE_GENE']: motscles['VECT_ASSE_GENE']=v['VECT_ASSE_GENE']
54 UTMESS('F','MODAL0_1')
55 motscles['TYPE_VECT']=v['TYPE_VECT']
56 self.DeclareOut('vv',v['VECTEUR'])
57 vv=PROJ_VECT_BASE(BASE=BASE,NUME_DDL_GENE=_num,**motscles)