ansys一段代码,关于平板焊接的,运行有问题,精通ansys的大神能帮着修改一下吗
浏览:946
ET,1,SOLID70 BLOCK,0,0.08,0,0.09,0,0.006 BLOCK,0.08,0.17,0,0.09,0,0.006 BLOCK,0.17,0.19,0,0.09,0,0.006 BLOCK,0.19,0.3,0,0.09,0,0.006 VGLUE,ALL MPTEMP,1,20,100,300,400,500,700 MPTEMP,7,900,1470,1550,1600,2500,5000 MPDATA,KXX,1,1,52,51,44,43,37,32.5 MPDATA,KXX,1,7,26.2,31.4,120,120,120,120 *DIM,CONV1,TABLE,17,1,1,TEMP *SET,CONV1(1,0,1),20 *SET,CONV1(1,1,1),2.5 *SET,CONV1(2,0,1),100 *SET,CONV1(2,1,1),5.4 *SET,CONV1(3,0,1),300 *SET,CONV1(3,1,1),7 *SET,CONV1(4,0,1),500 *SET,CONV1(4,1,1),7.7 *SET,CONV1(5,0,1),750 *SET,CONV1(5,1,1),8.2 *SET,CONV1(6,0,1),1000 *SET,CONV1(6,1,1),8.5 *SET,CONV1(7,0,1),1590 *SET,CONV1(7,1,1),9.1 *SET,CONV1(8,0,1),5000 *SET,CONV1(8,1,1),10 LESIZE,57,,,20,3 LESIZE,58,,,20,3 LESIZE,59,,,20,3 LESIZE,60,,,20,3 LESIZE,47,,,4 LESIZE,46,,,4 LESIZE,49,,,20,1/3 LESIZE,50,,,20,1/3 LESIZE,51,,,20,1/3 LESIZE,52,,,20,1/3 LESIZE,53,,,20 LESIZE,54,,,20 LESIZE,55,,,20 LESIZE,56,,,20 Vmesh,all R=3.25e-3 U=22 I=220 Q0=3*U*I*0.7/(3.14*R**2) J=0 *DO,I,0,0.09,0.003 J=J+0.25 /solu ANTYPE,4 TRNOPT,FULL TUNIF,20 TIME,J NROPT,FULL,,ON DELTIME,0.01 AUTOTS,ON OUTRES,BASIC,LAST KBC,0 LNSRCH,1 TSRES,ERAES TIMINT,1,THERM NSEL,S,EXT SF,ALL,CONV,%CONV1%,20 ALLSEL,ALL LOCAL,11,1,0.18,I NSEL,S,LOC,X,0,0.00325 NSEL,R,LOC,Z,0.006 CSYS,0 ESLN,S,0 *GET,nMAX,ELEM,,NUM,MAX *GET,nMin,ELEM,,NUM,MIN *DO,ei, nMAX, nMIN *IF, ei,EQ,1,THEN *GET,elx,ELEM,ei,cent, x *GET,ely,ELEM,ei,cent, y q1=1*exp((-3)*(elx-0.18)**2)/(3.25e-3**2))*exp((-3)*(ABS(ely-i))**2/(3.25e-3**2) qm=q0*q1 SFE,ei,6,HFLUX,,qm *ENDIF *ENDDO SOLVE SFDELE,ALL,HFLUX SFDELE,ALL,CONV *ENDDO |