| 5 | 1/1 | 返回列表 |
| 查看: 1402 | 回復: 4 | ||
hmq891204新蟲 (初入文壇)
|
[求助]
下面是一段移動熱源計算力熱耦合的命令流,用到生死單元 已有1人參與
|
|
我想查看殺死后的結構的溫度場,應力場等等,定義了一個數(shù)組,然后將結果存到了單元表中,發(fā)現(xiàn)移動的載荷步不增加了,一直顯示第一載荷步的幾個子步,時間還是在增加的? 問題1:命令流是否有錯誤,感覺是數(shù)組定義的問題 問題2 :堯實現(xiàn)我需要的查看結果的功能,還有什么其他方法嗎? 做的是切割時,力熱移動載荷下的耦合分析,用到CZM模型,有相同的可以討論下,這是我所有的金幣 下面是我的命令流,求大神幫忙,畢業(yè)課題,搞不出來了 ![]() ![]() ![]() ![]() ![]() !下面是參數(shù)定義 /prep7 *set,l,0.0049 !板件寬度 *set,w,0.0098 !板件長度,切割方向 *set,h1,0.0005 !emc *set,h2,0.0002 !cu *set,wl_t,0.00032 !砂輪厚度 *set,vs,0.06 !砂輪切割速度 *set,f_z,0.04291 !切割道側面切向力,z方向,141個節(jié)點 *set,f_z2,0.05216 !切割道正面切向力,z方向,116個節(jié)點 *set,pre_x,13.34 !切割法向力 *set,hflu_s,10.861e5 !熱流密度 *set,hflu_s2,16.631e5 !熱流密度 *set,b,0.00049 !切割砂輪寬度,即一個載荷步長 *set,bi,1 !流入工件的熱量占總熱量的比 *set,l1,w !設定磨削長度 *set,loadstep,w/b !載荷步數(shù) *set,t,w/vs !設定時間常數(shù) *set,tim,0 !設置初始時間 *set,es,0.0001 !設置單元劃分大小 !下面是定義數(shù)組的命令 /solu *dim,tempe,char,18 !定義數(shù)組存儲單元表,計算18各載荷步,不知道是不是正確 *do,n,1,18,1 tempe(n)='temp_%n%' *enddo *dim,dparamr,char,18 !定義數(shù)組存儲單元表 *do,m,1,18,1 dparamr(m)='dpa_%m%' *enddo !下面還有n個類似的定義,略去了! allsel,all /solu !施加移動熱源/力循環(huán)步 *do,i,1,loadstep-18,1 !循環(huán)開始 *set,es,0.0001 *set,tim,tim+t/loadstep !設置載荷步結束時間 time,tim !指定載荷步結束時間 !施加移動載荷 nsel,all nsel,s,loc,y,(i-1)*5*es,i*5*es nsel,r,loc,x,l/2,l/2 sf,all,hflux,hflu_s*bi sf,all,pres,pre_x/(5*es*(h1+h2)) f,all,fz,f_z nsel,all nsel,s,loc,y,(i-1)*5*es,i*5*es nsel,r,loc,x,l/2+wl_t,l/2+wl_t sf,all,hflux,hflu_s*bi sf,all,pres,pre_x/(5*es*(h1+h2)) f,all,fz,f_z nsel,all nsel,s,loc,x,l/2+0.01*es,l/2+wl_t-0.01*es nsel,r,loc,y,i*5*es-0.5*es,i*5*es sf,all,hflux,hflu_s2*bi sf,all,pres,pre_x/(wl_t*(h1+h2)) f,all,fz,f_z2 allsel,all solve save !下面將需要的結果存儲到數(shù)組中 /post1 !進入post1,單元表不能超過200個,24*18,定義的太多 etable,tempe(i),temp, !將所有單元溫度存入etable etable,dparamr(i),NMISC,70,71,72,73!儲存損傷參數(shù) etable,deni(i),NMISC,140,141,142,143!存儲1,2型能量釋放率 etable,denii(i),NMISC,144,145,146,147 etable,dtstartr(i),NMISC,66,67,68,69!存儲脫粘時程 etable,contpresr(i),cont,pres !存儲接觸壓力 etable,contsfricr(i),cont,sfric !存儲接觸摩擦應力 etable,contgapr(i),cont,gap !存儲接觸間隙 etable,sxyr(i),s,xy etable,ssxyr(i),ss,xy etable,seqvr(i),s,eqv !下面刪除載荷 allsel,all nsel,s,loc,y,(i-1)*5*es,i*5*es nsel,r,loc,x,l/2,l/2 sfedele,all,all,pres sfedele,all,all,hflux fdele,all,fz allsel,all nsel,s,loc,y,(i-1)*5*es,i*5*es nsel,r,loc,x,l/2+wl_t,l/2+wl_t sfedele,all,all,pres sfedele,all,all,hflux fdele,all,fz allsel,all nsel,s,loc,x,l/2+0.01*es,l/2+wl_t-0.01*es nsel,r,loc,y,i*5*es-0.5*es,i*5*es sfedele,all,all,pres sfedele,all,all,hflux fdele,all,fz allsel,all !下面刪除切割去掉的單元 nsel,s,loc,y,i*5*es,(i+1)*5*es-0.5*es nsel,r,loc,x,l/2+0.01*es,l/2+wl_t-0.01*es esln,s /solu !重新進入求解器 ekill,all !殺死選擇單元,并約束殺死單元的節(jié)點自由度 allsel,all nsel,s,loc,y,i*5*es-0.5*es,(i+1)*5*es-0.5*es nsel,r,loc,x,l/2+0.01*es,l/2+wl_t-0.01*es d,all,ux,,,,,uy,uz allsel,all *enddo |
新蟲 (初入文壇)
新蟲 (正式寫手)
新蟲 (初入文壇)
新蟲 (初入文壇)
| 5 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 081700 調劑 267分 +4 | 迷人的哈哈 2026-03-23 | 4/200 |
|
|---|---|---|---|---|
|
[考研] 291求調劑 +5 | 孅華 2026-03-22 | 5/250 |
|
|
[考研] 070300,一志愿北航320求調劑 +3 | Jerry0216 2026-03-22 | 5/250 |
|
|
[考研]
|
酥酥魚.. 2026-03-21 | 4/200 |
|
|
[考研] 0854電子信息求調劑 +3 | α____ 2026-03-22 | 3/150 |
|
|
[考研] 生物學071000 329分求調劑 +5 | 我愛生物生物愛?/a> 2026-03-17 | 5/250 |
|
|
[考研] 求調劑院校信息 +6 | CX 330 2026-03-21 | 6/300 |
|
|
[考研] 260求調劑 +3 | 朱芷琳 2026-03-20 | 4/200 |
|
|
[考博] 招收博士1-2人 +3 | QGZDSYS 2026-03-18 | 4/200 |
|
|
[考研] 生物學一志愿985,分數(shù)349求調劑 +4 | zxts12 2026-03-21 | 7/350 |
|
|
[考研] 材料學碩301分求調劑 +7 | Liyouyumairs 2026-03-21 | 7/350 |
|
|
[考研] 266求調劑 +3 | 哇呼哼呼哼 2026-03-20 | 3/150 |
|
|
[考研] 一志愿 西北大學 ,070300化學學碩,總分287,雙非一本,求調劑。 +3 | 晨昏線與星海 2026-03-18 | 3/150 |
|
|
[考研] 22408 344分 求調劑 一志愿 華電計算機技術 +4 | solanXXX 2026-03-20 | 4/200 |
|
|
[考研] 288求調劑 +16 | 于海海海海 2026-03-19 | 16/800 |
|
|
[考研] 290求調劑 +7 | ^O^乜 2026-03-19 | 7/350 |
|
|
[考研] 廣西大學家禽遺傳育種課題組2026年碩士招生(接收計算機專業(yè)調劑) +3 | 123阿標 2026-03-17 | 3/150 |
|
|
[考研] 招收調劑碩士 +4 | lidianxing 2026-03-19 | 12/600 |
|
|
[考研] 0703化學調劑 +5 | pupcoco 2026-03-17 | 8/400 |
|
|
[考研]
|
zhouzhen654 2026-03-16 | 3/150 |
|