版塊導航: 正在加載中...

客戶端APP下載

論文輔導

調劑小程序

登錄注冊

應《網絡安全法》要求，自2017年10月1日起，未進行實名認證將不得使用互聯(lián)網跟帖服務。為保障您的帳號能夠正常使用，請盡快對帳號進行手機號驗證，感謝您的理解與支持！

24小時熱門版塊排行榜

>論壇更新日志 (6551)
>考研 (1813)
>導師招生 (1410)
>文獻求助 (500)
>蟲友互識 (295)
>考博 (284)
>碩博家園 (160)
>博后之家 (122)
>基金申請 (110)
>論文投稿 (98)
>休閑灌水 (96)
>招聘信息布告欄 (92)
>第一性原理 (65)
>教師之家 (64)
>公派出國 (46)
>外文書籍求助 (32)

返回列表

牛奶汪汪

金蟲 (小有名氣)

應助: 0 (幼兒園)
金幣: 905.6
帖子: 64
在線: 32.9小時
蟲號: 4511232
注冊: 2016-03-16
專業(yè): 結構工程

[求助] 大家有ANSYS對稱建模的例子么？已有1人參與

請問大家有對稱建模的例子么？命令流或GUI 操作都行~謝謝啦~

回復此樓

» 猜你喜歡

08工學調劑已經有17人回復
340求調劑已經有4人回復
311求調劑已經有3人回復
0805 316求調劑已經有5人回復
食品專碩一志愿雙一流 328 已經有4人回復
材料調劑已經有6人回復
300分，材料，求調劑，英一數(shù)二已經有5人回復
求調劑，一志愿:南京航空航天大學大學，080500材料科學與工程學碩，總分289分已經有5人回復
085600材料與化工調劑已經有13人回復
材料與化工考研調劑已經有7人回復

1樓 2016-05-30 14:44:54

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

m13905570802

銀蟲 (小有名氣)

應助: 12 (小學生)
金幣: 33.6
散金: 106
紅花: 2
帖子: 136
在線: 193.3小時
蟲號: 4000595
注冊: 2015-08-01
性別: GG
專業(yè): 機械結構強度學

【答案】應助回帖

★ ★ ★ ★ ★
感謝參與，應助指數(shù) +1
牛奶汪汪: 金幣+5, ★★★很有幫助, 好的，謝謝 2016-05-30 20:24:56

! ***************環(huán)境設置************************
finish
/clear
/filn, E42
/title, FEA of connecting zone of nozzle to cylinder
/units,si                      !采用國際單位制
! ********* 參數(shù)設定*********
Rci=1000                      ! 筒體內半徑
tc=30                         ! 筒體厚度
Rco=Rci+tc                      ! 筒體外半徑
Lc=4000                         ! 筒體長度
Rno=530                         ! 接管外半徑
tn=15                         ! 接管厚度
Rni=Rno-tn                      ! 接管內半徑
Li=193                         ! 接管內伸長度
Ln=500                         ! 接管外伸長度
rr1=30                         ! 焊縫外側過渡圓角半徑
rr2=15                         ! 焊縫內側過渡圓角半徑
pi=1.2                         ! 內壓
pc=pi*Rci**2/(Rco**2-Rci**2)    ! 筒體端部軸向平衡面載荷
!****************前處理***************************
/prep7
et,1,95                         ! 定義單元類型
mp,ex,1,2e5                   ! 定義材料的彈性模量
mp,nuxy,1,0.3                   ! 定義材料的泊松比
!****************建立模型***************************
cylind,Rco,Rci,0,-Lc/2,90,270, ! 生成筒體
wpoff,0,0,-Lc/2                ! 將工作面沿-Z向移動Lc/2
wprot,0,90,                   ! 將工作面沿yz旋轉90度
cylind,Rno,Rni,-Ln-Rci-tc,-Rci+Li,90,180,  ! 生成接管
vovlap,all                      ! 體overlap布爾運算
vsel,s,,,7                      ! 選擇筒體
*afun,deg                      ! 設定角度函數(shù)中單位為角度
ang1=2*nint(asin(Rno/Rci))    ! 計算接管區(qū)切割角度
wprot,0,0,-90+ang1             ! 旋轉坐標系
vsbw,all                      ! 切割筒體
afillt,21,12,rr1                ! 筒體與接管外表面圓角
afillt,23,35,rr2                ! 筒體內表面與接管外表面圓角
afillt,14,25,rr2                ! 生成下輔助過渡圓角
afillt,13,19,rr1                ! 生成上輔助過渡圓角
alls
askin,91,64                   ! 根據(jù)接管外過渡圓角在接管內外表面上的交線蒙面
vsba,4,13                      ! 切割外伸接管
askin,83,72                   ! 根據(jù)接管內過渡圓角在接管內外表面上的交線蒙面
vsba,5,18                      ! 切割內伸接管
askin,67,75                   ! 根據(jù)內外圓角邊界蒙皮生成切割面24
vsba,2,24                      ! 切割筒體
wprot,0,,90-ang1                ! 旋轉坐標系
wprot,0,90,0                   ! 旋轉坐標系
wpoff,0,0,-2*Rni                ! 移動坐標系至接管區(qū)軸向切割位置
vsbw,all                      ! 切割筒體
VDELE,    3, , ,1          ! 刪除筒體上開孔失去的部分
ADELE,    25, , ,1          ! 刪除輔助面
ADELE,    35, , ,1          ! 刪除輔助面

al,33,65,5                      ! 生成外圓角區(qū)域所需的端面
al,49,73,40                   ! 生成外圓角區(qū)域所需的端面
al,66,7,37                      ! 生成內圓角區(qū)域所需的端面
al,41,74,50                   ! 生成內圓角區(qū)域所需的端面
asel,s,,,31                   ! 選擇外圓角區(qū)域各面
asel,a,,,38,39
asel,a,,,4,6,2
va,all                         ! 生成外圓角區(qū)域體
asel,s,,,21                   ! 選擇內圓角區(qū)域各面
asel,a,,,41,42
asel,a,,,5,9,4
va,all                         ! 生成內圓角區(qū)域體
vsel,s,,,1,5,2                ! 選擇過渡區(qū)的體素
vsel,a,,,8,9
vsel,a,,,6
vadd,all                      ! 合并體素
alls
aadd,4,43,29,26,5,51          ! 合并過渡區(qū)端面面素
aadd,50,9,52,28,45,6          ! 合并過渡區(qū)端面面素

!劃分網格
LESIZE,67, , ,80, , , , ,1    ! 指定圓周方向的剖分數(shù)
LESIZE,5, , ,5, , , , ,1       ! 指定過渡圓弧的剖分數(shù)
vsweep,10                      ! 掃略剖分該區(qū)域

alls
MSHAPE,0,3D                   ! 設定三維映射剖分
MSHKEY,1
VMESH,7                         ! 映射剖分接管上段
VMESH,4                         ! 映射剖分接管下段
accat,56,65                   ! 筒體開孔相鄰區(qū)區(qū)域規(guī)則化連面
LESIZE,108, , ,40,0.5, , , ,1 ! 指定筒體接管相鄰區(qū)的剖分數(shù)
VMESH,13                      ! 掃略剖分該區(qū)域
vsweep,11                      ! 掃略剖分筒體其它部分
vsweep,12
vsweep,2
alls
nummrg,all                      ! 合并所有相同項
numcmp,all                      ! 壓縮
fini
!****************求解***************************
/solu
asel,s,loc,z,0                   ! 選擇筒體端面
SFA,all,1,PRES,-pc             ! 施加端面平衡面載荷
asel,s,loc,x,0                   ! 選擇對稱面
asel,a,loc,z,-Lc/2             ! 選擇對稱面
DA,all,SYMM                      ! 施加對稱約束
asel,s,loc,y,Ln+Rci+Tc          ! 選擇接管端面
DA,all,UY,                      ! 約束軸向位移
asel,s,,,38                      ! 選擇內表面面素
asel,a,,,34
asel,a,,,9
asel,a,,,41
asel,a,,,12
asel,a,,,10
asel,a,,,7
asel,a,,,22
asel,a,,,25
asel,a,,,15
asel,a,,,27
asel,a,,,23
SFA,all,1,PRES,pi                ! 施加內壓
alls
solve
fini
!****************后處理***************************
/post1
PLNSOL,S,INT,0,1                ! 顯示應力云圖
fini

贊一下

回復此樓

2樓2016-05-30 16:46:49

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

相關版塊跳轉我要訂閱樓主牛奶汪汪的主題更新