1 from Accas import SIMP,FACT,OPER,ASSD,AsException,AsType,CO,MACRO
6 CONTEXT.unset_current_cata()
7 CONTEXT.set_current_cata(self)
8 def enregistre(self,cmd):
13 class concept(ASSD):pass
15 OP1 = OPER(nom='OP1',op=1,sd_prod=concept,
17 c=SIMP(typ='I',position='global'),
20 class concept2(ASSD):pass
21 class concept3(ASSD):pass
23 def op2_prod(self,MATR,**args):
24 self.type_sdprod(MATR,concept2)
27 OP2=MACRO(nom='OP2',op=-2,sd_prod=op2_prod,
28 MATR=SIMP(statut='o',typ=(CO,concept2)),
31 def op3_prod(self,MATR,**args):
34 if t == 'R':self.type_sdprod(m['MM'],concept)
37 OP3=MACRO(nom='OP3',op=-3,sd_prod=op3_prod,
38 MATR=FACT(statut='f',min=1,max='**',
39 CHAM=SIMP(statut='o',typ='TXM',into=("R","I"),),
40 MM=SIMP(statut='o',typ=(CO,concept)),
45 def op4_prod(self,MATR,**args):
46 if MATR == None :raise AsException("impossible recuperer mot cle facteur par defaut")
49 OP4=MACRO(nom='OP4',op=-4,sd_prod=op4_prod,
50 MATR=FACT(statut='d',min=1,max='**',
51 CHAM=SIMP(statut='f',typ='TXM',defaut="R"),
54 OP5=MACRO(nom='OP5',op=-2,sd_prod=op2_prod, MATR=SIMP(statut='o',typ=CO),)
56 def OP6_ops(self,MATR,**args):
61 self.DeclareOut('cc',self.sd)
65 OP6=MACRO(nom='OP6',op=OP6_ops,sd_prod=op2_prod, MATR=SIMP(statut='o',typ=CO),)