| 5 | 1/1 | 返回列表 |
| 查看: 3143 | 回復(fù): 7 | |||
| 當(dāng)前只顯示滿足指定條件的回帖,點(diǎn)擊這里查看本話題的所有回帖 | |||
hjb1109鐵蟲 (初入文壇)
|
[求助]
ANSYS計(jì)算完成求解后能不能回到前處理器
|
||
|
在ANSYS計(jì)算過程中,已經(jīng)經(jīng)歷過了 /perp7 …… /finish /solu …… /finish 即經(jīng)歷了完整的求解計(jì)算過程后,還能不能再進(jìn)入前處理器(/prep7)進(jìn)行建模、加載、求解? 如果能,可否舉一個(gè)簡(jiǎn)單的例子,貼一段APDL,并且說明一下這次計(jì)算對(duì)上一次計(jì)算會(huì)有什么影響,尤其是時(shí)間歷程上。 如果不能,說明一下理由,謝謝 |
鐵蟲 (初入文壇)
|
我就是因?yàn)橛蒙绬卧胁荒軐?shí)現(xiàn)我要的結(jié)果所以才在這方面想。我要做的是兩層材料先后解熱,就是先加熱一層,然后在這層上鋪上一層,在加熱。我用生死單元時(shí)加熱第一層是熱量總會(huì)傳到上一層,怎么改生死的順序都不行,要不好心人幫我看看。下面是APDL: /units,si /title, shengsi2103 /filn,shengsi2103 /replot len=2/1000 wid=2/1000 hth=0.5/1000 !鋪設(shè)加熱層單層尺寸 tlen=2.2/1000 twid=2.2/1000 thth=1/1000 !基板尺寸 q=15 h=1.5/1000 r1=0.12/1000 pi=3.1415926 qv=2*q/(pi*h*(r1**2)) !激光熱源參數(shù) lsize=0.1/1000 max_x=len/lsize+1 max_y=wid/lsize+1 max_z=hth/lsize+1 !各向單元節(jié)點(diǎn)數(shù)目 /prep7 et,1,solid70 mp,dens,1,1000 mp,kxx,1,0.25 mp,c,1,1700 mp,emis,1,0.95 mp,dens,2,8920 mp,kxx,2,360 mp,c,2,390 mp,emis,2,0.95 block,0,len,0,wid,0,2*hth block,(len-tlen)/2,(len+tlen)/2,(wid-twid)/2,(wid+twid)/2,-thth,0 /view,1,1,1,1 /replot allsel,all esize,0.1/1000 mat,1 vsel,s,volu,,1 vmesh,all allsel,all esize,0.2/1000 mat,2 vsel,s,volu,,2 vmesh,all /COM, contact pair creation - start !建立接觸熱阻-開始 allsel,all asel,s,,,8 nsla,s,1 cm,target1,node asel,s,,,1 nsla,s,1 cm,contact1,node allsel,all mp,mu,1 mat,1 r,3 real,3 et,3,170 et,4,174 keyopt,4,9,0 keyopt,4,10,2 r,3, rmore,,,,,, rmore,,2500 rmore,0 keyopt,4,1,2 nsel,s,,,target1 type,3 esln,s,0 esurf,all nsel,s,,,contact1 type,4 esln,s,0 esurf,all /COM, contact pair creation - end !建立接觸熱阻-結(jié)束 finish /solu *dim,gene1,table,max_x,max_y,max_z,x,y,z !建立熱源加載表格 xc=len/2 yc=wid/2 *do,k,1,max_z,1 gene1(0,0,k)=(k-1)*lsize *do,i,1,max_x,1 gene1(i,0,k)=(i-1)*lsize *enddo *do,j,1,max_y,1 gene1(0,j,k)=(j-1)*lsize *enddo *do,i,1,max_x,1 *do,j,1,max_y,1 distance1= (((i-1)*lsize-xc)**2+((j-1)*lsize-yc)**2)**(1/2) hei1=1+(k-max_z)*lsize/h *if,distance1,le,r1,then gene1(i,j,k)=Qv*EXP(-2*(distance1/r1)**2)*hei1 *else gene1(i,j,k)=0 *endif *enddo *enddo *enddo *dim,gene2,table,max_x,max_y,max_z,x,y,z xc=len/2 yc=wid/2 *do,k,1,max_z,1 gene2(0,0,k)=(k-1)*lsize *do,i,1,max_x,1 gene2(i,0,k)=(i-1)*lsize *enddo *do,j,1,max_y,1 gene2(0,j,k)=(j-1)*lsize *enddo *do,i,1,max_x,1 *do,j,1,max_y,1 distance1= (((i-1)*lsize-xc)**2+((j-1)*lsize-yc)**2)**(1/2) hei2=(1/hth-1/h)*lsize *if,distance1,le,r1,then gene2(i,j,k)=Qv*EXP(-2*(distance1/r1)**2)*hei2 *else gene2(i,j,k)=0 *endif *enddo *enddo *enddo antype,trans !熱分析設(shè)置 trnopt,full tunif,100 allsel *set,delt,1 timint,on autots,on tinc=1/500 tm=1 allsel,all !殺死上層單元 nsel,s,loc,z,hth,2*hth esln,s,1 ekill,all esel,s,live eplot *do,i,1e-6,tm,tinc !建立500個(gè)時(shí)間節(jié)點(diǎn)循環(huán)加載 time,i deltim,i allsel,all *if,i,lt,0.375,then !t<0.375時(shí)加熱第一層 *if,yc,lt,2,then allsel,all nsel,s,x,loc,xc-r1,xc+r1 nsel,r,y,loc,yc-r1,yc+r1 nsel,r,z,loc,0,hth bf,all,hgen,%gene1% allsel,all *endif *elseif,i,ge,0.5,then !t>0.5時(shí)激活新層 allsel,all nsel,s,loc,z,hth,2*hth esln,s,1 ealive,all eplot *if,i,lt,0.875,then !t<0.875時(shí)加熱新層 *if,yc,lt,2,then allsel,all nsel,s,x,loc,xc-r1,xc+r1 nsel,r,y,loc,yc-r1,yc+r1 nsel,r,z,loc,0,hth bf,all,hgen,%gene2% allsel,all nsel,s,x,loc,xc-r1,xc+r1 nsel,r,y,loc,yc-r1,yc+r1 nsel,r,z,loc,hth,2*hth bf,all,hgen,%gene1% allsel *endif *endif *endif ALLSEL,ALL SOLVE BFDELE,ALL,HGEN /REPLOT *enddo FINISH |
金蟲 (著名寫手)
|
/finish 就玩完了,就是一個(gè)完整的求解過程。 可以使用多載荷工況,時(shí)間歷程處理。 邊界條件和載荷可以實(shí)現(xiàn)不同的載荷工況; 再建模為何故?那就是另一個(gè)模型了。這兩個(gè)模型之間還要產(chǎn)生關(guān)系嗎。若果會(huì)命令流可以實(shí)現(xiàn)循環(huán)與選擇?梢远x變量,賦予不同的數(shù)值,改起來方便。 有單元生死可以模擬爆炸、基坑開挖什么的。 |

鐵蟲 (初入文壇)
金蟲 (著名寫手)

| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|