Dear Friends, I am working on solidification of liquid metal . can you tell me ,how can i set the thermal properties in ground .you are always well come for your suggestion Ramesh

Hi Ramash,

I think for conductivity you can set prndtl(tem1)=-grnd1 and in ground grp9 sct 7 set your conductivities

e.g. this type of thing

if(indvar.eq.ITEM1)then

call fn1(lampr,10.)

endif

and for specific heat set CP1=GRND and in grp9 sct 14, set the values e.g. this type of thing :

IF(QEQ(CP1,GRND)) THEN

L0CP =L0F(ISPH1)

DO 9041 I=1,NXNY

F(L0CP+I)=whatever value 9041 CONTINUE

ENDIF

remember several formulae for spec heat have been coded into GXSPEHE, which can be acessed through setting CP1=GRND1, 2,3 etc