1 #@ MODIF sd_gfibre SD DATE 10/07/2007 AUTEUR PELLET J.PELLET
2 # -*- coding: iso-8859-1 -*-
3 # CONFIGURATION MANAGEMENT OF EDF VERSION
4 # ======================================================================
5 # COPYRIGHT (C) 1991 - 2007 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 # ======================================================================
22 from SD.sd_titre import sd_titre
25 class sd_gfibre(sd_titre):
26 #-------------------------------------
30 NOMS_GROUPES = AsPn(ltyp=8)
31 NB_FIBRE_GROUPE = AsVI()
34 def check_dimension(self,checker) :
35 nbgf=self.NOMS_GROUPES.nommax
36 assert self.NB_FIBRE_GROUPE.lonmax == nbgf
37 assert self.POINTEUR.lonmax == nbgf
40 def check_CARFI(self,checker) :
41 nbgf=self.NOMS_GROUPES.nommax
42 pointeur=self.POINTEUR.get()
43 nb_fibre=self.NB_FIBRE_GROUPE.get()
45 for igf in range(nbgf) :
46 assert pointeur[igf]==3*nbfib_tot +1 , (igf, nbfib_tot, pointeur[igf])
48 nbfib_tot=nbfib_tot+nbfib
49 assert self.CARFI.lonmax == 3*nbfib_tot , (nbfib_tot,self.CARFI.lonmax)