- 积分
- 0
- 注册时间
- 2006-4-12
- 仿真币
-
- 最后登录
- 1970-1-1
|
最近进行一个瞬态热分析,这个分析中要将前一子步分析的结果导出做一个计算后再导入作为下一个子步的载荷。我采用多载荷步文件人为将连续的时间分开,然后采用SET命令将前一子步的结果导出作为下一个子步的载荷,可是运行过程中出现反复的从起始时间0开始运算,下面是我的这一段代码,请大家指教!
loadstep = 4320
/SOLU
outers,all, last,
ANTYPE, 4
TRNOPT, FULL
IC, ALL, TEMP, 10000
DL, ALL, 1, TEMP, 0
SFL, ALL, PRES,10000
*DIM, heatgen, table, 400, 8
heatgen(0, 0) = 0
heatgen(0, 1) = 1
heatgen(0, 2) = 2
heatgen(0, 3) = 3
heatgen(0, 4) = 4
heatgen(0, 5) = 5
heatgen(0, 6) = 6
heatgen(0, 7) = 7
heatgen(0, 8) = 8
*Vfill, heatgen(1, 0), ramp, 1, 1
BF, all, HGEN, %heatgen(1, 8)%
TIME, %loadstep%
DELTIM, %loadstep%, %loadstep%*3/5, %loadstep%*7/5, ON
AUTOTS,ON
KBC, 1
NCNV, 0
lswrite, 1
lssolve, 1
!*
!*
*do, i, 2, 8640000/%loadstep%
/SOLU
ANTYPE, 4
TRNOPT, FULL
DL, ALL, 1, TEMP, 0
SFL, ALL, PRES,10000
/post1
set,last
*VGET, heatgen(1, 1), NODE, 1, S, 1, , , 2
*VGET, heatgen(1, 2), NODE, 1, S, 2, , , 2
*VGET, heatgen(1, 3), NODE, 1, S, 3, , , 2
*VOPER, heatgen(1, 4), heatgen(1, 1), add, heatgen(1, 2)
*VOPER, heatgen(1, 5), heatgen(1, 4), add, heatgen(1, 3)
*VOPER, heatgen(1, 6), heatgen(1, 5), div, %loadstep%*(-3)
*VOPER, heatgen(1, 8), heatgen(1, 6), sub, heatgen(1, 7)
/solu
BF, all, HGEN, %heatgen(1, 8)%
*Mfun, heatgen(1, 7), copy, heatgen(1, 6)
TIME, %loadstep%*i
DELTIM, %loadstep%, %loadstep%*3/5, %loadstep%*7/5, ON
AUTOTS,ON
KBC, 1
NCNV, 0
outers,all, last,
lswrite, i
lssolve, i
*enddo
[ 本帖最后由 lyb4427 于 2007-3-24 10:20 编辑 ] |
|