9. Examples#
9.1. SD card#
CARTE = CREA_CHAMP (TYPE_CHAMP: 'CART_META_R', OPERATION: 'AFFE',
MAILLAGE: MAILLA
AFFE: (TOUT: 'OUI'
NOM_CMP: ('ZF' 'ZP' 'ZB' 'ZM' 'P')
VALE: (0.0 0.0 0.0 0.0 0.0)
AFFE: (GROUP_MA: GM2
NOM_CMP: ('ZF' 'ZP')
VALE: (0.2 0.3)
AFFE: (MAILLE: T2
NOM_CMP: ('ZP' '' ZM '' P ')
VALE: (0.4 0.5 0.6)
);
IMPRESSION SEGMENT FROM VALEURS > CARTE. DESC <
1 - 64 3 3 3 1
6 - 3 2 3 3 254
11 - 254 254
--------------------------------------------------------------------------------
IMPRESSION FROM COLLECTION: CARTE. LIMA
IMPRESSION OBJET FROM COLLECTION CONTIGUE > CARTE. LIMA < OC: 1
1 - 1 3
IMPRESSION OBJET FROM COLLECTION CONTIGUE > CARTE. LIMA < OC: 2
1 - 2
IMPRESSION OBJET FROM COLLECTION CONTIGUE > CARTE. LIMA < OC: 3
1 - 4 5
--------------------------------------------------------------------------------
IMPRESSION SEGMENT FROM VALEURS > CARTE. NOLI <
1 - > <> <
3 - > <
--------------------------------------------------------------------------------
IMPRESSION SEGMENT FROM VALEURS > CARTE. NOMA <
1 - > MAILLA <
--------------------------------------------------------------------------------
IMPRESSION SEGMENT FROM VALEURS > CARTE. VALE <
1 - 2.00000E-01 3.00000E-01 0.00000E+00 0.00000E+00 0.00000E+00 0.00000E+00
6 - 0.00000E+00 0.00000E+00 2.00000E+00 2.00000E-01 4.00000E-01 0.00000E+00
11 - 5.00000E-01 0.00000E+00 0.00000E+00 6.00000E-01 0.00000E+00
16 - 0.00000E+00 0.00000E+00 0.00000E+00 0.00000E+00 0.00000E+00 0.00000E+00
21 - 0.00000E+00
Note:
The content of the objects printed above may be surprising: it does not correspond to what was said above. In fact, this card was « finished » by a call to the routine tecart.f.
This optional action is intended to allow « fine » overloading of the values assigned in the command CREA_CHAMP.
9.2. SD cham_no#
cham_no = CREA_CHAMP (MAILLAGE: mailla, TYPE_CHAMP: 'NOEU_DEPL_R',
OPERATION: 'AFFE',
AFFE :( GROUP_NO :gn1
cmp-name: 'DX' VALE_R: 1.0)
AFFE :( NOEUD :( n2, n7)
NOM_CMP: ('DX', 'DZ') value_r: (2., 4.))
);
--------------------------------------------------------------------------------
IMPRESSION SEGMENT FROM VALEURS >cham_no. REFE <
1 - > <>cham_no <
--------------------------------------------------------------------------------
IMPRESSION SEGMENT FROM VALEURS >cham_no. VALE <
1 - 2.00000E+00 4.00000E+00 1.00000E+00 1.00000E+00 2.00000E+00 2.00000E+00
6 - 4.00000E+00
9.3. SD cham_elem#
FLUXN = CALC_CHAM_ELEM (MODELE = MOTH, TEMP =T2,
CHAM_MATER = CHMAT, OPTION =' FLUX_ELNO ')
IMPRESSION SEGMENT FROM VALEURS > FLUXN. CELD >>>>
1 - 47 2 1 0 6
6 - 18 2 6520 8 16
11 - 1 0 8 1 1
16 - 0 8 9 3 6857
21 - 6 18 1 0 6
26 - 17 1 0 6 23
31 - 1 0 6 29
IMPRESSION SEGMENT FROM VALEURS > FLUXN. CELV >>>>
1 - -8.78595D-12 -4.27645D-12 -4.27645D-12 -8.78595D-12 -4.08919D-12 6.96696D-12
6 - -4.07954D-12 6.96696D-12 -4.77838D-12 4.96957D-12 -4.15161D-12
11 - 4.96957D-12 -4.26679D-12 -1.33159D-12 -4.54543D-12 -1.33159D-12 -1.33159D-12
16 - -3.57760D-12 7.27596D-12 -8.41283D-12 7.27596D-12 -8.41283D-12
21 - 7.27596D-12 -8.41283D-12 0.00000D+00 -8.86757D-12 0.00000D+00
26 - -8.86757D-12 0.00000D+00 -8.86757D-12 0.00000D+00 -8.86757D-12
31 - 0.00000D+00 -8.86757D-12 0.00000D+00 -8.86757D-12
IMPRESSION SEGMENT FROM VALEURS > FLUXN. CELK >>>>
1 - > MOTH. MODELE <> FLUX_ELNO <
3 - > ELNO <> <
5 - > <> PFLUX_R
9.4. SD Resumelem#
CHTH = AFFE_CHAR_THER (MODELE: MODEL TEMP_IMPO :( NOEUD :N8 TEMP :3.4)
SOURCE :( TOUT: 'OUI' SOUR: 7.));
VECTEL = CALC_VECT_ELEM (CHARGE: CHTH OPTION: 'CHAR_THER');
The summary is taken from VECT_ELEM VECTEL: “VECTEL. VE001 “
IMPRESSION SEGMENT FROM VALEURS > VECTEL. VE001. DESC <
1 - 105 3 5781 5648 0
--------------------------------------------------------------------------------
IMPRESSION SEGMENT FROM VALEURS > VECTEL. VE001. NOLI <
1 - > MODEL. MODELE <> CHAR_THER_SOUR_R <
--------------------------------------------------------------------------------
IMPRESSION FROM COLLECTION: VECTEL. VE001. RESL
IMPRESSION OBJET FROM COLLECTION > VECTEL. VE001. RESL < OC: 1
1 - 3.50000E+00 3.50000E+00 3.50000E+00 4.66667E+00 4.66667E+00
6 - 4.66667E+00
IMPRESSION OBJET FROM COLLECTION > VECTEL. VE001. RESL < OC: 2
1 - 4.08333E+00 4.66667E+00 4.66667E+00 4.08333E+00