Temp Defi_fonction

Hi, I try to set the temperature function in this case

[code:1]DEBUT();

mat1=DEFI_MATERIAU(ELAS=_F(E=2e5,
NU=0.3,
ALPHA=1e-5,),);

# TEMP1=FORMULE(NOM_PARA='Y',VALE='50.*Y');

Y=DEFI_LIST_REEL(VALE=(1.0,2.0,3.0,10.0,),);


TEMP1=DEFI_FONCTION( NOM_PARA='Y',
NOM_RESU='TEMP',

VALE=(0.0, 900.0, 10, 0.0,),
PROL_GAUCHE='LINEAIRE',
PROL_DROITE='LINEAIRE',
INTERPOL='LIN'
)



mesh=LIRE_MAILLAGE(FORMAT='MED',);




MODE=AFFE_MODELE(MAILLAGE=mesh,
AFFE=_F(TOUT='OUI',
PHENOMENE='MECANIQUE',
MODELISATION='COQUE_AXIS',),);

elem=AFFE_CARA_ELEM(MODELE=MODE,
COQUE=(
_F(GROUP_MA='line', EPAIS=7.500000,),

),);




#CHTH=AFFE_CHAR_THER_F( MODELE=MODE,
# TEMP_IMPO=_F( TOUT = 'OUI',
# TEMP = TEMP1)
# )


#TEMPE=THER_LINEAIRE(MODELE=MODE,
# CHAM_MATER=MATE,
# INCREMENT=_F(LIST_INST=Y),
# EXCIT=_F(CHARGE=CHTH),),

P_TEMP=CREA_CHAMP(TYPE_CHAM='NOEU_TEMP_F',
OPERATION='AFFE',
MAILLAGE=mesh,
AFFE=_F(TOUT='OUI',
NOM_CMP='TEMP',
VALE_F=TEMP1,),);



MATE=AFFE_MATERIAU(MAILLAGE=mesh,
AFFE=_F(TOUT='OUI',
MATER=mat1,),
AFFE_VARC=_F(TOUT='OUI',
CHAMP_GD=P_TEMP,
NOM_VARC='TEMP',
# VALE_REF=40.0,
),
);




CHAR=AFFE_CHAR_MECA(MODELE=MODE,
DDL_IMPO=_F(GROUP_NO='zadel',
DX=0.0,
DY=0.0,
DRZ=0.0,),);

RESU=MECA_STATIQUE(MODELE=MODE,
CHAM_MATER=MATE,
CARA_ELEM=elem,
EXCIT=_F(CHARGE=CHAR,),);

RESU=CALC_ELEM(reuse =RESU,
MODELE=MODE,
CHAM_MATER=MATE,
RESULTAT=RESU,
OPTION=('SIGM_ELNO_DEPL','EPSI_ELNO_DEPL',),
EXCIT=_F(CHARGE=CHAR,),);

RESU=CALC_NO(reuse =RESU,
RESULTAT=RESU,
OPTION=('SIGM_NOEU_DEPL','EPSI_NOEU_DEPL',),);

IMPR_RESU(FORMAT='MED',
UNITE=80,
RESU=_F(MAILLAGE=mesh,
RESULTAT=RESU,
NOM_CHAM=('DEPL',),),);

FIN();[/code:1]

I have mistake in something
[code:1]
! <A> <MODELISA5_50> !
! !
! !
! la grandeur associee au mot cle: VARC_TEMP doit etre: TEMP_R mais elle !
! est: TEMP_F !
! !
! !
! !
! Ceci est une alarme. Si vous ne comprenez pas le sens de cette !
! alarme, vous pouvez obtenir des rИsultats inattendus ! !

---

!
! <F> <CALCULEL5_39> !
! !
! !
! la grandeur pour la variable: TEMP doit etre: TEMP_R mais elle est: !
! TEMP_F !
! !
! !
! !
! Cette erreur est fatale. Le code s'arrete. !
!

---

!


[/code:1] How can I make right my comm file? Thanks

Post edited by: bolt, at: 2010/05/06 12:20<br /><br />Post edited by: bolt, at: 2010/05/06 12:32