-#@ MODIF calc_europlexus_ops Macro DATE 24/11/2008 AUTEUR ASSIRE A.ASSIRE
+#@ MODIF calc_europlexus_ops Macro DATE 28/04/2009 AUTEUR ASSIRE A.ASSIRE
# -*- coding: iso-8859-1 -*-
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
#-----------------------------------------------------------------------
#----------------------------- Importation des modules ----------------
#-----------------------------------------------------------------------
+
+# unite associe au fichier ou le pos-traitement CASTE2000 est fait en commandes epx
+# unite_cast2000 = 0 # il ne fait pas le pos-traitement
+# __temp
+unite_cast2000 = 95
+
debug = False
dryrun = False
import aster
from Accas import _F
from Utilitai.partition import MAIL_PY
+ from Utilitai.Utmess import UTMESS
except:
pass
def setlist(self,fact):
#print 'types.TypeType(fact)',types.TypeType(fact)
if fact is None : return fact
- if not types.TypeType(fact) in [types.ListType,types.TupleType] : fact= [fact]
+ #if not types.TypeType(fact) in [types.ListType,types.TupleType] : fact= [fact]
+ if not (isinstance(fact,types.ListType) or isinstance(fact,types.TupleType)) : fact= [fact]
return fact
#-----------------------------------------------------------------------
champ_fact = self.ARCHIVAGE
if champ_fact is not None : options += ' MEDE'
epx[MODULE].append(options)
- epx[MODULE].append('\n')
+ epx[MODULE].append('\n')
+
+ # __temp
+ fichier_cast2000 = 'fort.%i' %unite_cast2000
+ if unite_cast2000 and os.path.isfile(fichier_cast2000) :
+ sorite_cast2000 = self.pwd + 'REPE_OUT/post.k2000'
+ epx[MODULE].append('OPNF 12')
+ epx[MODULE].append(2*' ' + "'%s'" %sorite_cast2000)
+ epx[MODULE].append('\n')
#-----------------------------------------------------------------------
def export_MAILLAGE(self,format='CASTEM'):
if elem['CARA'] == 'M_T_D_N' :
group_ma = self.get_group_ma(elem)
vale = elem['VALE']
- epx[MODULE].append('MASSE 123456 %g' %vale)
+ epx[MODULE].append('MASSE 123456 %s' %vale)
epx[MODULE].append(7*' ' + 'LECT')
for group in group_ma:
epx[MODULE].append(11*' '+group)
else :
self.listEpais.append({'VALE' : 1., 'GROUP_MA' : group_ma, 'NOM_CMP' : 'X21'})
self.listEpais2.append({'VALE' : 1., 'GROUP_MA' : group_ma, 'NOM_CMP' : 'X22'})
- st = 'EPAIS %g ' %epais
+ st = 'EPAIS %s ' %epais
#ajouter les group_ma qui ont ete affecte par ces caracteristiques
epx[MODULE].append(st+'LECT')
for group in group_ma:
dic_corresp = {'HY':'AY','HZ':'AZ'}
epx[MODULE].append(st)
# ajouter le vecteur definisant l'orientation de la section
- epx[MODULE].append(len(st)*' ' + 'VX %g' %vect_y[0])
- epx[MODULE].append(len(st)*' ' + 'VY %g' %vect_y[1])
- epx[MODULE].append(len(st)*' ' + 'VZ %g' %vect_y[2])
+ epx[MODULE].append(len(st)*' ' + 'VX %s' %vect_y[0])
+ epx[MODULE].append(len(st)*' ' + 'VY %s' %vect_y[1])
+ epx[MODULE].append(len(st)*' ' + 'VZ %s' %vect_y[2])
# ajouter les caracteristiques de la poutre
cara = elem['CARA']
vale = elem['VALE']
car = cara[icar]
val = vale[icar]
car_epx = dic_corresp[car]
- epx[MODULE].append(len(st)*' ' + '%s %g' %(car_epx,val))
+ epx[MODULE].append(len(st)*' ' + '%s %s' %(car_epx,val))
# ajouter les group_ma qui ont ete affecte par ces caracteristiques
epx[MODULE].append(5*' '+'LECT')
for group in group_ma:
# Traduction des fonctions definies dans FONC_PARASOL
#dic_fonc_parasol = self.get_FONC_PARASOL(list_rigi_parasol)
dic_fonc_parasol = self.get_FONC_PARASOL()
+# if not dic_fonc_parasol: return
+
epx[MODULE] = ['*--SUPPORT ELASTIQUE']
# si l'utilisateur a lui meme fourni des GROUP_MA de discrets : on commence par la
raise 'Discret non defini'
vale = self.discretParasol[gma]
epx[MODULE].append('SUPPORT')
- epx[MODULE].append(6*' '+'KX %g KY %g KZ %g'%(vale[0],vale[1],vale[2]))
- epx[MODULE].append(6*' '+'KRX %g KRY %g KRZ %g'%(vale[3],vale[4],vale[5]))
+ epx[MODULE].append(6*' '+'KX %s KY %s KZ %s'%(vale[0],vale[1],vale[2]))
+ epx[MODULE].append(6*' '+'KRX %s KRY %s KRZ %s'%(vale[3],vale[4],vale[5]))
for cle_fonc_parasol in dic_fonc_parasol.keys() :
epx[MODULE].append(6*' ' + '%s %i' %(cle_fonc_parasol,dic_fonc_parasol[cle_fonc_parasol]) )
- epx[MODULE].append(6*' '+'LECT %s TERM'%gma)
- group_union += '%s '%gma
+ epx[MODULE].append(6*' '+'LECT %s TERM'% gma)
+ group_union += '%s '% gma
if len(gmaParasol) > 0 :
epx['MODELE'].append(5*' ' + 'APPU ' + group_union)
# traduire les rigi_parasol
- if list_rigi_parasol :
+# AA if list_rigi_parasol :
+ if list_rigi_parasol and dic_fonc_parasol:
# changement de module parce que les supports issus de RIGI_PARASOL doivent etre imprimes apres les materiaux
# fichiers_parasol = []
# cles_oblig = ['UNITE_EUROPLEXUS','GROUP_MA_POI1']
# ecriture du group_ma associe
# noeud = ressor[0]
group_ma = dic_gma[noeud]
- epx[MODULE].append(3*' ' + 'LECT %s TERM' %group_ma)
+ epx[MODULE].append(3*' ' + 'LECT %s TERM' % group_ma)
epx[MODULE].append('\n')
CREA_GROUP_MA = dicma
)
- # Mettre a jour le module modele qd les ressots existent
+ # Mettre a jour le module modele qd les ressorts existent
epx['MODELE'].append(5*' ' + 'APPU ' + group_union)
+
# Fermer le module modele dans tous les cas
self.multidomaine = 0
listInterfaces = self.INTERFACES
if self.gmaInterfaces :
epx['CHAM_MATER'].append('FANTOME 0. LECT')
for gma in self.gmaInterfaces :
- epx['CHAM_MATER'].append(15*' '+'%s'%gma)
+ epx['CHAM_MATER'].append(15*' '+'%s'% gma)
epx['CHAM_MATER'].append(' TERM')
epx['CHAM_MATER'].append('\n')
# DEFINITION REPERES ORTHOTROPIE QUI DOIT ETRE APRES LES SUPPORTS
for gma in self.gmaGLRC :
if gma not in self.dicOrthotropie :
- raise "Erreur : %s non affecte par un repere d'orthotropie : ajouter le mot-cle 'VECTEUR' dans AFFE_CARA_ELEM"%gma
+ raise "Erreur : %s non affecte par un repere d'orthotropie : ajouter le mot-cle 'VECTEUR' dans AFFE_CARA_ELEM"% gma
vale = self.dicOrthotropie[gma]
- epx[MODULE].append('COMP ORTS %g %g %g'%(vale[0],vale[1],vale[2]))
+ epx[MODULE].append('COMP ORTS %s %s %s'%(vale[0],vale[1],vale[2]))
epx[MODULE].append(3*' '+'LECT')
- epx[MODULE].append(7*' '+'%s'%gma)
+ epx[MODULE].append(7*' '+'%s'% gma)
epx[MODULE].append(3*' '+'TERM')
epx[MODULE].append('\n')
# Cles de FONC_PARASOL dans l'ordre
cles = ['NFKT','NFKR']
# Dictionnaire faisant la correspondance entre la fonction et son numero europlexus
- dic_fonc = {}
+ dic_fonc = {}
try :
ifonc = self.ifonc
if debug: print 'self.ifonc = %s'%ifonc
for cle in cles:
ifonc += 1
dic_fonc[cle] = ifonc
- fonction = self.get_motcle(self.FONC_PARASOL,cle,code_mess='A')
+ fonction = self.get_motcle(self.FONC_PARASOL,cle,code_mess=None)
+ if not fonction: return {} # Si les mots-cles sont manquants on passe
(temps,valeurs) = fonction.Valeurs()
# imprimer les valeurs de la table
epx[MODULE].append(5*' ' +'NOPA %i TABLE %i' %(ifonc,len(temps)) )
for ival in range(len(temps)):
- epx[MODULE].append(17*' ' +'%g %g' %(temps[ival],valeurs[ival]))
+# epx[MODULE].append(17*' ' +'%s %s' %(temps[ival],valeurs[ival]))
+ epx[MODULE].append(17*' ' +'%s %s' %(temps[ival],valeurs[ival]))
self.ifonc = ifonc
self.dic_fonc = dic_fonc
epx[MODULE].append('\n')
return dic_fonc
-
+
#-----------------------------------------------------------------------
def export_CHAM_MATER(self):
-
+
epx = self.epx
-
+
# CLe identifiant
MODULE = 'CHAM_MATER'
-
+
epx[MODULE] = ['*--DEFINITION DES MATERIAUX']
-
+
# Entete de la commande Europlexus courante
epx[MODULE].append('MATERIAUX')
-
+
# Recuperer la structure sous le mot_cle facteur AFFE de AFFE_MATER
affe_mater = self.reupere_structure(self.CHAM_MATER,'AFFE')
affe_mater = self.setlist(affe_mater)
-
+
# Dictionnaire stoquant les caracteristiques mecaniques et les group_ma associe a chaque materiau
dic_mater = {}
typMat = {}
# imprimer les valeurs de la table
epx['FONC_MATER'].append(5*' ' +'%i LSQU 2 TABLE %i' %(ifonc,len(x)) )
for ival in range(len(x)):
- epx['FONC_MATER'].append(17*' ' +'%g %g' %(x[ival],y[ival]))
+# epx['FONC_MATER'].append(17*' ' +'%s %s' %(x[ival],y[ival]))
+ epx['FONC_MATER'].append(17*' ' +'%s %s' %(x[ival],y[ival]))
dic_mater[nom_mater]['BETON'][car] = 'FONC %i'%ifonc
self.ifonc=ifonc
-
-
+
+
cable = self.reupere_structure(concept_mater,'CABLE_PREC')
if cable :
materCable = cable['MATER']
vale = dic_mater[nom_mater][car_aster]
car_epx = dic_corresp[car_aster]
if vale is not None :
- epx[MODULE].append('%s %g' %(car_epx,vale))
+ epx[MODULE].append('%s %s' %(car_epx,vale))
for car_aster in dic_corresp2.keys():
vale = dic_mater[nom_mater][car_aster]
car_epx = dic_corresp2[car_aster]
if vale is not None :
- epx[MODULE].append('%s %g' %(car_epx,vale))
+ epx[MODULE].append('%s %s' %(car_epx,vale))
else : #GLRC
dic_corres1 = {'RHO':'RO','EPAIS':'H','E':'EB','NU':'NUB'}
dic_corresNapp = {'E' : 'EA','SY':'FY','OMX':'OMX','OMY':'OMY','RX':'RX','RY':'RY','FS':'FS'}
vale = dic_mater[nom_mater]['BETON'][car_aster]
car_epx = dic_corres1[car_aster]
if vale is not None :
- epx[MODULE].append('%s %g' %(car_epx,vale))
+ epx[MODULE].append('%s %s' %(car_epx,vale))
nlit = len(dic_mater[nom_mater]['NAPPE'])+len(dic_mater[nom_mater]['LINER'])
if dic_mater[nom_mater].has_key('CABLE') :
nlit+=1
if nlit :
- epx[MODULE].append('%s %g' %('NLIT',nlit))
+ epx[MODULE].append('%s %s' %('NLIT',nlit))
for nappe in dic_mater[nom_mater]['NAPPE'] :
epx[MODULE].append('NAPP')
for car_aster in dic_corresNapp.keys():
vale = nappe[car_aster]
car_epx = dic_corresNapp[car_aster]
if vale is not None:
- epx[MODULE].append('%s %g' %(car_epx,vale))
+ epx[MODULE].append('%s %s' %(car_epx,vale))
if dic_mater[nom_mater].has_key('CABLE') :
epx[MODULE].append('PREC')
for car_aster in dic_corresPrec.keys():
vale = dic_mater[nom_mater]['CABLE'][car_aster]
car_epx = dic_corresPrec[car_aster]
if vale is not None :
- epx[MODULE].append('%s %g' %(car_epx,vale))
+ epx[MODULE].append('%s %s' %(car_epx,vale))
for liner in dic_mater[nom_mater]['LINER'] :
epx[MODULE].append('LINR')
for car_aster in dic_corresLinr.keys():
vale = liner[car_aster]
car_epx = dic_corresLinr[car_aster]
if vale is not None :
- epx[MODULE].append('%s %g' %(car_epx,vale))
+ epx[MODULE].append('%s %s' %(car_epx,vale))
for car_aster in dic_corres2.keys():
vale = dic_mater[nom_mater]['BETON'][car_aster]
car_epx = dic_corres2[car_aster]
if vale is not None :
if type(vale) == float :
- epx[MODULE].append('%s %g' %(car_epx,vale))
+ epx[MODULE].append('%s %s' %(car_epx,vale))
else :
epx[MODULE].append('%s %s' %(car_epx,vale))
for car_aster in dic_corres2b.keys():
car_epx = dic_corres2b[car_aster]
if vale is not None :
if type(vale) == float :
- epx[MODULE].append('%s %g' %(car_epx,vale))
+ epx[MODULE].append('%s %s' %(car_epx,vale))
else :
epx[MODULE].append('%s %s' %(car_epx,vale))
if dic_mater[nom_mater].has_key('CABLE') :
vale = dic_mater[nom_mater]['CABLE'][car_aster]
car_epx = dic_corres3[car_aster]
if vale is not None :
- epx[MODULE].append('%s %g' %(car_epx,vale))
+ epx[MODULE].append('%s %s' %(car_epx,vale))
for car_aster in dic_corres4.keys():
vale = dic_mater[nom_mater]['BETON'][car_aster]
car_epx = dic_corres4[car_aster]
if vale is not None :
- epx[MODULE].append('%s %g' %(car_epx,vale))
+ epx[MODULE].append('%s %s' %(car_epx,vale))
# ajouter les group_ma qui ont ete affecte par ces caracteristiques
epx[MODULE].append(3*' '+'LECT')
# Entete de la commande Europlexus courante
#epx[MODULE].append('CHARGEMENT')
+
+ try :
+ test = self.EXCIT[0]
+ excit_list = self.EXCIT
+ except :
+ excit_list = self.setlist(self.EXCIT)
- excit_list = self.setlist(self.EXCIT)
+ #print '<INFO> excit_list = ',excit_list
+ #print '<INFO> type(excit_list) = ', type(excit_list)
# Traduction de ddl_impo
dic_ddl_impo = {'DX':1,'DY':2,'DZ':3,'DRZ':4,'DRY':5,'DRZ':6}
-
+
# Initialisation des variables decrivant le chargement et les conditions de blocage
CHARGEMENT = []
LIAISON = []
ddl_impo_list = self.setlist(ddl_impo_list)
# PRES_REP
if pres_rep_list :
- if len(CHARGEMENT) == 0 : CHARGEMENT = ['CHARGEMENT']
+ if len(CHARGEMENT) == 0 :
+ CHARGEMENT = ['CHARGEMENT']
+ CHARGEMENT.append(2*' ' + '1 FACTO 2')
fonction = self.get_motcle(excit,'FONC_MULT',code_mess='A')
if fonction is None:
UTMESS('F','PLEXUS_7')
for pres_rep in pres_rep_list :
pression = pres_rep['PRES']
group_ma = self.get_group_ma(pres_rep)
-
- CHARGEMENT.append(2*' ' + '1 FACTO 2')
- CHARGEMENT.append(6*' ' +'PRESS COQU %g' %pression)
+ CHARGEMENT.append(6*' ' +'PRESS COQU %s' %pression)
# ajouter les group_ma qui ont ete affecte par ces caracteristiques
CHARGEMENT.append(6*' '+'LECT')
for group in group_ma:
# imprimer les valeurs de la table
CHARGEMENT.append(6*' ' +'TABLE %i' %len(temps))
for ival in range(len(temps)):
- CHARGEMENT.append(10*' ' +'%g %g' %(temps[ival],valeurs[ival]))
+ CHARGEMENT.append(10*' ' +'%s %s' %(temps[ival],valeurs[ival]))
# DDL_IMPO
#if debug: print 'ddl_impo_list',ddl_impo_list
if ddl_impo_list :
#UTMESS('A','PLEXUS_8')
- if len(LIAISON) == 0 : LIAISON = ['LIAISON']
+# AA if len(LIAISON) == 0 : LIAISON = ['LIAISON']
+ if len(LIAISON) == 0 : LIAISON = ['LINK']
+
for ddl_impo in ddl_impo_list:
blocage = ''
+
+ # DDL_IMPO / DX
for cle in dic_ddl_impo.keys() :
- vale = self.get_motcle(ddl_impo,cle,code_mess='None')
+ vale = self.get_motcle(ddl_impo,cle,code_mess=None)
if vale is not None:
if vale != 0 : UTMESS('F','PLEXUS_13')
else :
blocage += `dic_ddl_impo[cle]`
+
+ # LIAISON / ENCASTRE
+ if ddl_impo.has_key('LIAISON'):
+ if ddl_impo['LIAISON']=='ENCASTRE':
+ blocage += ' 123456'
+
# recupere les entites geometriques
for entite in ['GROUP_MA','GROUP_NO'] :
- group_ma = self.get_motcle(ddl_impo,entite,code_mess='None')
+ group_ma = self.get_motcle(ddl_impo,entite,code_mess=None)
if group_ma is not None :
group_ma = self.setlist(group_ma);break
LIAISON.append(' '*2 + 'BLOQ %s' %blocage)
for group in group_ma:
LIAISON.append(10*' '+group)
LIAISON.append(6*' '+'TERM')
-
+
if not ddl_impo_list and not pres_rep_list :
UTMESS('F','PLEXUS_9')
for ligne in var : epx[MODULE].append(ligne)
epx[MODULE].append('\n')
-
#-----------------------------------------------------------------------
def Correspondance_champ(self):
for cham_aster in nom_cham:
cham_epx = self.dic_champ[cham_aster]
st += '%s ' % cham_epx
- st += ' %s %g' % (cle_freq_listing,vale_freq_listing)
+ st += ' %s %s' % (cle_freq_listing,vale_freq_listing)
st += ' NOPO NOEL'
epx[MODULE].append(st)
for cle in cles_entite:
cle_freq, vale_freq = get_freq2()
fichier_alit = self.pwd + self.REPE + os.sep + self.nom_fichiers['ALIT']
- epx[MODULE].append(2*' ' + "FICH ALIT 11 %s %g" %(cle_freq,vale_freq))
+ epx[MODULE].append(2*' ' + "FICH ALIT 11 %s %s" %(cle_freq,vale_freq))
# Liste les noeuds a postraiter
lnoeuds=sets.Set([])
fichier_med = self.pwd + self.REPE + os.sep + self.nom_fichiers['MED']
epx[MODULE].append(2*' ' + "'%s'" %fichier_med)
cle_freq,vale_freq = get_freq(champ_fact)
- epx[MODULE].append(2*' ' + ' %s %g' %(cle_freq_champ,vale_freq_champ))
+ epx[MODULE].append(2*' ' + ' %s %s' %(cle_freq_champ,vale_freq_champ))
# groupes de mailles du modele
entite_geo={}
epx[MODULE].append(6*' '+group)
epx[MODULE].append(2*' '+'TERM')
+
+ # ecriture CAST2000
+ # __temp
+ fichier_cast2000 = 'fort.%i' %unite_cast2000
+ if unite_cast2000 and os.path.isfile(fichier_cast2000) :
+ # titre
+ epx[MODULE].append('\n*-- CAST2000')
+ fd = open(fichier_cast2000,'r')
+ lst = fd.readlines()
+ fd.close()
+ for st in lst :
+ st = string.replace(st,'\n','')
+ epx[MODULE].append(st)
+
# Une ligne de saut
epx[MODULE].append('\n')
#tables = self.setlist(tables)
# Dictionnaire decrivant les legendes des abscisses et ordodonnees des courbes imprimees
- # et utilisee dans get_tables
+ # etl utilisee dans get_tables
self.legend_courbes = {}
entites_courbe = ['GROUP_NO','GROUP_MA']
entite_EPX={'GROUP_NO' : 'NOEUD', 'GROUP_MA' : 'ELEM'}
cmp_aster = table['NOM_CMP']
cham_epx = self.dic_champ[cham_aster]
cmp_epx = self.dic_cmp[cham_aster][cmp_aster]
- # ylabel = cham_aster + '_' + cmp_aster
- ylabel = cmp_aster
+ ylabel = cham_aster + '_' + cmp_aster
+ #ylabel = cmp_aster
if type(entite) is not tuple : entite = [entite,]
for el in entite :
icourbe+=1
label = ylabel + '_%s'%el
- if entite_type == 'MAILLE' :
+ if entite_type == 'GROUP_MA' :
label = label+'_%s'%table['NUM_GAUSS']
st = "COURBE %i '%s' %s COMP %i "% (icourbe,label,cham_epx,cmp_epx)
- if entite_type == 'MAILLE' :
+ if entite_type == 'GROUP_MA' :
st=st+"GAUSS %i "%table['NUM_GAUSS']
st=st+"%s LECT %s TERM"%(entite_EPX[entite_type],el)
if debug: print 'st = %s'%st
if debug: print 'st = %s'%st
epx[MODULE].append(st)
self.legend_courbes[icourbe] = ['TEMPS',label]
-
-
+
+
# Une ligne de saut
epx[MODULE].append('\n')
idS1 = interface['IDENT_DOMAINE_1']
idS2 = interface['IDENT_DOMAINE_2']
tole = interface['TOLE']
- epx[MODULE].append(3*' '+'MORTAR TOLE %g'%tole)
+ epx[MODULE].append(3*' '+'MORTAR TOLE %s'%tole)
epx[MODULE].append(7*' '+'DOMA %s LECT'%idS1)
for gma in Lgma1 :
epx[MODULE].append(13*' '+gma)
cles = ['INST_INIT','PASFIX','INST_FIN']
dcles = {'INST_INIT':'TINI', 'PASFIX':'PASFIX', 'INST_FIN':'TFIN'}
for cle in dcles.keys():
- try : calcul += ' %s %g' %(dcles[cle], self.CALCUL[cle])
+ try : calcul += ' %s %s' %(dcles[cle], self.CALCUL[cle])
except : pass
# Doit etre mis en entier
try : calcul += ' %s %d' %('NMAX',self.CALCUL['NMAX'])
}
- dic_cmp_gauss['ECROUISSAGE'] = {'DKT3': {'NOM_CMP' : ('V1','V2'),
- 'NOM_CMP_MED' : ('VAR8','VAR9'),},
- 'Q4GS' : {'NOM_CMP' : ('V1','V2'),
- 'NOM_CMP_MED' : ('VAR8','VAR9'),},
+ dic_cmp_gauss['ECROUISSAGE'] = {'DKT3': {'NOM_CMP' : ('V1','V2','V3','V4','V5','V6','V7','V8','V9','V10','V11','V12','V13','V14','V15','V16','V17','V18','V19'),
+ 'NOM_CMP_MED' : ('VAR1','VAR2','VAR3','VAR4','VAR5','VAR6','VAR7','VAR8','VAR9','VAR10','VAR11','VAR12','VAR13','VAR14','VAR15','VAR16','VAR17','VAR18','VAR19'),},
+ 'Q4GS' : {'NOM_CMP' : ('V1','V2','V3','V4','V5','V6','V7','V8','V9','V10','V11','V12','V13','V14','V15','V16','V17','V18','V19'),
+ 'NOM_CMP_MED' : ('VAR1','VAR2','VAR3','VAR4','VAR5','VAR6','VAR7','VAR8','VAR9','VAR10','VAR11','VAR12','VAR13','VAR14','VAR15','VAR16','VAR17','VAR18','VAR19'),},
'POUT' : {}
}
-
+ tupVar = ('X1','X2','X3','X4','X5','X6','X7','X8','X9','X10','X11','X12','X13','X14','X15','X16','X17','X18','X19')
+
# Dictionnaire permettant de traduire le champ epx en med au nom asscie dans aster
# AA epx2aster = {'CONTRAINTE':'SIEF_ELGA','ECROUISSAGE':'VARI_ELGA'}
epx2aster = {'CONTRAINTE':'SIEF_ELGA','DEFORMATION':'EPSI_ELGA_DEPL','ECROUISSAGE':'VARI_ELGA'}
PROL_ZERO = 'OUI',
AFFE = _F(VALE=(1.,1.), TOUT='OUI', NOM_CMP=('X21','X22')),
)
+ __UNDEU = CREA_CHAMP(
+ INFO = self.INFO,
+ TYPE_CHAM = 'ELGA_NEUT_R',
+ OPERATION = 'AFFE',
+ MODELE = self.NEW_MODELE,
+ PROL_ZERO = 'OUI',
+ AFFE = _F(VALE=(1.,1./2.), TOUT='OUI', NOM_CMP=('X21','X22')),
+ )
__FONC1 = FORMULE(VALE='X1*X21',NOM_PARA=('X1','X21'))
__FONC2 = FORMULE(VALE='X2*X21',NOM_PARA=('X2','X21'))
__FONC3 = FORMULE(VALE='X3*X21',NOM_PARA=('X3','X21'))
__FONC16 = FORMULE(VALE='X16*X22',NOM_PARA=('X16','X22'))
__FONC17 = FORMULE(VALE='X17*X21',NOM_PARA=('X17','X21'))
__FONC18 = FORMULE(VALE='X18*X21',NOM_PARA=('X18','X21'))
+
+ __FONE1 = FORMULE(VALE='X1*X21',NOM_PARA=('X1','X21'))
+ __FONE2 = FORMULE(VALE='X2*X21',NOM_PARA=('X2','X21'))
+ __FONE3 = FORMULE(VALE='X3*X22',NOM_PARA=('X3','X22'))
+ __FONE4 = FORMULE(VALE='X4*X21',NOM_PARA=('X4','X21'))
+ __FONE5 = FORMULE(VALE='X5*X21',NOM_PARA=('X5','X21'))
+ __FONE6 = FORMULE(VALE='X6*X22',NOM_PARA=('X6','X22'))
+ __FONE7 = FORMULE(VALE='X7*X21',NOM_PARA=('X7','X21'))
+ __FONE8 = FORMULE(VALE='X8*X21',NOM_PARA=('X8','X21'))
+ __FONE9 = FORMULE(VALE='X9*X21',NOM_PARA=('X9','X21'))
+ __FONE10 = FORMULE(VALE='X10*X21',NOM_PARA=('X10','X21'))
+ __FONE11 = FORMULE(VALE='X11*X21',NOM_PARA=('X11','X21'))
+ __FONE12 = FORMULE(VALE='X12*X21',NOM_PARA=('X12','X21'))
+ __FONE13 = FORMULE(VALE='X13*X21',NOM_PARA=('X13','X21'))
+ __FONE14 = FORMULE(VALE='X14*X21',NOM_PARA=('X14','X21'))
+ __FONE15 = FORMULE(VALE='X15*X21',NOM_PARA=('X15','X21'))
+ __FONE16 = FORMULE(VALE='X16*X21',NOM_PARA=('X16','X21'))
+ __FONE17 = FORMULE(VALE='X17*X21',NOM_PARA=('X17','X21'))
+ __FONE18 = FORMULE(VALE='X18*X21',NOM_PARA=('X18','X21'))
+ __FONE19 = FORMULE(VALE='X19*X21',NOM_PARA=('X19','X21'))
__FONCC = CREA_CHAMP(
INFO = self.INFO,
PROL_ZERO = 'OUI',
AFFE = _F(
TOUT = 'OUI',
- NOM_CMP = ('X1','X2'),
- VALE_F = (__FONC1,__FONC2)),
+ NOM_CMP = tupVar,
+ # VALE_F = (__FONE1,__FONE2)
+ VALE_F = (__FONE1,__FONE2,__FONE3,__FONE4,__FONE5,__FONE6,__FONE7,__FONE8,__FONE9,__FONE10,__FONE11,__FONE12,__FONE13,__FONE14,__FONE15,__FONE16,__FONE17,__FONE18,__FONE19)
+ ),
)
listEffg = []
i=0
listType=[]
__SIG11 = [None]*10
__SIG21 = [None]*10
+ __ECR11 = [None]*10
# Pour masquer certaines alarmes
from Utilitai.Utmess import MasquerAlarme, RetablirAlarme
nbChamp = i
+
+ listVari = [0]*nbChamp
+
+ for i in xrange(nbChamp) :
+ if listType[i] == 'Q4GS' :
+ try :
+ __ECR11[i] = LIRE_CHAMP(
+ INFO = self.INFO,
+ TYPE_CHAM = 'ELGA_VARI_R',
+ UNITE = 99,
+ NUME_PT = 0,
+ MODELE = self.NEW_MODELE,
+ MAILLAGE = self.reupere_structure(self.MODELE,'MAILLAGE'),
+ PROL_ZERO = 'OUI',
+ NOM_MED = 'CHAMP___ECROUISSAGE__00%d'%(i+1),
+ NOM_CMP = dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP'],
+ NOM_CMP_MED = dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP_MED'])
+ # dicDetr.append({'NOM' : __SIG11})
+ DETRUIRE(CONCEPT=_F(NOM = __ECR11[i]), INFO=1)
+ listVari[i]=1
+ except :
+ err+=1
+ elif listType[i] == 'DKT3' :
+ try :
+ __ECR11[i] = LIRE_CHAMP(
+ INFO = self.INFO,
+ TYPE_CHAM = 'ELGA_VARI_R',
+ UNITE = 99,
+ NUME_PT = 0,
+ MODELE = self.NEW_MODELE,
+ MAILLAGE = self.reupere_structure(self.MODELE,'MAILLAGE'),
+ PROL_ZERO = 'OUI',
+ NOM_MED = 'CHAMP___ECROUISSAGE__00%d'%(i+1),
+ NOM_CMP = dic_cmp_gauss['ECROUISSAGE']['DKT3']['NOM_CMP'],
+ NOM_CMP_MED = dic_cmp_gauss['ECROUISSAGE']['DKT3']['NOM_CMP_MED'])
+ # dicDetr.append({'NOM' : __SIG11})
+ DETRUIRE(CONCEPT=_F(NOM = __ECR11[i]), INFO=1)
+ listVari[i]=1
+ except :
+ err+=1
+
+
+
itot=len(resu.LIST_PARA()['INST'])
__EFFG=[None]*itot
# __EPSG=[None]*itot
__ECRG=[None]*itot
__SIG1 = [None]*nbChamp
__SIG2 = [None]*nbChamp
+ __ECR1 = [None]*nbChamp
+ __ECR2 = [None]*nbChamp
for i in xrange(itot) :
dicAffe=[]
dicAffe2=[]
dicAsse.append({'TOUT' : 'OUI', 'CHAM_GD' : __EPN2, 'NOM_CMP' : 'X22', 'NOM_CMP_RESU' : 'X22', 'CUMUL' : 'OUI','COEF_R':1.})
dicAsse2 = [{'TOUT' : 'OUI', 'CHAM_GD' : __UNN, 'NOM_CMP' : 'X21', 'NOM_CMP_RESU' : 'X21'}]
dicAsse2.append({'TOUT' : 'OUI', 'CHAM_GD' : __UNN, 'NOM_CMP' : 'X22', 'NOM_CMP_RESU' : 'X22', 'CUMUL' : 'OUI','COEF_R':1.})
- dicAsse3 = [{'TOUT' : 'OUI', 'CHAM_GD' : __UNN, 'NOM_CMP' : 'X21', 'NOM_CMP_RESU' : 'X21'}]
- dicAsse3.append({'TOUT' : 'OUI', 'CHAM_GD' : __UNN, 'NOM_CMP' : 'X22', 'NOM_CMP_RESU' : 'X22', 'CUMUL' : 'OUI','COEF_R':1.})
+ dicAsse3 = [{'TOUT' : 'OUI', 'CHAM_GD' : __UNDEU, 'NOM_CMP' : 'X21', 'NOM_CMP_RESU' : 'X21'}]
+ dicAsse3.append({'TOUT' : 'OUI', 'CHAM_GD' : __UNDEU, 'NOM_CMP' : 'X22', 'NOM_CMP_RESU' : 'X22', 'CUMUL' : 'OUI','COEF_R':1.})
dicDetr=[]
# if 'Q4GS' in self.modelisations :
for j in xrange(nbChamp) :
NOM_CMP = dic_cmp_gauss['CONTRAINTE']['Q4GS']['NOM_CMP'],
NOM_CMP_MED = dic_cmp_gauss['CONTRAINTE']['Q4GS']['NOM_CMP_MED'],
)
+ dicDetr.append({'NOM' : __SIG1[j]})
+ dicAsse.append({'TOUT' : 'OUI', 'CHAM_GD' : __SIG1[j], 'NOM_CMP' : tuple(dic_cmp_gauss['CONTRAINTE']['Q4GS']['NOM_CMP']),
+ 'NOM_CMP_RESU' : ('X1','X2','X3','X4','X5','X6','X7','X8'), 'CUMUL' : 'OUI','COEF_R':1.})
# __EPS1 = LIRE_CHAMP(
# INFO = self.INFO,
# TYPE_CHAM = 'ELGA_EPSI_R',
# NOM_MED = 'CHAMP___DEFORM_TOT___001',
# NOM_CMP = dic_cmp_gauss['DEFORMATION']['Q4GS']['NOM_CMP'],
# NOM_CMP_MED = dic_cmp_gauss['DEFORMATION']['Q4GS']['NOM_CMP_MED'])
-# __ECR1 = LIRE_CHAMP(
-# INFO = self.INFO,
-# TYPE_CHAM = 'ELGA_VARI_R',
-# UNITE = 99,
-# NUME_PT = resu.LIST_PARA()['NUME_ORDRE'][i],
-# MODELE = self.NEW_MODELE,
-# MAILLAGE = self.reupere_structure(self.MODELE,'MAILLAGE'),
-# PROL_ZERO = 'OUI',
-# NOM_MED = 'CHAMP___ECROUISSAGE__001',
-# NOM_CMP = dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP'],
-# NOM_CMP_MED = dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP_MED'])
- dicDetr.append({'NOM' : __SIG1[j]})
- dicAsse.append({'TOUT' : 'OUI', 'CHAM_GD' : __SIG1[j], 'NOM_CMP' : tuple(dic_cmp_gauss['CONTRAINTE']['Q4GS']['NOM_CMP']),
- 'NOM_CMP_RESU' : ('X1','X2','X3','X4','X5','X6','X7','X8'), 'CUMUL' : 'OUI','COEF_R':1.})
+ if listVari[j] :
+ __ECR1[j] = LIRE_CHAMP(
+ INFO = self.INFO,
+ TYPE_CHAM = 'ELGA_VARI_R',
+ UNITE = 99,
+ NUME_PT = resu.LIST_PARA()['NUME_ORDRE'][i],
+ MODELE = self.NEW_MODELE,
+ MAILLAGE = self.reupere_structure(self.MODELE,'MAILLAGE'),
+ PROL_ZERO = 'OUI',
+ NOM_MED = 'CHAMP___ECROUISSAGE__00%d'%(j+1),
+ NOM_CMP = dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP'],
+ NOM_CMP_MED = dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP_MED'])
+ dicAsse3.append({'TOUT' : 'OUI', 'CHAM_GD' : __ECR1[j], 'NOM_CMP' : tuple(dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP']),
+ 'NOM_CMP_RESU' : tupVar, 'CUMUL' : 'OUI','COEF_R':1.})
+ dicDetr.append({'NOM' : __ECR1[j]})
# dicAsse2.append({'TOUT' : 'OUI', 'CHAM_GD' : __EPS1, 'NOM_CMP' : tuple(dic_cmp_gauss['DEFORMATION']['Q4GS']['NOM_CMP']),
# 'NOM_CMP_RESU' : ('X1','X2','X3','X4','X5','X6','X7','X8'), 'CUMUL' : 'OUI','COEF_R':1.})
-# dicAsse3.append({'TOUT' : 'OUI', 'CHAM_GD' : __ECR1, 'NOM_CMP' : tuple(dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP']),
-# 'NOM_CMP_RESU' : ('X1','X2'), 'CUMUL' : 'OUI','COEF_R':1.})
else :
__SIG2[j] = LIRE_CHAMP(
INFO = self.INFO,
NOM_CMP = dic_cmp_gauss['CONTRAINTE']['DKT3']['NOM_CMP'],
NOM_CMP_MED = dic_cmp_gauss['CONTRAINTE']['DKT3']['NOM_CMP_MED'],
)
+ dicAsse.append({'TOUT' : 'OUI', 'CHAM_GD' : __SIG2[j], 'NOM_CMP' : tuple(dic_cmp_gauss['CONTRAINTE']['DKT3']['NOM_CMP']),
+ 'NOM_CMP_RESU' : ('X11','X12','X13','X14','X15','X16'), 'CUMUL' : 'OUI','COEF_R':1.})
+ dicDetr.append({'NOM' : __SIG2[j]})
# __EPS2 = LIRE_CHAMP(
# INFO = self.INFO,
# TYPE_CHAM = 'ELGA_EPSI_R',
# NOM_MED = 'CHAMP___DEFORM_TOT___00%d'%index,
# NOM_CMP = dic_cmp_gauss['DEFORMATION']['DKT3']['NOM_CMP'],
# NOM_CMP_MED = dic_cmp_gauss['DEFORMATION']['DKT3']['NOM_CMP_MED']),
-# __ECR2 = LIRE_CHAMP(
-# INFO = self.INFO,
-# TYPE_CHAM = 'ELGA_VARI_R',
-# UNITE = 99,
-# NUME_PT = resu.LIST_PARA()['NUME_ORDRE'][i],
-# MODELE = self.NEW_MODELE,
-# MAILLAGE = self.reupere_structure(self.MODELE,'MAILLAGE'),
-# PROL_ZERO = 'OUI',
-# NOM_MED = 'CHAMP___ECROUISSAGE__00%d'%index,
-# NOM_CMP = dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP'],
-# NOM_CMP_MED = dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP_MED'])
- dicAsse.append({'TOUT' : 'OUI', 'CHAM_GD' : __SIG2[j], 'NOM_CMP' : tuple(dic_cmp_gauss['CONTRAINTE']['DKT3']['NOM_CMP']),
- 'NOM_CMP_RESU' : ('X11','X12','X13','X14','X15','X16'), 'CUMUL' : 'OUI','COEF_R':1.})
+ if listVari[j] :
+
+ __ECR2[j] = LIRE_CHAMP(
+ INFO = self.INFO,
+ TYPE_CHAM = 'ELGA_VARI_R',
+ UNITE = 99,
+ NUME_PT = resu.LIST_PARA()['NUME_ORDRE'][i],
+ MODELE = self.NEW_MODELE,
+ MAILLAGE = self.reupere_structure(self.MODELE,'MAILLAGE'),
+ PROL_ZERO = 'OUI',
+ NOM_MED = 'CHAMP___ECROUISSAGE__00%d'%(j+1),
+ NOM_CMP = dic_cmp_gauss['ECROUISSAGE']['DKT3']['NOM_CMP'],
+ NOM_CMP_MED = dic_cmp_gauss['ECROUISSAGE']['DKT3']['NOM_CMP_MED'])
+ dicAsse3.append({'TOUT' : 'OUI', 'CHAM_GD' : __ECR2[j], 'NOM_CMP' : tuple(dic_cmp_gauss['ECROUISSAGE']['DKT3']['NOM_CMP']),
+ 'NOM_CMP_RESU' : tupVar, 'CUMUL' : 'OUI','COEF_R':1.})
+ dicDetr.append({'NOM' : __ECR2[j]})
# dicAsse2.append({'TOUT' : 'OUI', 'CHAM_GD' : __EPS2, 'NOM_CMP' : tuple(dic_cmp_gauss['DEFORMATION']['DKT3']['NOM_CMP']),
# 'NOM_CMP_RESU' : ('X11','X12','X13','X14','X15','X16'), 'CUMUL' : 'OUI','COEF_R':1.})
-# dicAsse3.append({'TOUT' : 'OUI', 'CHAM_GD' : __ECR2, 'NOM_CMP' : tuple(dic_cmp_gauss['ECROUISSAGE']['DKT3']['NOM_CMP']),
-# 'NOM_CMP_RESU' : ('X11','X12'), 'CUMUL' : 'OUI','COEF_R':1.})
- dicDetr.append({'NOM' : __SIG2[j]})
# dicDetr.append({'NOM' : __EPS2})
# dicDetr.append({'NOM' : __ECR2})
# dicDetr.append({'NOM' : __EPS1})
# PROL_ZERO = 'OUI',
# MODELE = self.NEW_MODELE,
# ASSE = dicAsse2)
-# __ECRN = CREA_CHAMP(
-# INFO = self.INFO,
-# TYPE_CHAM = 'ELGA_NEUT_R',
-# OPERATION = 'ASSE',
-# PROL_ZERO = 'OUI',
-# MODELE = self.NEW_MODELE,
-# ASSE = dicAsse3)
+ __ECRN = CREA_CHAMP(
+ INFO = self.INFO,
+ TYPE_CHAM = 'ELGA_NEUT_R',
+ OPERATION = 'ASSE',
+ PROL_ZERO = 'OUI',
+ MODELE = self.NEW_MODELE,
+ ASSE = dicAsse3)
dicDetr.append({'NOM' : __SIGN})
# dicDetr.append({'NOM' : __EPSN})
-# dicDetr.append({'NOM' : __ECRN})
+ dicDetr.append({'NOM' : __ECRN})
__EFFGN = CREA_CHAMP(
INFO = self.INFO,
TYPE_CHAM = 'ELGA_NEUT_R',
# OPERATION = 'EVAL',
# CHAM_F = __FONCC,
# CHAM_PARA = (__EPSN))
-# __ECRGN = CREA_CHAMP(
-# INFO = self.INFO,
-# TYPE_CHAM = 'ELGA_NEUT_R',
-# OPERATION = 'EVAL',
-# CHAM_F = __FONCC2,
-# CHAM_PARA = (__ECRN))
+ __ECRGN = CREA_CHAMP(
+ INFO = self.INFO,
+ TYPE_CHAM = 'ELGA_NEUT_R',
+ OPERATION = 'EVAL',
+ CHAM_F = __FONCC2,
+ CHAM_PARA = (__ECRN))
dicDetr.append({'NOM' : __EFFGN})
# dicDetr.append({'NOM' : __EPSGN})
-# dicDetr.append({'NOM' : __ECRGN})
+ dicDetr.append({'NOM' : __ECRGN})
__EFFG[i] = CREA_CHAMP(
INFO = self.INFO,
TYPE_CHAM = 'ELGA_SIEF_R',
# CHAM_GD = __EPSGN,
# NOM_CMP = ('X1','X2','X3','X4','X5','X6','X7','X8')+('X11','X12','X13','X14','X15','X16'),
# NOM_CMP_RESU = tuple(dic_cmp_gauss['DEFORMATION']['Q4GS']['NOM_CMP']+dic_cmp_gauss['DEFORMATION']['DKT3']['NOM_CMP'])))
-# __ECRG[i] = CREA_CHAMP(
-# INFO = self.INFO,
-# TYPE_CHAM = 'ELGA_VARI_R',
-# OPERATION = 'ASSE',
-# PROL_ZERO = 'OUI',
-# MODELE = self.NEW_MODELE,
-# ASSE = _F(
-# TOUT = 'OUI',
-# CHAM_GD = __ECRGN,
-# NOM_CMP = ('X1','X2'),
-# NOM_CMP_RESU = tuple(dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP'])))
- dicAffe.append({'CHAM_GD' : __EFFG[i], 'MODELE' : self.NEW_MODELE,'CHAM_MATER' : self.CHAM_MATER,'INST': resu.LIST_PARA()['INST'][i]})
+ __ECRG[i] = CREA_CHAMP(
+ INFO = self.INFO,
+ TYPE_CHAM = 'ELGA_VARI_R',
+ OPERATION = 'ASSE',
+ PROL_ZERO = 'OUI',
+ MODELE = self.NEW_MODELE,
+ ASSE = _F(
+ TOUT = 'OUI',
+ CHAM_GD = __ECRGN,
+ NOM_CMP = tupVar,
+ NOM_CMP_RESU = tuple(dic_cmp_gauss['ECROUISSAGE']['Q4GS']['NOM_CMP'])))
+# AA dicAffe.append({'CHAM_GD' : __EFFG[i], 'MODELE' : self.NEW_MODELE,'CHAM_MATER' : self.CHAM_MATER,'INST': resu.LIST_PARA()['INST'][i]})
+ dicAffe.append({'CHAM_GD' : __EFFG[i], 'MODELE' : self.NEW_MODELE,'CHAM_MATER' : self.CHAM_MATER, 'CARA_ELEM' : self.CARA_ELEM, 'INST': resu.LIST_PARA()['INST'][i]})
# dicAffe2.append({'CHAM_GD' : __EPSG[i], 'MODELE' : self.NEW_MODELE,'CHAM_MATER' : self.CHAM_MATER,'INST': resu.LIST_PARA()['INST'][i]})
-# dicAffe3.append({'CHAM_GD' : __ECRG[i], 'MODELE' : self.NEW_MODELE,'CHAM_MATER' : self.CHAM_MATER,'INST': resu.LIST_PARA()['INST'][i]})
+# AA dicAffe3.append({'CHAM_GD' : __ECRG[i], 'MODELE' : self.NEW_MODELE,'CHAM_MATER' : self.CHAM_MATER,'INST': resu.LIST_PARA()['INST'][i]})
+ dicAffe3.append({'CHAM_GD' : __ECRG[i], 'MODELE' : self.NEW_MODELE,'CHAM_MATER' : self.CHAM_MATER, 'CARA_ELEM' : self.CARA_ELEM, 'INST': resu.LIST_PARA()['INST'][i]})
DETRUIRE(CONCEPT=dicDetr, INFO=1)
resu = CREA_RESU(reuse=resu,
OPERATION = 'AFFE',
-#& MODIF ENTETE DATE 12/02/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF ENTETE DATE 07/04/2009 AUTEUR COURTOIS M.COURTOIS
# -*- coding: iso-8859-1 -*-
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# ALONG WITH THIS PROGRAM; IF NOT, WRITE TO EDF R&D CODE_ASTER,
# 1 AVENUE DU GENERAL DE GAULLE, 92141 CLAMART CEDEX, FRANCE.
# ======================================================================
+# RESPONSABLE COURTOIS M.COURTOIS
# faire que la division soit toujours réelle
from __future__ import division
vect_elem_pres_r, vect_elem_pres_c, \
vect_elem_temp_r
-#& MODIF COMMUN DATE 20/10/2008 AUTEUR MICHEL S.MICHEL
+#& MODIF COMMUN DATE 20/04/2009 AUTEUR PROIX J-M.PROIX
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2003 EDF R&D WWW.CODE-ASTER.ORG
"META_V_INL", # RESP. : CANO V.CANO
"MONOCRISTAL", # RESP. : PROIX J.M.PROIX
"MULTIFIBRE", # RESP. : FLEJOU J.L.FLEJOU
- "NADAI_B", # RESP. : None
"NORTON_HOFF", # RESP. : MICHEL S.MICHEL
"PINTO_MENEGOTTO", # RESP. : ROSPARS C.ROSPARS
"POLYCRISTAL", # RESP. : PROIX J.M.PROIX
"VISC_IRRA_LOG", # RESP. : FERNANDES R.FERNANDES
"VISC_ISOT_LINE", # RESP. : MICHEL S.MICHEL
"VISC_ISOT_TRAC", # RESP. : PROIX J.M.PROIX
- "VISCOCHAB", # RESP. : None
+ "VISCOCHAB", # RESP. : GENIAUT S.GENIAUT
"VISC_TAHERI", # RESP. : TAHERI S.TAHERI
"VMIS_ASYM_LINE", # RESP. : PROIX J.M.PROIX
"VMIS_CIN1_CHAB", # RESP. : PROIX J.M.PROIX
"VMIS_CINE_LINE",
"VMIS_ISOT_TRAC",
"VMIS_ISOT_LINE",
- "VMIS_ISOT_CINE",
"VMIS_ISOT_PUIS",
"GLRC_DM",
"GRANGER_FP",
"GRANGER_FP_V",
"BETON_UMLV_FP",
"ROUSS_PR",
- "NADAI_B",
"BETON_DOUBLE_DP",
"ENDO_ISOT_BETON",
"MAZARS"
"REAC_GEOM","EULER_ALMANSI")),
ALGO_C_PLAN =SIMP(statut='f',typ='TXM',defaut="ANALYTIQUE",into=("DEBORST","ANALYTIQUE",)),
- RESI_DEBORST =SIMP(statut='f',typ='R',defaut= 1.0E-6),
+ RESI_DEBO_MAXI = SIMP(statut='f',typ='R',
+ fr="Critère d'arret absolu pour assurer la condition de contraintes planes",
+ ),
+ b_resideborst = BLOC(condition = " RESI_DEBO_MAXI == None ",
+ fr="Critère d'arret relatif pour assurer la condition de contraintes planes",
+ RESI_DEBO_RELA = SIMP(statut='f',typ='R',defaut= 1.0E-6),
+ ),
ALGO_1D =SIMP(statut='f',typ='TXM',defaut="ANALYTIQUE",into=("DEBORST","ANALYTIQUE",)),
ITER_MAXI_DEBORST =SIMP(statut='f',typ='I',defaut= 1),
MAILLE =SIMP(statut='f',typ=ma ,validators=NoRepeat(),max='**'),
) ;
-#& MODIF COMMUN DATE 21/10/2008 AUTEUR DESOZA T.DESOZA
+#& MODIF COMMUN DATE 06/05/2009 AUTEUR MACOCCO K.MACOCCO
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2008 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.
+# 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.
# ======================================================================
# RESPONSABLE DESOZA T.DESOZA
def C_CONTACT() : return FACT(statut='f',max='**',
# OPTIONS D'APPARIEMENT
#
- APPARIEMENT =SIMP(statut='f',typ='TXM',defaut="MAIT_ESCL",
- into =("NODAL","MAIT_ESCL")),
+ b_notxfem =BLOC(condition = "METHODE != 'XFEM' ",
+ regles=(UN_PARMI('GROUP_MA_ESCL','MAILLE_ESCL'),
+ UN_PARMI('GROUP_MA_MAIT','MAILLE_MAIT'),),
- LISSAGE =SIMP(statut='f',typ='TXM',defaut="NON",
- into =("OUI","NON")),
-
- NORMALE =SIMP(statut='f',typ='TXM',defaut="MAIT",
- into =("MAIT","MAIT_ESCL","ESCL"),),
-
- VECT_MAIT =SIMP(statut='f',typ='TXM',defaut="AUTO",
- into =("AUTO","FIXE","VECT_Y")),
+ GROUP_MA_MAIT =SIMP(statut='f',typ=grma ,validators=NoRepeat(),max='**'),
+ MAILLE_MAIT =SIMP(statut='f',typ=ma ,validators=NoRepeat(),max='**'),
+ GROUP_MA_ESCL =SIMP(statut='f',typ=grma ,validators=NoRepeat(),max='**'),
+ MAILLE_ESCL =SIMP(statut='f',typ=ma ,validators=NoRepeat(),max='**'),
- b_nmait_fixe =BLOC(condition = "VECT_MAIT == 'FIXE'",
- MAIT_FIXE =SIMP(statut='f',typ='R',min=3,max=3),
- ),
+ APPARIEMENT =SIMP(statut='f',typ='TXM',defaut="MAIT_ESCL",
+ into =("NODAL","MAIT_ESCL")),
- b_nmait_vecty =BLOC(condition = "VECT_MAIT == 'VECT_Y'",
- MAIT_VECT_Y =SIMP(statut='f',typ='R',min=3,max=3),
- ),
+ LISSAGE =SIMP(statut='f',typ='TXM',defaut="NON",
+ into =("OUI","NON")),
- VECT_ESCL =SIMP(statut='f',typ='TXM',defaut="AUTO",
- into =("AUTO","FIXE","VECT_Y")),
+ NORMALE =SIMP(statut='f',typ='TXM',defaut="MAIT",
+ into =("MAIT","MAIT_ESCL","ESCL"),),
- b_nescl_fixe =BLOC(condition = "VECT_ESCL == 'FIXE'",
- ESCL_FIXE =SIMP(statut='f',typ='R',min=3,max=3),
- ),
+ VECT_MAIT =SIMP(statut='f',typ='TXM',defaut="AUTO",
+ into =("AUTO","FIXE","VECT_Y")),
- b_nescl_vecty =BLOC(condition = "VECT_ESCL == 'VECT_Y'",
- ESCL_VECT_Y =SIMP(statut='f',typ='R',min=3,max=3),
- ),
+ b_nmait_fixe =BLOC(condition = "VECT_MAIT == 'FIXE'",
+ MAIT_FIXE =SIMP(statut='o',typ='R',min=3,max=3),
+ ),
+
+ b_nmait_vecty =BLOC(condition = "VECT_MAIT == 'VECT_Y'",
+ MAIT_VECT_Y =SIMP(statut='o',typ='R',min=3,max=3),
+ ),
+ VECT_ESCL =SIMP(statut='f',typ='TXM',defaut="AUTO",
+ into =("AUTO","FIXE","VECT_Y")),
+
+ b_nescl_fixe =BLOC(condition = "VECT_ESCL == 'FIXE'",
+ ESCL_FIXE =SIMP(statut='o',typ='R',min=3,max=3),
+ ),
+
+ b_nescl_vecty =BLOC(condition = "VECT_ESCL == 'VECT_Y'",
+ ESCL_VECT_Y =SIMP(statut='o',typ='R',min=3,max=3),
+ ),
+
+
+ TYPE_APPA =SIMP(statut='f',typ='TXM',defaut="PROCHE",
+ into =("PROCHE","FIXE")),
+
+ b_appa_fixe =BLOC(condition = "TYPE_APPA == 'FIXE'",
+ DIRE_APPA =SIMP(statut='f',typ='R',min=3,max=3),
+ ),
+
+ DIST_MAIT =SIMP(statut='f',typ=(fonction_sdaster,nappe_sdaster,formule)),
+ DIST_ESCL =SIMP(statut='f',typ=(fonction_sdaster,nappe_sdaster,formule)),
+
+ TOLE_APPA =SIMP(statut='f',typ='R' ,defaut=-1.0),
- TYPE_APPA =SIMP(statut='f',typ='TXM',defaut="PROCHE",
- into =("PROCHE","FIXE")),
-
- b_appa_fixe =BLOC(condition = "TYPE_APPA == 'FIXE'",
- DIRE_APPA =SIMP(statut='f',typ='R',min=3,max=3),
),
-
- b_dist_struct =BLOC(condition = "METHODE != 'CONTINUE' and METHODE != 'XFEM' ",
- DIST_POUTRE =SIMP(statut='f',typ='TXM',defaut="NON", into=("OUI","NON")),
- DIST_COQUE =SIMP(statut='f',typ='TXM',defaut="NON", into=("OUI","NON")),
- b_cara =BLOC(condition = "DIST_POUTRE == 'OUI' or DIST_COQUE == 'OUI'",
- CARA_ELEM =SIMP(statut='o',typ=(cara_elem) ),
+
+
+ b_dist_struct =BLOC(condition = "METHODE != 'CONTINUE' and METHODE != 'XFEM'",
+ DIST_POUTRE =SIMP(statut='f',typ='TXM',defaut="NON", into=("OUI","NON")),
+ DIST_COQUE =SIMP(statut='f',typ='TXM',defaut="NON", into=("OUI","NON")),
+ b_cara =BLOC(condition = "DIST_POUTRE == 'OUI' or DIST_COQUE == 'OUI'",
+ CARA_ELEM =SIMP(statut='o',typ=(cara_elem) ),
),
),
-
- DIST_MAIT =SIMP(statut='f',typ=(fonction_sdaster,nappe_sdaster,formule)),
- DIST_ESCL =SIMP(statut='f',typ=(fonction_sdaster,nappe_sdaster,formule)),
+ TOLE_PROJ_EXT =SIMP(statut='f',typ='R' ,defaut=0.50),
+
+#
+# FIN OPTIONS D'APPARIEMENT
+#
- TOLE_APPA =SIMP(statut='f',typ='R' ,defaut=-1.0),
- TOLE_PROJ_EXT =SIMP(statut='f',typ='R' ,defaut=0.50),
-
-
b_xfem =BLOC(condition = "METHODE == 'XFEM' ",
FISS_MAIT = SIMP(statut='o',typ=fiss_xfem,max=1),
- FISS_ESCL = SIMP(statut='f',typ=fiss_xfem,max=1),
- SIGN_MAIT = SIMP(statut='f',typ='TXM',into=("+","-",) ),
- SIGN_ESCL = SIMP(statut='f',typ='TXM',into=("+","-",) ),
INTEGRATION = SIMP(statut='f',typ='TXM',defaut="FPG4",into=("GAUSS","FPG2","FPG3","FPG4","FPG6",
"FPG7","NOEUD","SIMPSON","SIMPSON1","NCOTES","NCOTES1","NCOTES2") ),
COEF_REGU_CONT = SIMP(statut='f',typ='R',defaut=100.E+0),
),
),
- b_notxfem =BLOC(condition = "METHODE != 'XFEM' ",
- regles=(UN_PARMI('GROUP_MA_ESCL','MAILLE_ESCL'),),
- GROUP_MA_MAIT =SIMP(statut='f',typ=grma ,validators=NoRepeat(),max='**'),
- MAILLE_MAIT =SIMP(statut='f',typ=ma ,validators=NoRepeat(),max='**'),
- GROUP_MA_ESCL =SIMP(statut='f',typ=grma ,validators=NoRepeat(),max='**'),
- MAILLE_ESCL =SIMP(statut='f',typ=ma ,validators=NoRepeat(),max='**'),
- ),
-
b_verif =BLOC(condition = "METHODE == 'VERIF' ",
fr="Paramètres de la méthode pénalisée (contact avec ou sans frottement)",
E_N =SIMP(statut='f',typ='R'),
FROTTEMENT =SIMP(statut='f',typ='TXM',defaut="SANS",into=("SANS","COULOMB",) ),
- STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",
- into=("OUI","NON")),
- NB_RESOL =SIMP(statut='f',typ='I', defaut=10 ),
- ITER_MULT_MAXI =SIMP(statut='f',typ='I',defaut=4),
+ b_dualisation =BLOC(condition = "E_N == None",
+ STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",
+ into=("OUI","NON")),
+ NB_RESOL =SIMP(statut='f',typ='I', defaut=10 ),
+ ITER_MULT_MAXI =SIMP(statut='f',typ='I',defaut=4),
+ ),
REAC_GEOM =SIMP(statut='f',typ='TXM',defaut="AUTOMATIQUE",
into=("AUTOMATIQUE","CONTROLE","SANS")),
SANS_NOEUD =SIMP(statut='f',typ=no ,validators=NoRepeat(),max='**'),
SANS_GROUP_NO =SIMP(statut='f',typ=grno,validators=NoRepeat(),max='**'),
-
+
b_frottement =BLOC(condition = "FROTTEMENT == 'COULOMB' ",fr="Paramètres du frottement de Coulomb",
COULOMB =SIMP(statut='o',typ='R',),
- E_T =SIMP(statut='f',typ='R',
+ E_T =SIMP(statut='o',typ='R',
fr="Active la pénalisation sur le frottement et définit le coefficient de pénalisation"),
COEF_MATR_FROT =SIMP(statut='f',typ='R',defaut=0.E+0),
),),
COEF_PENA_CONT =SIMP(statut='f',typ='R',defaut=100.E+0),),
# --------------------------------
GLISSIERE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),),
- b_glissiere =BLOC(condition = "GLISSIERE == 'OUI' ",
- ALARME_JEU =SIMP(statut='f',typ='R',defaut=0.),),
# --------------------------------
COMPLIANCE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON",) ),
b_compliance =BLOC(condition = "COMPLIANCE == 'OUI' ",fr="Parametres de la compliance",
fr="Critère de convergence (niveau d'interpénétration autorisé)"),
REAC_ITER =SIMP(statut='f',typ='I',defaut=3, fr="Fréquence de réinitialisation de la conjugaison"),
ITER_GCP_MAXI =SIMP(statut='f',typ='I',defaut=0, fr="Nombre d'itérations maximal pour le GCP"),
- STOP_SINGULIER =SIMP(statut='f',typ='TXM',defaut="OUI",
- into=("OUI","NON")),
REAC_GEOM =SIMP(statut='f',typ='TXM',defaut="AUTOMATIQUE",
into=("AUTOMATIQUE","CONTROLE","SANS")),
),
INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
) ;
-#& MODIF COMMANDE DATE 16/09/2008 AUTEUR PELLET J.PELLET
+#& MODIF COMMANDE DATE 06/05/2009 AUTEUR MACOCCO K.MACOCCO
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
COEF_MULT =SIMP(statut='f',typ='R',max='**'),
METHODE =SIMP(statut='f',typ='TXM',defaut="CONTRAINTE",
- into=("CONTRAINTE","GCPC",) ),
+ into=("CONTRAINTE",) ),
),
),
INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
) ;
-#& MODIF COMMANDE DATE 16/09/2008 AUTEUR PELLET J.PELLET
+#& MODIF COMMANDE DATE 06/05/2009 AUTEUR MACOCCO K.MACOCCO
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
COEF_MULT =SIMP(statut='f',typ=(fonction_sdaster,nappe_sdaster,formule),max='**'),
METHODE =SIMP(statut='f',typ='TXM',defaut="CONTRAINTE",
- into=("CONTRAINTE","GCPC",) ),
+ into=("CONTRAINTE",) ),
),
),
TITRE =SIMP(statut='f',typ='TXM',max='**'),
) ;
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
),
),
);
-#& MODIF COMMANDE DATE 20/10/2008 AUTEUR ASSIRE A.ASSIRE
+#& MODIF COMMANDE DATE 28/04/2009 AUTEUR ASSIRE A.ASSIRE
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2008 EDF R&D WWW.CODE-ASTER.ORG
CARA_ELEM = SIMP(statut='o',typ=cara_elem),
FONC_PARASOL = FACT(statut='f',
- NFKT = SIMP(statut='o',typ=(fonction_sdaster,)),
- NFKR = SIMP(statut='o',typ=(fonction_sdaster,)),
+ NFKT = SIMP(statut='f',typ=(fonction_sdaster,)),
+ NFKR = SIMP(statut='f',typ=(fonction_sdaster,)),
GROUP_MA = SIMP(statut='f',typ=grma,validators=NoRepeat(),max='**'),
),
GROUP_NO = SIMP(statut='f',typ=grno,validators=NoRepeat(),max=1),
GROUP_MA = SIMP(statut='f',typ=grma,validators=NoRepeat(),max=1),
- b_maille = BLOC(condition = "MAILLE != None", regles=(AU_MOINS_UN('NUM_GAUSS')),
+ b_maille = BLOC(condition = "GROUP_MA != None", regles=(AU_MOINS_UN('NUM_GAUSS')),
NUM_GAUSS = SIMP(statut='f',typ='I',validators=NoRepeat(),max='**'),),
),
b_courbe = BLOC(condition = "COURBE != None",
PROL_GAUCHE_FONC=SIMP(statut='f',typ='TXM',into=("CONSTANT","LINEAIRE","EXCLU") ),
INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
)
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 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.
+# 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.
+# 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.
+# 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.
# ======================================================================
# RESPONSABLE GREFFET N.GREFFET
CALC_FORC_AJOU=OPER(nom="CALC_FORC_AJOU",op=199,sd_prod=vect_asse_gene,
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
TITRE =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max='**'),
INFO =SIMP(statut='f',typ='I',defaut=1,into=(1 , 2) ),
) ;
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 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.
+# 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.
+# 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.
+# 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.
# ======================================================================
# RESPONSABLE GREFFET N.GREFFET
CALC_MATR_AJOU=OPER(nom="CALC_MATR_AJOU",op= 152,sd_prod=matr_asse_gene_r,
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
- OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
+ OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
b_petsc =BLOC(condition = "METHODE == 'PETSC' ",fr="Paramètres de la méthode PETSC",
OPTION =SIMP(statut='f',typ='TXM'
,into=("META_ELNO_TEMP",) ),
) ;
-#& MODIF COMMANDE DATE 14/10/2008 AUTEUR NISTOR I.NISTOR
+#& MODIF COMMANDE DATE 27/04/2009 AUTEUR NISTOR I.NISTOR
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2008 EDF R&D WWW.CODE-ASTER.ORG
from Macro.calc_modal_ops import calc_modal_ops
-def calc_modal_prod(self,AMORTISEMENT,**args):
- if AMORTISEMENT=="NON": return mode_meca
- if AMORTISEMENT=="OUI": return mode_meca_c
+def calc_modal_prod(self,AMORTISSEMENT,**args):
+ if AMORTISSEMENT=="NON": return mode_meca
+ if AMORTISSEMENT=="OUI": return mode_meca_c
raise AsException("type de concept resultat non prevu")
sd_prod=calc_modal_prod,
fr="Calcul des modes propres reels ou complexes dans une seule commande",
MODELE =SIMP(statut='o',typ=modele_sdaster),
- AMORTISEMENT =SIMP(statut='f',typ='TXM',into=("OUI","NON"),defaut="NON" ),
+ AMORTISSEMENT =SIMP(statut='f',typ='TXM',into=("OUI","NON"),defaut="NON" ),
CHAM_MATER =SIMP(statut='o',typ=cham_mater),
INST =SIMP(statut='f',typ='R',defaut=0.),
CARA_ELEM =SIMP(statut='f',typ=cara_elem),
GROUP_NO_RESU =SIMP(statut='f',typ=grma,validators=NoRepeat(),max='**'),
NOEUD_RESU =SIMP(statut='f',typ=ma,validators=NoRepeat(),max='**'),
) ;
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2003 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.
+# 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.
# ======================================================================
# RESPONSABLE MICHEL S.MICHEL
# CATALOGUE DE LA MACRO "CALC_PRECONT"
# -----------------------------------------
# USAGE :
-#
-#
+#
+#
# ===========================================================================
CALC_PRECONT=MACRO(nom="CALC_PRECONT",op=calc_precont_ops,sd_prod=evol_noli,
b_subd_extr=BLOC(condition = "SUBD_METHODE == 'EXTRAPOLE'",
regles=(AU_MOINS_UN('SUBD_NIVEAU','SUBD_PAS_MINI'),),
SUBD_OPTION =SIMP(statut='f',typ='TXM',
- into =("IGNORE_PREMIERES","GARDE_DERNIERES",),
+ into =("IGNORE_PREMIERES","GARDE_DERNIERES",),
defaut="IGNORE_PREMIERES",
fr="Technique d'extrapolation : les 1ere itérations sont ignorées ou les dernières sont gardées"),
SUBD_ITER_IGNO =SIMP(statut='c',typ='I',defaut=3,val_min=0,
SUBD_ITER_PLUS =SIMP(statut='c',typ='I',defaut=50,val_min=20,
fr="% itération autorisée en plus"),
),
- # FIN DE BLOC POUR LA SUBDIVISION DES PAS DE TEMPS
+ # FIN DE BLOC POUR LA SUBDIVISION DES PAS DE TEMPS
),
NEWTON =FACT(statut='d',
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
FORMAT =SIMP(statut='f',typ='TXM',defaut="EXCEL",into=("EXCEL","AGRAF") ),
),
) ;
-#& MODIF COMMANDE DATE 21/10/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 07/04/2009 AUTEUR ABBAS M.ABBAS
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2007 EDF R&D WWW.CODE-ASTER.ORG
CHARGE =SIMP(statut='o',typ=(char_meca,char_cine_meca)),
FONC_MULT =SIMP(statut='f',typ=(fonction_sdaster,nappe_sdaster,formule)),
TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FIXE_CSTE",
- into=("FIXE_CSTE","FIXE_PILO","SUIV","DIDI")),
+ into=("FIXE_CSTE",)),
+
),
DEPL =SIMP(statut='o',typ=cham_no_sdaster ),
INCR_DEPL =SIMP(statut='o',typ=cham_no_sdaster ),
NOM_CHAM =SIMP(statut='o',typ='TXM',validators=NoRepeat(),max=6,
into=("DEPL","REAC_NODA","SIEF_ELGA_DEPL","EPSI_ELNO_DEPL","SIGM_ELNO_DEPL","TEMP","FLUX_ELNO_TEMP"),),
) ;
-#& MODIF COMMANDE DATE 21/04/2008 AUTEUR LEFEBVRE J-P.LEFEBVRE
+#& MODIF COMMANDE DATE 08/12/2008 AUTEUR SELLENET N.SELLENET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
# ALONG WITH THIS PROGRAM; IF NOT, WRITE TO EDF R&D CODE_ASTER,
# 1 AVENUE DU GENERAL DE GAULLE, 92141 CLAMART CEDEX, FRANCE.
# ======================================================================
-# RESPONSABLE PELLET J.PELLET
+# RESPONSABLE SELLENET N.SELLENET
def comb_matr_asse_prod(COMB_R,COMB_C,CALC_AMOR_GENE,**args):
if COMB_C != None:
type_mat = AsType(COMB_C[0]['MATR_ASSE'])
) ;
-#& MODIF COMMANDE DATE 20/10/2008 AUTEUR ASSIRE A.ASSIRE
+#& MODIF COMMANDE DATE 20/04/2009 AUTEUR SFAYOLLE S.FAYOLLE
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2008 EDF R&D WWW.CODE-ASTER.ORG
# ALONG WITH THIS PROGRAM; IF NOT, WRITE TO EDF R&D CODE_ASTER,
# 1 AVENUE DU GENERAL DE GAULLE, 92141 CLAMART CEDEX, FRANCE.
# ======================================================================
-# RESPONSABLE MARKOVIC D.MARKOVIC
+# RESPONSABLE SFAYOLLE S.FAYOLLE
DEFI_GLRC=OPER(nom="DEFI_GLRC",op=57,sd_prod=mater_sdaster,reentrant='f',
- UIinfo={"groupes":("Modélisation",)},
- fr="Déterminer les caractéristiques du béton armé homogénéisées à partir des propriétés du béton et de "
+ UIinfo={"groupes":("Modelisation",)},
+ fr="Determiner les caracteristiques du beton arme homogeneisees a partir des proprietes du beton et de "
+" plusieurs types d'armature",
reuse = SIMP(statut='f',typ=mater_sdaster),
BETON =FACT(statut='o',max=1,
MATER =SIMP(statut='o',typ=(mater_sdaster) ),
EPAIS =SIMP(statut='o',typ='R',val_min=0.E+0 ),
- OMT =SIMP(statut='f',typ='R',val_min=0.E+0,defaut=0.0E+0),
- EAT =SIMP(statut='f',typ='R',val_min=0.E+0,defaut=0.0E+0),
- BT1 =SIMP(statut='f',typ='R',val_min=0.E+0,defaut=0.0E+0),
- BT2 =SIMP(statut='f',typ='R',val_min=0.E+0,defaut=0.0E+0),
- GAMMA =SIMP(statut='o',typ='R',val_min=0.E+0,val_max=1.E+0),
- QP1 =SIMP(statut='o',typ='R',val_min=0.E+0,val_max=1.E+0),
- QP2 =SIMP(statut='o',typ='R',val_min=0.E+0,val_max=1.E+0),
+ GAMMA =SIMP(statut='o',typ='R',val_min=0.E+0,val_max=1.E+0),
+ QP1 =SIMP(statut='o',typ='R',val_min=0.E+0,val_max=1.E+0),
+ QP2 =SIMP(statut='o',typ='R',val_min=0.E+0,val_max=1.E+0),
C1N1 =SIMP(statut='o',typ='R',val_min=0.E+0),
C1N2 =SIMP(statut='o',typ='R',val_min=0.E+0),
C2M1 =SIMP(statut='o',typ='R',val_min=0.E+0),
C2M2 =SIMP(statut='o',typ='R',val_min=0.E+0),
C2M3 =SIMP(statut='o',typ='R',val_min=0.E+0),
-
- MP1X =SIMP(statut='f',typ=('R',listr8_sdaster)),
- MP2X =SIMP(statut='f',typ=('R',listr8_sdaster)),
- MP1Y =SIMP(statut='f',typ=('R',listr8_sdaster)),
- MP2Y =SIMP(statut='f',typ=('R',listr8_sdaster)),
+
+ OMT =SIMP(statut='f',typ='R',val_min=0.E+0,defaut=0.0E+0),
+ EAT =SIMP(statut='f',typ='R',val_min=0.E+0,defaut=0.0E+0),
+ BT1 =SIMP(statut='f',typ='R',val_min=0.E+0,defaut=0.0E+0),
+ BT2 =SIMP(statut='f',typ='R',val_min=0.E+0,defaut=0.0E+0),
+
+ MP1X =SIMP(statut='f',typ=('R',listr8_sdaster)),
+ MP2X =SIMP(statut='f',typ=('R',listr8_sdaster)),
+ MP1Y =SIMP(statut='f',typ=('R',listr8_sdaster)),
+ MP2Y =SIMP(statut='f',typ=('R',listr8_sdaster)),
),
NAPPE =FACT(statut='o',max=10,
MATER =SIMP(statut='o',typ=(mater_sdaster) ),
- OMX =SIMP(statut='o',typ='R',val_min=0.E+0),
- OMY =SIMP(statut='o',typ='R',val_min=0.E+0),
- RX =SIMP(statut='o',typ='R',val_min=-1.E+0,val_max=1.E+0),
- RY =SIMP(statut='o',typ='R',val_min=-1.E+0,val_max=1.E+0),
- FS =SIMP(statut='f',typ='R',val_min=0.E+0),
+ OMX =SIMP(statut='o',typ='R',val_min=0.E+0),
+ OMY =SIMP(statut='o',typ='R',val_min=0.E+0),
+ RX =SIMP(statut='o',typ='R',val_min=-1.E+0,val_max=1.E+0),
+ RY =SIMP(statut='o',typ='R',val_min=-1.E+0,val_max=1.E+0),
),
CABLE_PREC =FACT(statut='f',max=1,
MATER =SIMP(statut='o',typ=(mater_sdaster) ),
- OMX =SIMP(statut='o',typ='R',val_min=0.E+0),
- OMY =SIMP(statut='o',typ='R',val_min=0.E+0),
- RX =SIMP(statut='o',typ='R',val_min=-1.E+0,val_max=1.E+0),
- RY =SIMP(statut='o',typ='R',val_min=-1.E+0,val_max=1.E+0),
- PREX =SIMP(statut='o',typ='R'),
- PREY =SIMP(statut='o',typ='R'),
+ OMX =SIMP(statut='o',typ='R',val_min=0.E+0),
+ OMY =SIMP(statut='o',typ='R',val_min=0.E+0),
+ RX =SIMP(statut='o',typ='R',val_min=-1.E+0,val_max=1.E+0),
+ RY =SIMP(statut='o',typ='R',val_min=-1.E+0,val_max=1.E+0),
+ PREX =SIMP(statut='o',typ='R'),
+ PREY =SIMP(statut='o',typ='R'),
),
LINER =FACT(statut='f',max=10,
MATER =SIMP(statut='o',typ=(mater_sdaster) ),
- OML =SIMP(statut='o',typ='R',val_min=0.E+0),
- RLR =SIMP(statut='o',typ='R',val_min=-1.E+0,val_max=1.E+0),
+ OML =SIMP(statut='o',typ='R',val_min=0.E+0),
+ RLR =SIMP(statut='o',typ='R',val_min=-1.E+0,val_max=1.E+0),
),
IMPRESSION =FACT(statut='f',
- UNITE =SIMP(statut='f',typ='I',defaut=8),
+ UNITE =SIMP(statut='f',typ='I',defaut=8),
),
) ;
#& MODIF COMMANDE DATE 21/04/2008 AUTEUR LEFEBVRE J-P.LEFEBVRE
GROUP_NO_FIN =SIMP(statut='f',typ=grno),
),
) ;
-#& MODIF COMMANDE DATE 20/10/2008 AUTEUR MICHEL S.MICHEL
+#& MODIF COMMANDE DATE 22/12/2008 AUTEUR PROIX J-M.PROIX
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
),
VISCOCHAB =FACT(statut='f',
K_0 =SIMP(statut='o',typ='R'),
- A_K =SIMP(statut='o',typ='R'),
- A_R =SIMP(statut='o',typ='R'),
+ A_K =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
+ A_R =SIMP(statut='f',typ='R',defaut= 1.E+0 ),
K =SIMP(statut='o',typ='R'),
N =SIMP(statut='o',typ='R'),
- ALP =SIMP(statut='o',typ='R'),
- B =SIMP(statut='o',typ='R'),
- M_R =SIMP(statut='o',typ='R'),
- G_R =SIMP(statut='o',typ='R'),
- MU =SIMP(statut='o',typ='R'),
+ ALP =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
+ B =SIMP(statut='f',typ='R'),
+ M_R =SIMP(statut='f',typ='R',defaut= 1.E+0 ),
+ G_R =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
+ MU =SIMP(statut='o',typ='R',defaut= 0.E+0 ),
Q_M =SIMP(statut='o',typ='R'),
Q_0 =SIMP(statut='o',typ='R'),
- QR_0 =SIMP(statut='o',typ='R'),
- ETA =SIMP(statut='o',typ='R'),
+ QR_0 =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
+ ETA =SIMP(statut='f',typ='R',defaut= 0.5E+0 ),
C1 =SIMP(statut='o',typ='R'),
- M_1 =SIMP(statut='o',typ='R'),
- D1 =SIMP(statut='o',typ='R'),
- G_X1 =SIMP(statut='o',typ='R'),
+ M_1 =SIMP(statut='f',typ='R',defaut= 1.E+0 ),
+ D1 =SIMP(statut='f',typ='R',defaut= 1.E+0 ),
+ G_X1 =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
G1_0 =SIMP(statut='o',typ='R'),
C2 =SIMP(statut='o',typ='R'),
- M_2 =SIMP(statut='o',typ='R'),
- D2 =SIMP(statut='o',typ='R'),
- G_X2 =SIMP(statut='o',typ='R'),
+ M_2 =SIMP(statut='f',typ='R',defaut= 1.E+0 ),
+ D2 =SIMP(statut='f',typ='R',defaut= 1.E+0 ),
+ G_X2 =SIMP(statut='f',typ='R',defaut= 0.E+0 ),
G2_0 =SIMP(statut='o',typ='R'),
- A_I =SIMP(statut='o',typ='R'),
+ A_I =SIMP(statut='f',typ='R',defaut= 1.E+0 ),
),
VISCOCHAB_FO =FACT(statut='f',
K_0 =SIMP(statut='o',typ=(fonction_sdaster,nappe_sdaster,formule)),
#
INFO =SIMP(statut='f',typ='I' ,defaut=1,into=( 1 , 2)),
) ;
-#& MODIF COMMANDE DATE 06/10/2008 AUTEUR DEVESA G.DEVESA
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 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.
+# 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.
+# 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.
+# 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.
# ======================================================================
# RESPONSABLE ANDRIAM H.ANDRIAMBOLOLONA
def dyna_line_harm_prod(MATR_RIGI,**args):
NOM_CHAM =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max=3,into=("DEPL","VITE","ACCE") ),
b_reuse =BLOC(condition = "reuse",fr="en mode concept reentrant : RESULTAT obligatoire",
RESULTAT =SIMP(statut='o',typ=(dyna_harmo,harm_gene)),
- ),
+ ),
EXCIT =FACT(statut='o',max='**',
regles=(UN_PARMI('VECT_ASSE','CHARGE'),
UN_PARMI('FONC_MULT','FONC_MULT_C','COEF_MULT','COEF_MULT_C'),
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MAILLE","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=0,min=0),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=0,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
),
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MAILLE","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=0,min=0),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=0,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
),
ang="List of sensitivity parameters"),
) ;
# Rajouter test icompatibilite vect_asse et sensibilite
-# Peut-on aussi rajouter ici le test d incompatibilite charge complexe - derivation
-# presents dans le Fortran
+# Peut-on aussi rajouter ici le test d incompatibilite charge complexe - derivation
+# presents dans le Fortran
#& MODIF COMMANDE DATE 06/10/2008 AUTEUR DEVESA G.DEVESA
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
TITRE =SIMP(statut='f',typ='TXM',max='**'),
INFO =SIMP(statut='f',typ='I',into=(1,2) ),
) ;
-#& MODIF COMMANDE DATE 18/11/2008 AUTEUR ABBAS M.ABBAS
+#& MODIF COMMANDE DATE 21/04/2009 AUTEUR ABBAS M.ABBAS
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
# PRESENT_ABSENT('MULT_APPUI','FONC_MULT'),
),
TYPE_CHARGE =SIMP(statut='f',typ='TXM',defaut="FIXE_CSTE",
- into=("FIXE_CSTE","FIXE_PILO","SUIV","DIDI")),
+ into=("FIXE_CSTE","SUIV","DIDI")),
CHARGE =SIMP(statut='o',typ=(char_meca,char_cine_meca)),
FONC_MULT =SIMP(statut='f',typ=(fonction_sdaster,nappe_sdaster,formule)),
DEPL =SIMP(statut='f',typ=(fonction_sdaster,nappe_sdaster,formule)),
RELATION =SIMP(statut='o',typ='TXM',defaut="ELAS",
into=("ELAS","ELAS_VMIS_LINE","ELAS_VMIS_TRAC","ELAS_VMIS_PUIS",
"ELAS_POUTRE_GR","CABLE","ELAS_HYPER")),
- ELAS =SIMP(statut='c',typ='I',defaut=1,into=(1,)),
DEFORMATION =SIMP(statut='f',typ='TXM',defaut="PETIT" ,into=("PETIT","GREEN","GREEN_GR",) ),
regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
into=("DIFF_CENT","TCHAMWA","NEWMARK","HHT","THETA_METHODE"),),
b_tchamwa = BLOC(condition="SCHEMA=='TCHAMWA'",
PHI =SIMP(statut='f',typ='R',defaut= 1.05),),
-
+
b_newmark = BLOC(condition="SCHEMA=='NEWMARK'",
BETA =SIMP(statut='f',typ='R',defaut= 0.25),
GAMMA =SIMP(statut='f',typ='R',defaut= 0.5),),
-
+
b_hht = BLOC(condition="SCHEMA=='HHT'",
ALPHA =SIMP(statut='f',typ='R',defaut= -0.3 ),
MODI_EQUI =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON"),),),
-
+
b_theta = BLOC(condition="SCHEMA=='THETA_METHODE'",
THETA =SIMP(statut='f',typ='R',defaut= 1.,val_min=0.5,val_max=1. ),),
-
+
b_explicit= BLOC(condition="SCHEMA=='TCHAMWA'or SCHEMA=='DIFF_CENT'",
STOP_CFL =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON"),),
FORMULATION =SIMP(statut='o',typ='TXM',into=("ACCELERATION",),),),
-
+
b_implicit= BLOC(condition="SCHEMA!='TCHAMWA'and SCHEMA!='DIFF_CENT'",
FORMULATION =SIMP(statut='o',max=1,typ='TXM',into=("DEPLACEMENT","VITESSE","ACCELERATION"),),),
),
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
b_gcpc =BLOC(condition="METHODE == 'GCPC'",fr="Paramètres de la méthode du gradient conjugué",
b_petsc_ilu =BLOC(condition = "PRE_COND == 'LDLT_INC' ",
NIVE_REMPLISSAGE = SIMP(statut='f',typ='I',defaut= 0 ),
REMPLISSAGE = SIMP(statut='f',typ='R',defaut= 1.0),
- ),
+ ),
RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6),
NMAX_ITER =SIMP(statut='f',typ='I',defaut= -1 ),
- ),
+ ),
SYME =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
),
#-------------------------------------------------------------------
ITER_GLOB_ELAS =SIMP(statut='f',typ='I',defaut=25),
TYPE =SIMP(statut='f',typ='TXM',defaut="PIC",into=("PIC","PLATEAU")),
b_plateau =BLOC(condition = "TYPE == 'PLATEAU' ",
-
+
PLATEAU_ITER =SIMP(statut='f',typ='I',defaut=3, val_min =2),
- PLATEAU_RELA =SIMP(statut='f',typ='R',defaut=1E-3),
+ PLATEAU_RELA =SIMP(statut='f',typ='R',defaut=1E-3),
),
ARRET =SIMP(statut='f',typ='TXM',defaut="OUI"),
-
+
),
#-------------------------------------------------------------------
OBSERVATION =FACT(statut='f',max='**',
"RESI_REFE","REFE_NOEU",
"RELI_ITER","RELI_COEF",
"PILO_PARA",
- "LAGR_ECAR","LAGR_INCR","LAGR_ITER",
"MATR_ASSE",
"ITER_DEBO",
"CTCD_ITER","CTCD_GEOM","CTCD_NOEU",
NUME_INIT =SIMP(statut='f',typ='I'),
DETR_NUME_SUIV =SIMP(statut='f',typ='TXM',into=("OUI",)),
CHAM_EXCLU =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max='**',
- into=("DEPL","SIEF_ELGA","VARI_ELGA","ACCE","VITE","LANL_ELGA")),
+ into=("DEPL","SIEF_ELGA","VARI_ELGA","ACCE","VITE",)),
),
#-------------------------------------------------------------------
OPTION =SIMP(statut='f',typ='TXM',defaut="TOUT",into=("TOUT","DIAG") ),
TITRE =SIMP(statut='f',typ='TXM',max='**'),
) ;
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
),
UNITE = SIMP(statut='f',typ='I',defaut=38),
AJOUT = SIMP(statut='f', typ='TXM', defaut='NON', into=('OUI', 'NON')),
);
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 12/01/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
VERSION =SIMP(statut='f',typ='R',defaut=1.2,into=(1.0,1.2)),
),
- RESTREINT =FACT(statut='f',fr="Réduire le maillage et les champs imprimés sur un ensemble de mailles",max=1,
+
+ RESTREINT =FACT(statut='f', max=1,
+ fr="Pour réduire une ou plusieurs sd_resultat sur un ensemble de mailles",
regles=(AU_MOINS_UN('GROUP_MA','MAILLE',),),
GROUP_MA =SIMP(statut='f',typ=grma,validators=NoRepeat(),max='**'),
MAILLE =SIMP(statut='f',typ=ma,validators=NoRepeat(),max='**'),
TOUT_GROUP_MA =SIMP(statut='f',typ='TXM',defaut='NON',into=('OUI','NON'),),
GROUP_NO =SIMP(statut='f',typ=grno,validators=NoRepeat(),max='**'),
TOUT_GROUP_NO =SIMP(statut='f',typ='TXM',defaut='NON',into=('OUI','NON'),),
- MODELE =SIMP(statut='f',typ=modele_sdaster,
- fr="Nécessaire s'il y a des cham_elem dans la sd_resultat à imprimer."),
),
RESU =FACT(statut='o',max='**',
ang="Incompatible elements for HOMARD" ),
#
) ;
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR GALENNE E.GALENNE
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
# ======================================================================
# RESPONSABLE GALENNE E.GALENNE
from Macro.macr_ascouf_calc_ops import macr_ascouf_calc_ops
-def macr_ascouf_calc_prod(self,MODELE,CHAM_MATER,CARA_ELEM,FOND_FISS,CHARGE,RESU_THER,**args):
+def macr_ascouf_calc_prod(self,MODELE,CHAM_MATER,CARA_ELEM,FOND_FISS,RESU_THER,**args):
self.type_sdprod(MODELE,modele_sdaster)
if CHAM_MATER != None:self.type_sdprod(CHAM_MATER,cham_mater)
if CARA_ELEM != None:self.type_sdprod(CARA_ELEM,cara_elem)
if FOND_FISS != None:self.type_sdprod(FOND_FISS,fond_fiss)
- if CHARGE != None:self.type_sdprod(CHARGE,char_meca)
if RESU_THER != None:self.type_sdprod(RESU_THER,evol_ther)
return evol_noli
CHAM_MATER =SIMP(statut='f',typ=CO,),
CARA_ELEM =SIMP(statut='f',typ=CO,),
FOND_FISS =SIMP(statut='f',typ=CO,),
- CHARGE =SIMP(statut='f',typ=CO,),
RESU_THER =SIMP(statut='f',typ=CO,),
AFFE_MATERIAU =FACT(statut='o',max=3,
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0,),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2) ),
) ;
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR GALENNE E.GALENNE
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
# RESPONSABLE GALENNE E.GALENNE
from Macro.macr_aspic_calc_ops import macr_aspic_calc_ops
-def macr_aspic_calc_prod(self,MODELE,CHAM_MATER,CARA_ELEM,FOND_FISS_1,FOND_FISS_2,CHARGE,RESU_THER,**args):
+def macr_aspic_calc_prod(self,MODELE,CHAM_MATER,CARA_ELEM,FOND_FISS_1,FOND_FISS_2,RESU_THER,**args):
if MODELE != None:self.type_sdprod(MODELE,modele_sdaster)
if CHAM_MATER != None:self.type_sdprod(CHAM_MATER,cham_mater)
if CARA_ELEM != None:self.type_sdprod(CARA_ELEM,cara_elem)
if FOND_FISS_1 != None:self.type_sdprod(FOND_FISS_1,fond_fiss)
if FOND_FISS_2 != None:self.type_sdprod(FOND_FISS_2,fond_fiss)
- if CHARGE != None:self.type_sdprod(CHARGE,char_meca)
if RESU_THER != None:self.type_sdprod(RESU_THER,evol_ther)
return evol_noli
CARA_ELEM =SIMP(statut='f',typ=CO,),
FOND_FISS_1 =SIMP(statut='f',typ=CO,),
FOND_FISS_2 =SIMP(statut='f',typ=CO,),
- CHARGE =SIMP(statut='f',typ=CO,),
RESU_THER =SIMP(statut='f',typ=CO,),
AFFE_MATERIAU =FACT(statut='o',max=3,
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0,),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
),
),
)
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 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.
+# 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.
+# 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.
+# 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.
# ======================================================================
# RESPONSABLE GREFFET N.GREFFET
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
ELEMENT =FACT(statut='f',),
) ;
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
),
INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
) ;
-#& MODIF COMMANDE DATE 05/05/2008 AUTEUR NISTOR I.NISTOR
+#& MODIF COMMANDE DATE 06/05/2009 AUTEUR MACOCCO K.MACOCCO
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
# ALONG WITH THIS PROGRAM; IF NOT, WRITE TO EDF R&D CODE_ASTER,
# 1 AVENUE DU GENERAL DE GAULLE, 92141 CLAMART CEDEX, FRANCE.
# ======================================================================
-# RESPONSABLE NISTOR I.NISTOR
+# RESPONSABLE O.BOITEAU
def mode_iter_inv_prod(MATR_A,MATR_C,TYPE_RESU,**args ):
if TYPE_RESU == "MODE_FLAMB" : return mode_flamb
INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
TITRE =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max='**'),
) ;
-#& MODIF COMMANDE DATE 05/05/2008 AUTEUR NISTOR I.NISTOR
+#& MODIF COMMANDE DATE 06/05/2009 AUTEUR MACOCCO K.MACOCCO
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
# ALONG WITH THIS PROGRAM; IF NOT, WRITE TO EDF R&D CODE_ASTER,
# 1 AVENUE DU GENERAL DE GAULLE, 92141 CLAMART CEDEX, FRANCE.
# ======================================================================
-# RESPONSABLE NISTOR I.NISTOR
+# RESPONSABLE O.BOITEAU
def mode_iter_simult_prod(MATR_A,MATR_C,TYPE_RESU,**args ):
if TYPE_RESU == "MODE_FLAMB" : return mode_flamb
INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
TITRE =SIMP(statut='f',typ='TXM',max='**'),
) ;
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
),
INFO =SIMP(statut='f',typ='I',defaut= 1,into=( 1 , 2) ),
) ;
-#& MODIF COMMANDE DATE 21/04/2008 AUTEUR GENIAUT S.GENIAUT
+#& MODIF COMMANDE DATE 20/04/2009 AUTEUR GENIAUT S.GENIAUT
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2004 EDF R&D WWW.CODE-ASTER.ORG
MODELE_IN =SIMP(statut='o',typ=modele_sdaster,min=1,max=1,),
FISSURE =SIMP(statut='o',typ=fiss_xfem,min=1,max='**',),
- CRITERE =SIMP(statut='f',typ='R',defaut=1.67E-8),
+ CRITERE =SIMP(statut='f',typ='R',defaut=1.1E-4),
INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2,)),
CONTACT =SIMP(statut='f',typ='TXM',defaut='NON',into=("OUI","NON"),min=1,max=1,),
) ;
INFO =SIMP(statut='f',typ='I',defaut= 1,into=(1,2,) ),
);
-#& MODIF COMMANDE DATE 03/11/2008 AUTEUR MACOCCO K.MACOCCO
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR GALENNE E.GALENNE
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
NOM_SITU =SIMP(statut='f',typ='TXM',fr="nom de la situation" ),
NUME_GROUPE =SIMP(statut='o',typ='I',fr="numéros du groupe de la situation" ),
CHAR_ETAT =SIMP(statut='o',typ='I',max='**',fr="numeros de chargements etat A" ),
- NUME_RESU_THER =SIMP(statut='f',typ='I',max='**',fr="numeros de transitoires thermiques" ),
),
SITUATION =FACT(statut='o',max='**',fr="Situation",ang="situation_ang",
NB_OCCUR =SIMP(statut='o',typ='I',fr="nombre d'occurences de la situation" ),
NOM_SITU =SIMP(statut='f',typ='TXM',fr="nom de la situation" ),
NUME_GROUPE =SIMP(statut='o',typ='I',fr="numéros du groupe de la situation" ),
CHAR_ETAT =SIMP(statut='o',typ='I',max='**',fr="numeros de chargements etat A" ),
- NUME_RESU_THER =SIMP(statut='f',typ='I',max='**',fr="numeros de transitoires thermiques" ),
TEMP_REF =SIMP(statut='f',typ='R',fr="temperature référence"),
),
SITUATION =FACT(statut='o',max='**',fr="Situation",ang="situation_ang",
CHAM_NO =SIMP(statut='o',typ=cham_no_sdaster),
TITRE =SIMP(statut='f',typ='TXM',max='**'),
) ;
-#& MODIF COMMANDE DATE 21/04/2008 AUTEUR LEFEBVRE J-P.LEFEBVRE
+#& MODIF COMMANDE DATE 06/04/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
NUME_MODE =SIMP(statut='f',typ='I',validators=NoRepeat(),max='**' ),
NOEUD_CMP =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max='**'),
+ b_acce_reel =BLOC(condition="(FREQ != None)or(LIST_FREQ != None)or(INST != None)or(LIST_INST != None)",
+ CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("RELATIF","ABSOLU",),),
+ b_prec_rela=BLOC(condition="(CRITERE=='RELATIF')",
+ PRECISION =SIMP(statut='f',typ='R',defaut= 1.E-6,),),
+ b_prec_abso=BLOC(condition="(CRITERE=='ABSOLU')",
+ PRECISION =SIMP(statut='o',typ='R',),),
+ ),
+
CAS_FIGURE =SIMP(statut='f',typ='TXM',into=("2D","3D","2.5D","1.5D",),
fr="Pour indiquer au programme le type de projection souhaité"),
VECT_ASSE =SIMP(statut='f',typ=cham_no_sdaster),
VECT_ASSE_GENE =SIMP(statut='f',typ=vect_asse_gene ),
) ;
-#& MODIF COMMANDE DATE 20/10/2008 AUTEUR GALENNE E.GALENNE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR MESSIER J.MESSIER
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2008 EDF R&D WWW.CODE-ASTER.ORG
b_hamilton =BLOC(condition="(METHODE_PROPA=='HAMILTON')",
MODELE =SIMP(statut='o',typ=modele_sdaster),
RAYON =SIMP(statut='o',typ='R',),
- METHODE =SIMP(statut='f',typ='TXM',into=("SIMPLEXE","UPWIND",),defaut="SIMPLEXE"),
+ METHODE =SIMP(statut='f',typ='TXM',into=("SIMPLEXE",),defaut="SIMPLEXE"),
FISSURE = SIMP(statut='o',typ=CO),
TABLE = SIMP(statut='o',typ=table_sdaster),
),
TITRE =SIMP(statut='f',typ='TXM',max='**'),
INFO =SIMP(statut='f',typ='I',into=(1,2) ),
) ;
-#& MODIF COMMANDE DATE 21/10/2008 AUTEUR NISTOR I.NISTOR
+#& MODIF COMMANDE DATE 06/04/2009 AUTEUR DEVESA G.DEVESA
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2008 EDF R&D WWW.CODE-ASTER.ORG
reentrant='n',
UIinfo={"groupes":("Matrices/vecteurs",)},
regles=(
- EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','LIST_INST','TOUT_INST'),
- EXCLUS('NOEUD','GROUP_NO'),
- EXCLUS('MAILLE','GROUP_MA'),
+ EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','LIST_INST','TOUT_INST'),
EXCLUS('MACR_ELEM_DYNA','BASE_MODALE'),),
RESULTAT =SIMP(statut='f',typ=(evol_noli,dyna_trans) ),
BASE_MODALE =SIMP(statut='f',typ=(base_modale,mode_meca) ),
- NUME_DDL =SIMP(statut='f',typ=nume_ddl_sdaster ),
+# NUME_DDL =SIMP(statut='f',typ=nume_ddl_sdaster ),
MACR_ELEM_DYNA =SIMP(statut='f',typ=macr_elem_dyna),
TOUT_INST =SIMP(statut='f',typ='TXM',into=("OUI",) ),
INST =SIMP(statut='f',typ='R',validators=NoRepeat(),max='**' ),
b_prec_abso=BLOC(condition="(CRITERE=='ABSOLU')",
PRECISION =SIMP(statut='o',typ='R',),),
INTERPOL =SIMP(statut='f',typ='TXM',defaut="NON",into=("NON","LIN") ),
- NOM_CHAM =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max=8,defaut="ACCE",
- into=("DEPL","VITE","ACCE","ACCE_ABSOLU","EFGE_ELNO_DEPL","SIPO_ELNO_DEPL",
- "SIGM_ELNO_DEPL","FORC_NODA",) ),
TOUT_CHAM =SIMP(statut='f',typ='TXM',into=("OUI",) ),
- GROUP_NO =SIMP(statut='f',typ=grno,validators=NoRepeat(),max='**'),
- NOEUD =SIMP(statut='f',typ=no ,validators=NoRepeat(),max='**'),
- GROUP_MA =SIMP(statut='f',typ=grma,validators=NoRepeat(),max='**'),
- MAILLE =SIMP(statut='f',typ=ma ,validators=NoRepeat(),max='**'),
+ b_nom_cham=BLOC(condition="TOUT_CHAM == None",
+ NOM_CHAM =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max=3,defaut="ACCE",
+ into=("DEPL","VITE","ACCE",) ),),
TITRE =SIMP(statut='f',typ='TXM',max='**' ),
) ;
-#& MODIF COMMANDE DATE 21/10/2008 AUTEUR NISTOR I.NISTOR
+#& MODIF COMMANDE DATE 26/01/2009 AUTEUR BRIE N.BRIE
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2008 EDF R&D WWW.CODE-ASTER.ORG
reentrant='n',
UIinfo={"groupes":("Matrices/vecteurs",)},
regles=(
- EXCLUS('INST','LIST_INST','TOUT_INST'),
- EXCLUS('TOUT_ORDRE','NUME_ORDRE','NUME_MODE'),
- EXCLUS('FREQ','LIST_FREQ'),
+ EXCLUS('INST','LIST_INST','TOUT_INST',
+ 'TOUT_ORDRE','NUME_ORDRE','NUME_MODE',),
+ EXCLUS('FREQ','LIST_FREQ'),
EXCLUS('MULT_APPUI','CORR_STAT'),
EXCLUS('MULT_APPUI','NOEUD','GROUP_NO'),
EXCLUS('CORR_STAT','NOEUD','GROUP_NO'),
PRESENT_PRESENT('ACCE_MONO_APPUI','DIRECTION'),),
RESU_GENE =SIMP(statut='f',typ=(tran_gene,mode_gene,harm_gene) ),
MODE_MECA =SIMP(statut='f',typ=mode_meca ),
- BASE_MODALE =SIMP(statut='f',typ=(base_modale,mode_meca) ),
+# BASE_MODALE =SIMP(statut='f',typ=(base_modale,mode_meca) ),
NUME_DDL =SIMP(statut='f',typ=nume_ddl_sdaster ),
TOUT_INST =SIMP(statut='f',typ='TXM',into=("OUI",) ),
INST =SIMP(statut='f',typ='R',validators=NoRepeat(),max='**' ),
LIST_INST =SIMP(statut='f',typ=listr8_sdaster ),
TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
NUME_ORDRE =SIMP(statut='f',typ='I',validators=NoRepeat(),max='**' ),
- NUME_MODE =SIMP(statut='f',typ='I',validators=NoRepeat(),max='**' ),
+ NUME_MODE =SIMP(statut='f',typ='I',validators=NoRepeat(),max='**' ),
FREQ =SIMP(statut='f',typ='R',validators=NoRepeat(),max='**' ),
LIST_FREQ =SIMP(statut='f',typ=listr8_sdaster ),
CRITERE =SIMP(statut='f',typ='TXM',defaut="RELATIF",into=("ABSOLU","RELATIF") ),
INTERPOL =SIMP(statut='f',typ='TXM',defaut="NON",into=("NON","LIN") ),
MULT_APPUI =SIMP(statut='f',typ='TXM',into=("OUI",) ),
CORR_STAT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
- NOM_CHAM =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max=8,defaut="ACCE",
- into=("DEPL","VITE","ACCE","ACCE_ABSOLU","EFGE_ELNO_DEPL","SIPO_ELNO_DEPL",
- "SIGM_ELNO_DEPL","FORC_NODA",) ),
TOUT_CHAM =SIMP(statut='f',typ='TXM',into=("OUI",) ),
+ b_nom_cham=BLOC(condition="TOUT_CHAM == None",
+ NOM_CHAM =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max=8,defaut="ACCE",
+ into=("DEPL","VITE","ACCE","ACCE_ABSOLU","EFGE_ELNO_DEPL","SIPO_ELNO_DEPL",
+ "SIGM_ELNO_DEPL","FORC_NODA",) ),),
GROUP_NO =SIMP(statut='f',typ=grno,validators=NoRepeat(),max='**'),
NOEUD =SIMP(statut='f',typ=no ,validators=NoRepeat(),max='**'),
GROUP_MA =SIMP(statut='f',typ=grma,validators=NoRepeat(),max='**'),
DIRECTION =SIMP(statut='f',typ='R',min=3,max=3 ),
TITRE =SIMP(statut='f',typ='TXM',max='**' ),
) ;
-#& MODIF COMMANDE DATE 21/10/2008 AUTEUR NISTOR I.NISTOR
+#& MODIF COMMANDE DATE 26/01/2009 AUTEUR BRIE N.BRIE
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2008 EDF R&D WWW.CODE-ASTER.ORG
reentrant='n',
UIinfo={"groupes":("Matrices/vecteurs",)},
regles=(UN_PARMI('RESU_GENE','RESULTAT'),
- EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','LIST_INST','TOUT_INST'),
- EXCLUS('TOUT_INST','NUME_ORDRE','INST','LIST_INST','TOUT_ORDRE'),
+# ajout d'une regle de Ionel et Nicolas:
+# UN_PARMI('NOM_CHAM','TOUT_CHAM'),
+#
+ EXCLUS('TOUT_ORDRE','NUME_ORDRE','INST','LIST_INST','TOUT_INST','NUME_MODE',
+ 'FREQ', 'LIST_FREQ'),
# Doc U à revoir
- EXCLUS('NOEUD','GROUP_NO'),
- EXCLUS('MAILLE','GROUP_MA'),
- PRESENT_PRESENT('RESULTAT','SQUELETTE'),
+ EXCLUS('NOEUD','GROUP_NO'),
+ EXCLUS('MAILLE','GROUP_MA'),
+ PRESENT_PRESENT('RESULTAT','SQUELETTE'),
),
RESULTAT =SIMP(statut='f',typ=(evol_noli,dyna_trans,
mode_meca,base_modale) ),
RESU_GENE =SIMP(statut='f',typ=(tran_gene,mode_gene,mode_cycl,harm_gene) ),
- BASE_MODALE =SIMP(statut='f',typ=(base_modale,mode_meca) ),
+# BASE_MODALE =SIMP(statut='f',typ=(base_modale,mode_meca) ),
NUME_DDL =SIMP(statut='f',typ=nume_ddl_sdaster ),
MODE_MECA =SIMP(statut='f',typ=mode_meca ),
TOUT_ORDRE =SIMP(statut='f',typ='TXM',into=("OUI",) ),
NUME_ORDRE =SIMP(statut='f',typ='I',validators=NoRepeat(),max='**' ),
- NUME_MODE =SIMP(statut='f',typ='I',validators=NoRepeat(),max='**' ),
+ NUME_MODE =SIMP(statut='f',typ='I',validators=NoRepeat(),max='**' ),
TOUT_INST =SIMP(statut='f',typ='TXM',into=("OUI",) ),
INST =SIMP(statut='f',typ='R',validators=NoRepeat(),max='**' ),
LIST_INST =SIMP(statut='f',typ=listr8_sdaster ),
b_prec_abso=BLOC(condition="(CRITERE=='ABSOLU')",
PRECISION =SIMP(statut='o',typ='R',),),
INTERPOL =SIMP(statut='f',typ='TXM',defaut="NON",into=("NON","LIN") ),
- NOM_CHAM =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max=8,defaut="ACCE",
- into=("DEPL","VITE","ACCE","ACCE_ABSOLU","EFGE_ELNO_DEPL","SIPO_ELNO_DEPL",
- "SIGM_ELNO_DEPL","FORC_NODA",) ),
TOUT_CHAM =SIMP(statut='f',typ='TXM',into=("OUI",) ),
+ b_nom_cham=BLOC(condition="TOUT_CHAM == None",
+ NOM_CHAM =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max=8,defaut="ACCE",
+ into=("DEPL","VITE","ACCE","ACCE_ABSOLU","EFGE_ELNO_DEPL","SIPO_ELNO_DEPL",
+ "SIGM_ELNO_DEPL","FORC_NODA",) ),),
GROUP_NO =SIMP(statut='f',typ=grno,validators=NoRepeat(),max='**'),
NOEUD =SIMP(statut='f',typ=no ,validators=NoRepeat(),max='**'),
GROUP_MA =SIMP(statut='f',typ=grma,validators=NoRepeat(),max='**'),
fr="Unité logique définissant le fichier (fort.N) dans lequel on écrit les md5"),
) ;
-#& MODIF COMMANDE DATE 18/11/2008 AUTEUR ABBAS M.ABBAS
+#& MODIF COMMANDE DATE 07/04/2009 AUTEUR ABBAS M.ABBAS
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
RELATION =SIMP(statut='o',typ='TXM',defaut="ELAS",
into=("ELAS","ELAS_VMIS_LINE","ELAS_VMIS_TRAC","ELAS_VMIS_PUIS",
"ELAS_POUTRE_GR","CABLE","ELAS_HYPER")),
-
+
DEFORMATION =SIMP(statut='f',typ='TXM',defaut="PETIT" ,into=("PETIT","GREEN","GREEN_GR",) ),
regles=(PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
TOUT =SIMP(statut='f',typ='TXM',into=("OUI",) ),
),
PILOTAGE =FACT(statut='f',
regles=(EXCLUS('NOEUD','GROUP_NO'),PRESENT_ABSENT('TOUT','GROUP_MA','MAILLE'),),
- TYPE =SIMP(statut='o',typ='TXM',into=("DDL_IMPO","LONG_ARC","PRED_ELAS","PRED_ELAS_INCR","DEFORMATION","ANA_LIM") ),
+ TYPE =SIMP(statut='o',typ='TXM',into=("DDL_IMPO","LONG_ARC","PRED_ELAS","DEFORMATION","ANA_LIM") ),
COEF_MULT =SIMP(statut='f',typ='R',defaut= 1.0E+0),
ETA_PILO_MAX =SIMP(statut='f',typ='R'),
ETA_PILO_MIN =SIMP(statut='f',typ='R'),
ITER_GLOB_ELAS =SIMP(statut='f',typ='I',defaut=25),
TYPE =SIMP(statut='f',typ='TXM',defaut="PIC",into=("PIC","PLATEAU")),
b_plateau =BLOC(condition = "TYPE == 'PLATEAU' ",
-
+
PLATEAU_ITER =SIMP(statut='f',typ='I',defaut=3, val_min =2),
- PLATEAU_RELA =SIMP(statut='f',typ='R',defaut=1E-3),
- ),
-
-
+ PLATEAU_RELA =SIMP(statut='f',typ='R',defaut=1E-3),
+ ),
+
+
ARRET =SIMP(statut='f',typ='TXM',defaut="OUI",into=("OUI","NON")),
),
SOLVEUR =FACT(statut='d',
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
b_feti =BLOC(condition = "METHODE == 'FETI' ",fr="Paramètres de la méthode FETI 1",
), RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6),
NMAX_ITER =SIMP(statut='f',typ='I',defaut= -1 ),
- ),
-
-
+ ),
+
+
SYME =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
),
ARCHIVAGE =FACT(statut='f',
NUME_INIT =SIMP(statut='f',typ='I'),
DETR_NUME_SUIV =SIMP(statut='f',typ='TXM',into=("OUI",)),
CHAM_EXCLU =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max='**',
- into=("DEPL","SIEF_ELGA","VARI_ELGA","LANL_ELGA")),
+ into=("DEPL","SIEF_ELGA","VARI_ELGA")),
),
OBSERVATION =FACT(statut='f',max='**',
NOM_CMP =SIMP(statut='o',typ='TXM',max='**' ),
"RESI_REFE","REFE_NOEU",
"RELI_ITER","RELI_COEF",
"PILO_PARA",
- "LAGR_ECAR","LAGR_INCR","LAGR_ITER",
"MATR_ASSE",
"ITER_DEBO",
"CTCD_ITER","CTCD_GEOM","CTCD_NOEU",
INFO =SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
)
-#& MODIF COMMANDE DATE 21/04/2008 AUTEUR LEFEBVRE J-P.LEFEBVRE
+#& MODIF COMMANDE DATE 26/01/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 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.
+# 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.
+# 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.
+# 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.
# ======================================================================
# RESPONSABLE COURTOIS M.COURTOIS
TEST_FONCTION=PROC(nom="TEST_FONCTION",op= 135,
fr="Paramètre de sensibilité.",
ang="Sensitivity parameter"),
NOM_PARA =SIMP(statut='f',typ='TXM',validators=NoRepeat(),max=2),
- VALE_PARA =SIMP(statut='o',typ='R' ,validators=NoRepeat(),max=2),
+ VALE_PARA =SIMP(statut='o',typ='R' ,max=2),
VALE_REFE =SIMP(statut='f',typ='R',max='**' ),
VALE_REFE_C =SIMP(statut='f',typ='C',max='**' ),
VALE_ABS =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON") ),
defaut= 1.E-3 ),
REFERENCE =SIMP(statut='f',typ='TXM',
into=("ANALYTIQUE","SOURCE_EXTERNE","NON_REGRESSION","AUTRE_ASTER") ),
- b_version = BLOC (condition = "REFERENCE == 'NON_REGRESSION'",
+ b_version = BLOC (condition = "REFERENCE == 'NON_REGRESSION'",
VERSION =SIMP(statut='f',typ='TXM' ),
),
),
ATTR_REFE =SIMP(statut='o',typ='TXM' ),
REFERENCE =SIMP(statut='f',typ='TXM',
into=("ANALYTIQUE","SOURCE_EXTERNE","NON_REGRESSION","AUTRE_ASTER") ),
- b_version =BLOC(condition = "REFERENCE == 'NON_REGRESSION'",
+ b_version =BLOC(condition = "REFERENCE == 'NON_REGRESSION'",
VERSION =SIMP(statut='f',typ='TXM' ),
),
),
INTE_SPEC =SIMP(statut='o',typ=table_fonction),
NOEUD_I =SIMP(statut='f',typ=no),
NUME_ORDRE_I =SIMP(statut='f',typ='I' ),
- b_nume_ordre_i = BLOC (condition = "NUME_ORDRE_I != None",
+ b_nume_ordre_i = BLOC (condition = "NUME_ORDRE_I != None",
NUME_ORDRE_J =SIMP(statut='o',typ='I' ),
),
- b_noeud_i = BLOC (condition = "NOEUD_I != None",
+ b_noeud_i = BLOC (condition = "NOEUD_I != None",
NOEUD_J =SIMP(statut='o',typ=no),
NOM_CMP_I =SIMP(statut='o',typ='TXM' ),
NOM_CMP_J =SIMP(statut='o',typ='TXM' ),
defaut= 1.E-3 ),
REFERENCE =SIMP(statut='f',typ='TXM',
into=("ANALYTIQUE","SOURCE_EXTERNE","NON_REGRESSION","AUTRE_ASTER") ),
- b_version =BLOC(condition = "REFERENCE == 'NON_REGRESSION'",
+ b_version =BLOC(condition = "REFERENCE == 'NON_REGRESSION'",
VERSION =SIMP(statut='f',typ='TXM' ),
),
),
INFO = SIMP(statut='f',typ='I',defaut=1,into=(1,2) ),
)
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
- OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
+ OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
b_petsc =BLOC(condition = "METHODE == 'PETSC' ",fr="Paramètres de la méthode PETSC",
b_petsc_ilu =BLOC(condition = "PRE_COND == 'LDLT_INC' ",
NIVE_REMPLISSAGE = SIMP(statut='f',typ='I',defaut= 0 ),
REMPLISSAGE = SIMP(statut='f',typ='R',defaut= 1.0),
- ),
+ ),
RENUM =SIMP(statut='f',typ='TXM',defaut="RCMK",into=("SANS","RCMK") ),
RESI_RELA =SIMP(statut='f',typ='R',defaut= 1.E-6),
NMAX_ITER =SIMP(statut='f',typ='I',defaut= -1 ),
TITRE =SIMP(statut='f',typ='TXM',max='**'),
INFO =SIMP(statut='f',typ='I',into=(1,2)),
) ;
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
INFO =SIMP(statut='f',typ='I',into=(1,2) ),
) ;
-#& MODIF COMMANDE DATE 30/09/2008 AUTEUR REZETTE C.REZETTE
+#& MODIF COMMANDE DATE 24/03/2009 AUTEUR PELLET J.PELLET
# CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
PARALLELISME =SIMP(statut='f',typ='TXM',defaut="CENTRALISE",
into=("CENTRALISE","DISTRIBUE_MC","DISTRIBUE_MD","DISTRIBUE_SD")),
PARTITION =SIMP(statut='f',typ=sd_feti_sdaster),
- CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,min=0,max=100),
- CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,min=0),
- OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
+ CHARGE_PROC0_MA =SIMP(statut='f',typ='I',defaut=100,val_min=0),
+ CHARGE_PROC0_SD =SIMP(statut='f',typ='I',defaut=0,val_min=0),
+ OUT_OF_CORE =SIMP(statut='f',typ='TXM',defaut="NON",into=("OUI","NON")),
),
b_petsc =BLOC(condition = "METHODE == 'PETSC' ",fr="Paramètres de la méthode PETSC",
ALGORITHME =SIMP(statut='f',typ='TXM',into=("BCGS","BICG","CG","CR","GMRES","TFQMR",),defaut="CG" ),
