4. Example of use#
4.1. Mechanical calculation#
At the end of the calculation, the user produces the tables required to generate the file OAR using the MACR_LIGN_COUPE command. The command MACR_LIGN_COUPE must be called as many times as necessary to obtain the tables used by IMPR_OAR, namely a command by load (Pressure, Plane Bending, Off-plane Bending, Torsion).
Command MACR_LIGN_COUPE can contain one or more azimuths.
# creation of tables in aster format, here on two azimuths
tableP = MACR_LIGN_COUPE (LIGN_COUPE =( _F (COOR_EXTR) =( 0.2032, 1.8904, 0.0),
COOR_ORIG =( 0.1818, 1.8904, 0.0),
NB_POINTS =40),
_F (COOR_EXTR =( 0.0, 1.8904, 0.2032),
COOR_ORIG =( 0.0, 1.8904, 0.1818),
NB_POINTS =40)),
NOM_CHAM =” SIGM_NOEU “,
RESULTAT =ResulP)
tableFP = MACR_LIGN_COUPE (LIGN_COUPE =( _F (COOR_EXTR) =( 0.2032, 1.8904, 0.0),
COOR_ORIG =( 0.1818, 1.8904, 0.0),
NB_POINTS =40),
_F (COOR_EXTR =( 0.0, 1.8904, 0.2032),
COOR_ORIG =( 0.0, 1.8904, 0.1818),
NB_POINTS =40)),
NOM_CHAM =” SIGM_NOEU “,
RESULTAT =ResulFP)
table HFP = MACR_LIGN_COUPE (LIGN_COUPE =( _F (COOR_EXTR =( 0.2032, 1.8904, 0.0),
COOR_ORIG =( 0.1818, 1.8904, 0.0),
NB_POINTS =40),
_F (COOR_EXTR =( 0.0, 1.8904, 0.2032),
COOR_ORIG =( 0.0, 1.8904, 0.1818),
NB_POINTS =40)),
NOM_CHAM =” SIGM_NOEU “,
RESULTAT =lonely HFP)
Tablet = MACR_LIGN_COUPE (LIGN_COUPE =( _F (COOR_EXTR =) =( 0.2032, 1.8904, 0.0),
COOR_ORIG =( 0.1818, 1.8904, 0.0),
NB_POINTS =40),
_F (COOR_EXTR =( 0.0, 1.8904, 0.2032),
COOR_ORIG =( 0.0, 1.8904, 0.1818),
NB_POINTS =40)),
NOM_CHAM =” SIGM_NOEU “,
RESULTAT =Result)
# printing tables in OAR format
IMPR_OAR (TABL_MECA =_F (PRESSION = tableP,
FLEXION_P = Table FP,
FLEXION_HP = table HFP,
TORSION = tablet,),
UNITE = 38,
TITRE = “Mechanical results”,
TYPE_UNIT = “IF”)
4.2. Thermomechanical calculation#
The thermomechanical calculation produces two result fields, a thermal field and a stress field, respectively in the example below TEMPE and RESU.
At the end of the calculation, the user produces the tables needed to generate the file OAR using the MACR_LIGN_COUPE commands. MACR_LIGN_COUPE commands can contain one or more azimuths.
# 1. creating the thermal results table from the MACR_LIGN_COUPE command
table TEMP = MACR_LIGN_COUPE (LIGN_COUPE =( _F (COOR_EXTR =( 0.2032, 1.8904, 0.0),
COOR_ORIG =( 0.1818, 1.8904, 0.0),
NB_POINTS =40),
_F (COOR_EXTR =( 0.0, 1.8904, 0.2032),
COOR_ORIG =( 0.0, 1.8904, 0.1818),
NB_POINTS =40)),
NOM_CHAM =” TEMP “,
RESULTAT = TEMPE)
# 2. creating the mechanical results table from the MACR_LIGN_COUPE command
table TEMPSIG = MACR_LIGN_COUPE (
LIGN_COUPE =( _F (COOR_EXTR =( 0.2032, 1.8904, 0.0),
COOR_ORIG =( 0.1818, 1.8904, 0.0),
NB_POINTS =40),
_F (COOR_EXTR =( 0.0, 1.8904, 0.2032),
COOR_ORIG =( 0.0, 1.8904, 0.1818),
NB_POINTS =40)),
NOM_CHAM =” SIGM_NOEU “,
RESULTAT = RESU)
#3. Print in OAR format
IMPR_OAR (TABL_THER =_F (TEMP = table TEMP,
CONTRAINTE = table TEMPSIG),
UNITE = 38,
TITRE = “Thermal shock 300 70”)