Exemples ======== SD carte -------- .. code-block:: text 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 ) ) ) ; .. code-block:: text IMPRESSION SEGMENT DE VALEURS >CARTE .DESC < 1 - 64 3 3 3 1 6 - 3 2 3 3 254 11 - 254 254 -------------------------------------------------------------------------------- IMPRESSION DE LA COLLECTION : CARTE .LIMA IMPRESSION OBJET DE COLLECTION CONTIGUE>CARTE .LIMA< OC : 1 1 - 1 3 IMPRESSION OBJET DE COLLECTION CONTIGUE>CARTE .LIMA< OC : 2 1 - 2 IMPRESSION OBJET DE COLLECTION CONTIGUE>CARTE .LIMA< OC : 3 1 - 4 5 -------------------------------------------------------------------------------- IMPRESSION SEGMENT DE VALEURS >CARTE .NOLI < 1 - > <> < 3 - > < -------------------------------------------------------------------------------- IMPRESSION SEGMENT DE VALEURS >CARTE .NOMA < 1 - >MAILLA < -------------------------------------------------------------------------------- IMPRESSION SEGMENT DE VALEURS >CARTE .VALE < 1 - 2.00000E-01 3.00000E-01 0.00000E+00 0.00000E+00 0.00000E+00 6 - 0.00000E+00 0.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 21 - 0.00000E+00 *Remarque :* *Le contenu des objets imprimés ci-dessus peut surprendre : il ne correspond pas à ce qui est dit plus haut. En effet cette carte a été “terminée” par un appel à la routine* tecart.f. *Cette action facultative a pour but de permettre une surcharge “fine” des valeurs affectées dans la commande* CREA_CHAMP \*.* SD cham_no ---------- .. code-block:: text cham_no = CREA_CHAMP ( MAILLAGE : mailla, TYPE_CHAMP : 'NOEU_DEPL_R', OPERATION : 'AFFE', AFFE:(GROUP_NO:gn1 nom_cmp: 'DX' VALE_R: 1.0) AFFE:(NOEUD:(n2,n7) NOM_CMP: ('DX','DZ') vale_r: (2. ,4.) ) ); -------------------------------------------------------------------------------- IMPRESSION SEGMENT DE VALEURS >cham_no .REFE < 1 - > <>cham_no < -------------------------------------------------------------------------------- IMPRESSION SEGMENT DE VALEURS >cham_no .VALE < 1 - 2.00000E+00 4.00000E+00 1.00000E+00 1.00000E+00 2.00000E+00 6 - 4.00000E+00 SD cham_elem ------------ .. code-block:: text FLUXN=CALC_CHAM_ELEM( MODELE=MOTH, TEMP=T2, CHAM_MATER=CHMAT, OPTION='FLUX_ELNO') IMPRESSION SEGMENT DE 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 DE VALEURS >FLUXN .CELV < >>>>> 1 - -8.78595D-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 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 DE VALEURS >FLUXN .CELK < >>>>> 1 - >MOTH .MODELE <>FLUX_ELNO < 3 - >ELNO <> < 5 - > <>PFLUX_R SD resuelem ----------- .. code-block:: text 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'); Le resuelem est extrait du VECT_ELEM VECTEL : 'VECTEL .VE001' .. code-block:: text IMPRESSION SEGMENT DE VALEURS >VECTEL .VE001 .DESC < 1 - 105 3 5781 5648 0 -------------------------------------------------------------------------------- IMPRESSION SEGMENT DE VALEURS >VECTEL .VE001 .NOLI < 1 - >MODEL .MODELE <>CHAR_THER_SOUR_R < -------------------------------------------------------------------------------- IMPRESSION DE LA COLLECTION : VECTEL .VE001 .RESL IMPRESSION OBJET DE 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 DE COLLECTION >VECTEL .VE001 .RESL< OC : 2 1 - 4.08333E+00 4.66667E+00 4.66667E+00 4.08333E+00