OldCodes/Sep/SEP_Cata_V1_2.py

   1 ## -*- coding: utf-8 -*-
   2 #
   3 ## --------------------------------------------------
   4 ## debut entete
   5 ## --------------------------------------------------
   6 #
   7 from Accas import *
   8
   9 #
  10 #CONTEXT.debug = 1
  11 JdC = JDC_CATA ( code = 'SEP',
  12                 execmodul = None,
  13                 # regles=(AU_MOINS_UN('SOUS_EPAISSEUR_INTERNE','SOUS_EPAISSEUR_EXTERNE',),),
  14                   regles=( UN_PARMI('S_EP_INTERNE'),),
  15                        )# Fin JDC_CATA
  16 #
  17
  18
  19 S_EP_INTERNE= MACRO (nom       = 'S_EP_INTERNE',
  20               op        = None,
  21               sd_prod   = None,
  22               reentrant = 'n',
  23               UIinfo    = {"groupes":("Outils métier",)},
  24               fr        = "sous epaisseur  ",
  25               dir_name  = SIMP(statut='o', typ='TXM',),
  26               TYPE_EXEC = SIMP(statut='o', typ='TXM',into=('MAILLAGE','CALCUL',)),
  27               TYPE_SEP = SIMP(statut='o', typ='TXM',into=('TUBE_SOUS_EPAISSEUR','COUDE_SOUS_EPAISSEUR','TEST_SOUS_EPAISSEUR')),
  28               b_tube_sous_epaisseur =BLOC(condition = "TYPE_SEP == 'TUBE_SOUS_EPAISSEUR' ",
  29               regles = (AU_MOINS_UN('MAIL_TUBE','CHARGE_LIMITE')),
  30               MAIL_TUBE = FACT( statut='f',max='**',
  31             fr        = "Parametres maillage du tube  ",
  32             unite_longueur=SIMP(statut='o', typ='TXM', defaut='mm',into=('mm',),),
  33                                 r_ext=SIMP(statut='o', typ='R', defaut=228.6,val_min=100,val_max=300, fr="rayon exterieur du tube"),
  34                            ep_nominale=SIMP(statut='o', typ='R', defaut=22.0, fr="epaisseur nominale du tube sans sous epaisseur"),
  35             nb_seg_amortissement=SIMP(statut='o', typ='I', defaut=11, fr="nombre de segments dans la longueur d'amortissement"),
  36             nb_seg_transition=SIMP(statut='o', typ='I', defaut=4, fr="nombre de segments dans longueur de transition"),
  37             nb_seg_generatrices=SIMP(statut='o', typ='I', defaut=5, fr="nombre de segments dans la longueur des génératrices dans la zone de sous épaisseur"),
  38             petite_distance=SIMP(statut='o', typ='R', defaut=100.0, fr="distance entre deux abscisses de points de mesure au dessous de laquelle on discrétise avec nb_seg_petites_distances au lieu de nb_seg_generatrices"),
  39             nb_seg_petites_distances=SIMP(statut='o', typ='I', defaut=3, fr="nombre de segments dans les aretes dont la longueur est inferieur a petite distance"),
  40             nb_seg_arc=SIMP(statut='o', typ='I', defaut=5, fr="nombre de segments dans l'arc du tube entre deux generatrices"),
  41             nb_seg_ep=SIMP(statut='o', typ='I', defaut=3, fr="nombre de segments dans l'epaisseur du tube"),
  42             critere_dist_radial=SIMP(statut='o', typ='R', defaut=0.5, fr="Critère de rafinement de maillage"),
  43                                           ),
  44             CHARGE_LIMITE = FACT( statut='f',max='**',
  45             fr        = "Parametres pour calcul de charge limite  ",
  46             unite_mem=SIMP(statut='o', typ='TXM', defaut='Mo',into=('Mo',),),
  47             memoire=SIMP(statut='o', typ='I', defaut=2000,val_min=128,val_max=8000),
  48             unite_temps=SIMP(statut='o', typ='TXM', defaut='h',into=('h',),),
  49             temps=SIMP(statut='o', typ='R', defaut=50.),
  50             version_aster=SIMP(statut='o', typ='TXM', defaut='STA8',into=('STA8','STA9','STA9_mpi'),),
  51             unite_sig=SIMP(statut='o', typ='TXM', defaut='MPa',into=('PA','MPa'),),
  52             E=SIMP(statut='o', typ='R', defaut=200000., fr="Module d'Young"),
  53             NU=SIMP(statut='o', typ='R', defaut=0.3, fr="coefficient de poisson"),
  54             SY=SIMP(statut='o', typ='R', defaut=98.7, fr="limite d'elasticite"),
  55             D_SIGM_EPSI=SIMP(statut='o', typ='R', defaut=100.0, fr="pente de la courbe d'ecrouissage"),
  56                                ),
  57             ),
  58            b_coude_sous_epaisseur =BLOC(condition = "TYPE_SEP == 'COUDE_SOUS_EPAISSEUR' ",
  59               regles = (AU_MOINS_UN('MAIL_COUDE','CHARGE_LIMITE')),
  60               MAIL_COUDE = FACT( statut='f',max='**',
  61             fr        = "Parametres maillage du coude  ",
  62             unite_longueur=SIMP(statut='o', typ='TXM', defaut='mm',into=('mm',),),
  63             r_coude=SIMP(statut='o', typ='R', defaut=381.,val_min=100,val_max=500,fr="rayon du coude"),
  64             r_ext=SIMP(statut='o', typ='R', defaut=136.5,val_min=100,val_max=200,fr="rayon exterieur"),
  65             ep_nominale=SIMP(statut='o', typ='R', defaut=15.1,fr="epaisseur nominale sans sous epaisseur"),
  66             angle_coude=SIMP(statut='o', typ='R', defaut=90,fr="angle du coude"),
  67             orientation_coude=SIMP(statut='o', typ='TXM', defaut='D',into=('D','G'),fr="orientation du coude"),
  68             longueur_prolongement_amont=SIMP(statut='o', typ='R', defaut=150.,fr="longueur du prolongement amont"),
  69             longueur_prolongement_aval=SIMP(statut='o', typ='R', defaut=150.,fr="longueur du prologenment aval"),
  70             pas_mesure=SIMP(statut='o', typ='I', defaut=80,fr="pas de la mesure"),
  71             debut_mesure=SIMP(statut='o', typ='R', defaut=40.,fr="distance de la premiere mesure"),
  72             angle_mesure=SIMP(statut='o', typ='R', defaut=45.,fr="angle entre deux generatrices"),
  73             nb_seg_prolongement_amont = SIMP(statut='o', typ='I', defaut=6, fr="nombre de segments dans la longueur de prolongement amont"),
  74             nb_seg_prolongement_aval  = SIMP(statut='o', typ='I', defaut=6, fr="nombre de segments dans la longueur de prolongement aval"),
  75             nb_seg_amortissement=SIMP(statut='o', typ='I', defaut=11, fr="nombre de segments dans la longueur d'amortissement"),
  76             nb_seg_transition=SIMP(statut='o', typ='I', defaut=5, fr="nombre de segments dans longueur de transition"),
  77             nb_seg_generatrices=SIMP(statut='o', typ='I', defaut=25, fr="nombre de segments dans la longueur des génératrices dans la zone de sous épaisseur"),
  78             nb_seg_arc=SIMP(statut='o', typ='I', defaut=7, fr="nombre de segments dans l'arc du coude entre deux generatrices"),
  79             nb_seg_ep=SIMP(statut='o', typ='I', defaut=3, fr="nombre de segments dans l'epaissuer"),
  80             critere_dist_radial=SIMP(statut='o', typ='R', defaut=0.5, fr="Critère de rafinement de maillage"),
  81                                ),
  82             CHARGE_LIMITE = FACT( statut='f',max='**',
  83             fr        = "Parametres pour calcul de charge limite  ",
  84             unite_mem=SIMP(statut='o', typ='TXM', defaut='Mo',into=('Mo',),),
  85             memoire=SIMP(statut='o', typ='I', defaut=2000,val_min=128,val_max=8000),
  86             unite_temps=SIMP(statut='o', typ='TXM', defaut='h',into=('h',),),
  87             temps=SIMP(statut='o', typ='R', defaut=50.),
  88             version_aster=SIMP(statut='o', typ='TXM', defaut='STA8',into=('STA8','STA9','STA9_mpi'),),
  89             unite_sig=SIMP(statut='o', typ='TXM', defaut='MPa',into=('PA','MPa'),),
  90             E=SIMP(statut='o', typ='R', defaut=200000, fr="Module d'Young"),
  91             NU=SIMP(statut='o', typ='R', defaut=0.3, fr="coefficient de poisson"),
  92             SY=SIMP(statut='o', typ='R', defaut=98.7, fr="limite d'elasticite"),
  93             D_SIGM_EPSI=SIMP(statut='o', typ='R', defaut=100.0, fr="pente de la courbe d'ecrouissage"),
  94                                ),
  95             ),
  96             b_test_sous_epaisseur =BLOC(condition = "TYPE_SEP == 'TEST_SOUS_EPAISSEUR' ",
  97               regles = (AU_MOINS_UN('MAIL_TUBE','CHARGE_LIMITE')),
  98               MAIL_TUBE = FACT( statut='f',max='**',
  99             fr        = "Parametres maillage du tube  ",
 100             unite_longueur=SIMP(statut='o', typ='TXM', defaut='mm',into=('mm',),),
 101                                 r_ext=SIMP(statut='o', typ='R', defaut=228.6,val_min=100,val_max=300, fr="rayon exterieur du tube"),
 102                            ep_nominale=SIMP(statut='o', typ='R', defaut=22.0, fr="epaisseur nominale du tube sans sous epaisseur"),
 103             nb_seg_amortissement=SIMP(statut='o', typ='I', defaut=11, fr="nombre de segments dans la longueur d'amortissement"),
 104             nb_seg_transition=SIMP(statut='o', typ='I', defaut=4, fr="nombre de segments dans longueur de transition"),
 105             nb_seg_generatrices=SIMP(statut='o', typ='I', defaut=5, fr="nombre de segments dans la longueur des génératrices dans la zone de sous épaisseur"),
 106             petite_distance=SIMP(statut='o', typ='R', defaut=100.0, fr="distance entre deux abscisses de points de mesure au dessous de laquelle on discrétise avec nb_seg_petites_distances au lieu de nb_seg_generatrices"),
 107             nb_seg_petites_distances=SIMP(statut='o', typ='I', defaut=3, fr="nombre de segments dans les aretes dont la longueur est inferieur a petite distance"),
 108             nb_seg_arc=SIMP(statut='o', typ='I', defaut=5, fr="nombre de segments dans l'arc du tube entre deux generatrices"),
 109             nb_seg_ep=SIMP(statut='o', typ='I', defaut=3, fr="nombre de segments dans l'epaisseur du tube"),
 110             critere_dist_radial=SIMP(statut='o', typ='R', defaut=0.5, fr="Critère de rafinement de maillage"),
 111                                           ),
 112             CHARGE_LIMITE = FACT( statut='f',max='**',
 113             fr        = "Parametres pour calcul de charge limite  ",
 114             unite_mem=SIMP(statut='o', typ='TXM', defaut='Mo',into=('Mo',),),
 115             memoire=SIMP(statut='o', typ='I', defaut=128,val_min=128,val_max=8000),
 116             unite_temps=SIMP(statut='o', typ='TXM', defaut='h',into=('h',),),
 117             temps=SIMP(statut='o', typ='R', defaut=50.),
 118             version_aster=SIMP(statut='o', typ='TXM', defaut='STA8',into=('STA8','STA9','STA9_mpi'),),
 119             unite_sig=SIMP(statut='o', typ='TXM', defaut='MPa',into=('PA','MPa'),),
 120             E=SIMP(statut='o', typ='R', defaut=200000., fr="Module d'Young"),
 121             NU=SIMP(statut='o', typ='R', defaut=0.3, fr="coefficient de poisson"),
 122             SY=SIMP(statut='o', typ='R', defaut=98.7, fr="limite d'elasticite"),
 123             D_SIGM_EPSI=SIMP(statut='o', typ='R', defaut=100.0, fr="pente de la courbe d'ecrouissage"),
 124                                ),
 125             )
 126 )
 127