24小时热门版块排行榜    

查看: 1465  |  回复: 0

subben

新虫 (初入文坛)

[求助] ANSYS生死单元和重启动

一个简单的例子,长方体上端中心加载热流,底端施加热对流,四周绝热,我想观察0-2.2s内物体的温度分布变化情况,单元温度超过60度将其杀死,那么热流新的施加点就变成删除单元的边界(让它向下移动)。但是以下程序没有实现这种情况。
1. 这种问题需要用到重启动么
2. 重启动后parameters里设置的参数T似乎没更新,算得时间历程实际为0.2s,0.4s,1.4s,2.4s...9.4s,PASAVE命令怎么用
3. 载荷的重新施加怎么弄

finish
/clear
/CWD,'E:\simulation\shiyan'  ! 更改目录
/filname,shishi1
l=3e-3               ! element length, m
w=3e-3                     ! element width, m
h=8e-3            ! element height, m
/PREP7   
ET,1,SOLID69
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,KXX,1,,5
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,C,1,,2000
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,DENS,1,,1500
BLOCK,,l,,w,,h,

! 划分网格
TYPE,   1   
MAT,       1
REAL,   
ESYS,       0   
SECNUM,
ESIZE,l/8,0,
MSHAPE,0,3D
MSHKEY,1  
VMESH,1
NSEL,S,LOC,X,l/2
NSEL,R,LOC,Y,w/2
NSEL,R,LOC,Z,h

! 施加热流
F,all,HEAT,0.6
ALLSEL,ALL
! 施加热边界
NSEL,R,LOC,Z,0
SF,all,CONV,25,25
ALLSEL,ALL
! 初始温度
TUNIF,25,  
FINISH  
/SOL
dt=0.2
T=0
T=T+dt
ANTYPE,4
TRNOPT,FULL
LUMPM,0
NSUBST,1
OUTRES,ALL,ALL  
RESCONTRL,DEFINE,ALL,ALL,1  
TIME,T
solve
save
finish
  
*do,i,1,10
    /post1
    etable,temper,temp        !温度储存在表中
    esel,s,etab,temper,60    !选择温度超过60度的单元
    finish
    /solu
    *get,elemnum,elem,0,count  
    *if,elemnum,gt,0,then
       ekill,all
       esel,s,live           !杀死单元之后原来的载荷没删为什么还可以计算?重新加载怎么加?
    *else
       allsel
    *endif
    eplot
    resume                  
    ANTYPE,,REST,i           
    T=T+dt
    time,T
    nropt,full
    NSUBST,1
    solve
    save
    finish
*enddo
回复此楼

» 本帖@通知

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 subben 的主题更新
信息提示
请填处理意见