ÒýÓûØÌû: 5Â¥ : Originally posted by
htbbzzg at 2023-02-21 08:46:40
ÇëÄã¶Ô×Ô¼ºµÄÎÊÌâ×öÒ»¸öÏêϸµÄ½éÉÜ£¬²¢ÌṩÍêÕûµÄ¼ÆËãÄ£ÐÍ (×îºÃÊÇÃüÁîÁ÷)£¬ÒÔ±ã½øÐзÖÎö¡¢ÌÖÂÛ¡£
ÀÏʦ£¬ÄúºÃ£¬ÎÒÔÚѧϰÓÃansysÌåÉúÈÈÂÊÈÈÔ´×ötÐ͸ְåµÄζȳ¡ºÍÓ¦Á¦³¡µÄ·ÖÎö£¬ÓõÄÊÇһƪ²©Ê¿ÂÛÎÄÀïµÄÊý¾Ý£¬¹¤¿öÊÇÁ½²ãº¸·ì£¬µÚÒ»²ãº¸½ÓËÙ¶ÈΪ0.01m/s£¬µÚ¶þ²ãΪ0.005m/s£¬Öмä¼ä¸ô10s£¬º¸ºóÀäÈ´1800s£¬Ëã³öÀ´µÄζȳ¡½á¹ûÓÐÎÊÌâ¡£
Ö÷ÒªµÄÎÊÌâ¾ÍÊÇÁ½²ãº¸·ìµÄµÚÒ»¸öºÉÔØ²½ºÍ×îºóÒ»¸öºÉÔØ²½¶ÔÓ¦µÄζȻáÉý¸ß£¬¶øÇÒÁ½²ãº¸·ìµÄζȲ»Ò»Ñù¡£µÚÒ»²ãÁ½¶ËΪ3000¶È×óÓÒ£¬ÖмäµÄºÉÔØ²½Îª2000¶È£¬µÚ¶þ²ãÁ½¶ËΪ1800¶È£¬ÖмäΪ1600¶È×óÓÒ£¬¶øÂÛÎÄÀï¶¼ÊÇ1880×óÓÒ¡£
ÏÂÃæÊÇÃüÁîÁ÷
!******************************µÚÒ»²¿·Ö½øÐÐζȳ¡·ÖÎö******************************
/com, units: SI, m - degree C - W - kg -sec - J
!/title,the drive force of solidification crack
/prep7
et,1,solid70
!******************************¶¨ÒåÈÈ·ÖÎöÎïÀí²ÎÊý************************************
mptemp,1,0,250,500,750,1000,1500,1700,2500 !¶¨Òå²ÄÁÏζÈÇø¼ä(C)
mpdata,dens,1,1,7850,7700,7600,7550,7500,7350,7300,7100 !¶¨Òå²ÄÁÏÃܶÈ(kg/m3)
mpdata,kxx,1,1,50,45,40,30,26,35,140,145 !ÈÈ´«µ¼ÏµÊý(W/(m*K))(¿¼ÂÇÈ۳ضÔÁ÷£©
mpdata,c,1,1,458,482,536,677,671,661,781,825 !±ÈÈÈÈÝ(J/kg/K)
*dim,conve,table,8,1,1,temp !¿¼ÂÇ·øÉäºÍ¶ÔÁ÷µÄ×Ü»»ÈÈϵÊý(W/m^2*K)£¬¼ÓÔØÊ±°´¶ÔÁ÷¼ÓÔØ £¬¶¨Òå8ÐС¢1ÁС¢1ÃæµÄÊý×é
conve(0,1,1)=1
conve(1,0,1)=0
conve(1,1,1)=5
conve(2,0,1)=250
conve(2,1,1)=30
conve(3,0,1)=500
conve(3,1,1)=50
conve(4,0,1)=750
conve(4,1,1)=97
conve(5,0,1)=1000
conve(5,1,1)=150
conve(6,0,1)=1500
conve(6,1,1)=300
conve(7,0,1)=1700
conve(7,1,1)=307
conve(8,0,1)=2500
conve(8,1,1)=351
!******************************¶¨ÒåÓ¦Á¦·ÖÎö²ÎÊý***************************************
mpdata,ex,1,1,20E10, 17.8E10 ,13.5E10 ,11E10 ,0.7E10 ,0.5E10 ,0.5E10,0.1E10 !¶¨Ò嵯ÐÔÄ£Á¿
tb,bkin,1,6 !¶¨ÒåÇü·þÇ¿¶ÈºÍÇбäÄ£Á¿
tbtemp,20,1
tbdata,1,235e6,2.06e10
tbtemp,100,2
tbdata,1,220e6,2.03e10
tbtemp,500,3
tbdata,1,160e6,1.47e10
tbtemp,800,4
tbdata,1,75e6,0.198e10
tbtemp,1000,5
tbdata,1,12e6,0.07e10
tbtemp,1500,6
tbdata,1,1e6,0.07e10
mpdata,alpx,1,1,1.1e-5,1.25e-5,1.4e-5,1.3e-5,1.3e-5,1.3e-5,1.3e-5,1.3e-5 !¶¨ÒåÏßÅòÕÍϵÊý(¿¼ÂÇÄý¹ÌÊÕËõÖеĹÌ񼂿£©
mpdata,prxy,1,1,0.29,0.29,0.39,0.39,0.39,0.39 !¶¨Òå²´ËɱÈ
!******************************½¨Ä£ÐÍ***********************************************
K, 1,0.0875,0,0
K, 2,0.0875,0.016,0
K, 3,0.0045,0.096,0
K, 4,-0.0045,0.096,0
K, 5,-0.0875,0.016,0
K, 6,-0.0875,0,0
K, 7, 0.0045, 0.024,0
K, 8,-0.0045, 0.016,0
K, 9,-0.0025, 0.016,0
K,10,0.0115, 0.016,0
k,11,0.0075, 0.016,0
k,12,0.0025, 0.152/7,0
K,13,-0.0045, 0,0
K,14,0.0115, 0,0
K,15,-0.0045, 0.024,0
K,16,-0.006, 0.016,0
K,17,-0.006, 0,0
K,18,0.013, 0.016,0
K,19,0.013, 0,0
A,1,2,18,19
A,3,4,15,7
A,5,6,17,16
A,8,13,14,10
A,9,11,12
A,11,10,7,12
A,10,14,19,18
A,8,9,7,15
A,16,17,13,8
VEXT, 1, , ,,,0.2
VEXT, 2, , ,,,0.2
VEXT, 3, , ,,,0.2
VEXT, 4, , ,,,0.2
VEXT, 5, , ,,,0.2
VEXT, 6, , ,,,0.2
VEXT, 7, , ,,,0.2
VEXT, 8, , ,,,0.2
VEXT, 9, , ,,,0.2
/facet,norml
vglue,all !Õ³Á¬ËùÓÐÌå
!************************************Ìå10************************************
LESIZE,20,,,2
LESIZE,22,,,2
LESIZE,100,,,2
LESIZE,102,,,2
LESIZE,18,,,5
LESIZE,21,,,5
LESIZE,63,,,5
LESIZE,101,,,5
LESIZE,61,,,80
LESIZE,66,,,80
LESIZE,45,,,80
LESIZE,67,,,80
MSHAPE,0,3D$MSHKEY,1
mat,1
type,1
VMESH,10
!************************************Ìå5************************************
LESIZE,65,,,80
LESIZE,18,,,5
LESIZE,19,,,5
LESIZE,17,,,10
LESIZE,63,,,5
LESIZE,64,,,5
LESIZE,62,,,10
mshkey,0
mshape,1
mat,1
type,1
VMESH,5
!************************************Ìå3************************************
LESIZE,49,,,10
LESIZE,47,,,10
LESIZE,10,,,10
LESIZE,12,,,10
LESIZE,50,,,25
LESIZE,51,,,25
LESIZE,52,,,25
LESIZE,53,,,25
LESIZE,46,,,4
LESIZE,48,,,4
LESIZE,9,,,4
LESIZE,11,,,4
MSHAPE,0,3D$MSHKEY,1
mat,1
type,1
VMESH,3
!************************************Ìå1************************************
LESIZE,2,,,10
LESIZE,4,,,10
LESIZE,31,,,10
LESIZE,33,,,10
LESIZE,34,,,25
LESIZE,35,,,25
LESIZE,36,,,25
LESIZE,37,,,25
LESIZE,1,,,4
LESIZE,3,,,4
LESIZE,30,,,4
LESIZE,32,,,4
MSHAPE,0,3D$MSHKEY,1
mat,1
type,1
VMESH,1
!************************************Ìå2************************************
LESIZE,7,,,3
LESIZE,5,,,3
LESIZE,40,,,3
LESIZE,38,,,3
LESIZE,6,,,9
LESIZE,8,,,9
LESIZE,39,,,9
LESIZE,41,,,9
LESIZE,42,,,80
LESIZE,43,,,80
LESIZE,44,,,80
MSHAPE,0,3D$MSHKEY,1
mat,1
type,1
VMESH,2
!************************************Ìå13************************************
LESIZE,107,,,1
LESIZE,25,,,1
LESIZE,108,,,7
LESIZE,27,,,7
LESIZE,58,,,80
LESIZE,65,,,80
mshkey,0
mshape,1
mat,1
type,1
vmesh,13
!************************************Ìå14************************************
LESIZE,55,,,8
LESIZE,54,,,8
LESIZE,56,,,8
LESIZE,15,,,8
LESIZE,14,,,8
LESIZE,13,,,8
LESIZE,59,,,80
LESIZE,60,,,80
mshkey,0
mshape,1
mat,1
type,1
vmesh,14
!************************************Ìå11************************************
mshkey,0
mshape,1
mat,1
type,1
vmesh,11
!************************************Ìå12************************************
mshkey,0
mshape,1
mat,1
type,1
vmesh,12
!**************************************ºÏ²¢Öغϵã*************************************
nummrg,all
alls
!***************************************ËÀÍö************************************************
/solu
/auto,1
/replot
alls
eplot
vsel,s,,,10
vsel,a,,,5
eslv,s,1
eplot
ekill,all
alls
esel,s,live
eplot
!************************Ê©¼Ó¶ÔÁ÷±ß½çÌõ¼þ******************************
esel,s,live
ASEL,S,ext
NSLA,S,1
SF,ALL,CONV,%CONVE%,30
ALLS
!************************************·ÇÏßÐÔÇó½âÑ¡Ïî****************************************
/solu
antype,4
trnopt,full
pred,on
solcontrol,on
nropt,full,,on
cutcontrol,plslimit,10
lnsrch,on
autots,on
tintp,,,,1,,
timint,on
tref,30
kbc,0
neqit,50
outres,all
!****************************************¶¨Òå±äÁ¿*******************************************
!HGEN=Q/A*V*DT!!
!AΪº¸·ìµÄºá½ØÃæ»ý
!VΪº¸½ÓËÙ¶È
!DTΪÿ¸öÔØºÉ²½µÄʱ¼ä
!Q=K*U*I*DT!!
!KΪº¸½ÓÈÈÔ´µÄÈÈЧÂÊ
!UΪº¸½Óµçѹ
!IΪº¸½ÓµçÁ÷
!*******************************************ÎÈ̬·ÖÎö*********************************************
timint,off
alls
ic,all,temp,30
alls
nsla,u,1
sf,all,conv,%conve%,30
time,1e-5
deltim,1e-5,1e-5,1e-5
kbc,1
allsel,all
solve
eplot
!********************************************µÚÒ»µÀº¸·ì˲̬·ÖÎö*******************************************
j=0.5 !
zmin=-1E-5
zmax=0.005+1E-5 !
zd=0.005
!***************************************¼ÆËãÉúÈÈÂÊ******************************************
K=0.75
U=31
I=270
A=28e-6
V=0.01
DT=0.5 !
HGENUM=(K*U*I)/(A*V*DT)
timint,on
*do,i,1,40 !
/solu
vsel,s,,,5
eslv,s,1
nsle,s,all
nsel,r,loc,z,zmin,zmax
esln,s,all
ealive,all
eplot
bfe,all,hgen,,HGENUM
time,j
deltim,0.5,0.5,0.5
alls
solve
vsel,s,,,5
eslv,s,1
nsle,s,all
nsel,r,loc,z,zmin,zmax
esln,s,all
eplot
bfedele,all,hgen
j=j+0.5
zmin=zmin+zd
zmax=zmax+zd
*enddo
alls
eplot
!*************************************µÚÒ»µÀº¸ºóÀäÈ´¹ý³Ì*************************************************
*do,i,41,50 !
/solu
time,j
deltim,1,1,1
alls
solve
j=j+1
*enddo
!********************************************µÚ¶þµÀº¸·ì˲̬·ÖÎö*******************************************
j=j+0.25
zmin1=-1E-5
zmax1=0.0025+1E-5
zd1=0.0025
!***************************************¼ÆËãÉúÈÈÂÊ******************************************
A1=28e-6
V1=0.005
HGENUM1=(K*U*I)/(A1*V1*DT)
timint,on
*do,i,51,130 !
/solu
vsel,s,,,10
eslv,s,1
nsle,s,all
nsel,r,loc,z,zmin1,zmax1
esln,s,all
ealive,all
eplot
bfe,all,hgen,,HGENUM1
time,j
deltim,0.5,0.5,0.5
alls
solve
vsel,s,,,10
eslv,s,1
nsle,s,all
nsel,r,loc,z,zmin1,zmax1
esln,s,all
eplot
bfedele,all,hgen
j=j+0.5
zmin1=zmin1+zd1
zmax1=zmax1+zd1
*enddo
alls
eplot
!*************************************µÚ¶þµÀº¸ºóÀäÈ´¹ý³Ì*************************************************
*do,i,131,310
/solu
time,j
deltim,10,10,10
alls
solve
save
j=j+10
*enddo
·¢×ÔСľ³æAndroid¿Í»§¶Ë