/filename,lasercao
/title,qiecao
/prep7
/units,si
toffst,273
et,1,solid70
et,2,solid90
et,3,surf152
keyopt,3,8,2
keyopt,3,4,1
keyopt,3,5,0
mp,dens,1,4808
mp,c,1, 502
mp,kxx,1,5.295
block,0,0.050,0,0.030,-0.001,0
block,0,0.050,0,0.0012,-0.001,0
block,0,0.050,0.0012,0.0042,-0.001,0
vovlap,all
numcmp,all
lesize,1,0.001,,,,,,,1
lesize,4,0.001,,,,,,,1
lesize,7,0.001,,,,,,,1
lesize,8,0.001,,,,,,,1
lesize,13,0.001,,,,,,,1
lesize,14,0.001,,,,,,,1
lesize,15,0.001,,,,,,,1
lesize,16,0.001,,,,,,,1
lesize,21,0.001,,,,,,,1
lesize,22,0.001,,,,,,,1
lesize,23,0.001,,,,,,,1
lesize,24,0.001,,,,,,,1
lesize,2,0.0005,,,,,,,1
lesize,3,0.0005,,,,,,,1
lesize,5,0.0005,,,,,,,1
lesize,6,0.0005,,,,,,,1
lesize,9,0.0005,,,,,,,1
lesize,11,0.0005,,,,,,,1
lesize,12,0.0005,,,,,,,1
lesize,17,0.0005,,,,,,,1
lesize,18,0.0005,,,,,,,1
lesize,19,0.0005,,,,,,,1
lesize,20,0.0005,,,,,,,1
lesize,23,0.0005,,,,,,,1
vmesh,1
vmesh,2
type,2
mshkey,0
mshape,1,3d
vsel,,,,3
vmesh,3
allsel,all
asel,s,,,6
nsla,r,1
type,3
esurf,all
allsel,all
save
fini
/solu
antype,4
toffst,273
tunif,20
tz=25
tinc=0.25
x1=0.0005
trnopt,full
nropt,full,,on
timint,on
solcontrol,on
autots,on
kbc,1
outres,all,all
allsel,all
sfa,2,,conv,8,20
sfa,5,,conv,8,20
sfa,7,,conv,8,20
sfa,8,,conv,8,20
sfa,9,,conv,8,20
sfa,10,,conv,8,20
sfa,11,,conv,8,20
sfa,12,,conv,8,20
sfa,13,,conv,8,20
sfa,14,,conv,8,20
sfa,15,,conv,8,20
sfa,16,,conv,8,20
esel,s,type,,3
sfe,all,,conv,1,800
sfe,all,,conv,2,20
allsel,all
time,tinc
deltim,0.125,0.125,0.125
autots,on
esel,s,type,,1
asel,s,,,6
nsla,r,1
nsel,r,loc,x,0,0.0005
nplot
sf,all,hflux,53900000
allsel,all
solve
/post1
etable,wendu,temp
esel,s,etab,wendu,1350
finish
/solu
antype,,rest
time,tinc+0.001
deltime,0.001,0.001,0.001
ekill,all
allsel,all
esel,s,type,,1
asel,s,,,6
nsla,r,1
nsel,r,loc,x,0,0.0005
nplot
sfdele,all,hflux
allsel,all
solve
*do,t,2tinc,tz,tinc
/solu
antype,,rest
time,t
deltim,0.125,0.125,0.125
autots,on
tsres,erase
wpstyl,,,,,,,,1
csys,4
wpoffs,x1
cswpla,11,0,1,1
esel,s,type,,1
asel,s,,,6
nsla,r,1
nsel,r,loc,x,0,0.0005
nplot
sf,all,hflux,53900000
allsel,all
solve
finish
/post1
etable,wendu,temp
esel,s,etab,wendu,1350
finish
/solu
antype,,rest
time,t+0.001
deltime,0.001,0.001,0.001
ekill,all
allsel,all
esel,s,type,,1
asel,s,,,6
nsla,r,1
nsel,r,loc,x,0,0.0005
nplot
sfdele,all,hflux
allsel,all
solve
*enddo
[ 本帖最后由 spark4239 于 2007-4-24 10:03 编辑 ] |