很基础的瞬态加热问题,对钢板中间一部分加热,采用函数加载,命令如下
初始温度为0,结果出现负的,加热热流越大,负的越多,为什么?
/PREP7
RECTNG,0,3,0.3,0.33,
ET,1,55
!
MP,KXX,1,28
MP,C,1,470
MP,DENS,1,7800
lsel,s,,,1,3,2
lesize,all,,,40
lsel,s,,,2,4,2
lesize,all,,,5
MSHAPE,0,2D
MSHKEY,1
type,1
mat,1
AMESH,all
allsel,all
!!!!!!!!b.c.
*DEL,_FNCNAME
*DEL,_FNCMTID
*SET,_FNCNAME,'LASER'
! /INPUT,..\ansysjob\LASER.func
*DIM,%_FNCNAME%,TABLE,6,3,4
!
! Begin of equation: {X}
*SET,%_FNCNAME%(0,0,1), 0.0, -999
*SET,%_FNCNAME%(2,0,1), 0.0
*SET,%_FNCNAME%(3,0,1), 0.0
*SET,%_FNCNAME%(4,0,1), 0.0
*SET,%_FNCNAME%(5,0,1), 0.0
*SET,%_FNCNAME%(6,0,1), 0.0
*SET,%_FNCNAME%(0,1,1), 1.0, 99, 0, 1, 2, 0, 0
*SET,%_FNCNAME%(0,2,1), 0
*SET,%_FNCNAME%(0,3,1), 0
! End of equation: {X}
!
! Begin of equation: 0
*SET,%_FNCNAME%(0,0,2), 2, -999
*SET,%_FNCNAME%(2,0,2), 0.0
*SET,%_FNCNAME%(3,0,2), 0.0
*SET,%_FNCNAME%(4,0,2), 0.0
*SET,%_FNCNAME%(5,0,2), 0.0
*SET,%_FNCNAME%(6,0,2), 0.0
*SET,%_FNCNAME%(0,1,2), 1.0, 99, 0, 0, 0, 0, 0
*SET,%_FNCNAME%(0,2,2), 0
*SET,%_FNCNAME%(0,3,2), 0
! End of equation: 0
!
! Begin of equation: 0.3E8
*SET,%_FNCNAME%(0,0,3), 2.375, -999
*SET,%_FNCNAME%(2,0,3), 0.0
*SET,%_FNCNAME%(3,0,3), 0.0
*SET,%_FNCNAME%(4,0,3), 0.0
*SET,%_FNCNAME%(5,0,3), 0.0
*SET,%_FNCNAME%(6,0,3), 0.0
*SET,%_FNCNAME%(0,1,3), 1.0, 99, 0, 0.3E8, 0, 0, 0
*SET,%_FNCNAME%(0,2,3), 0
*SET,%_FNCNAME%(0,3,3), 0
! End of equation: 0.3E8
!
! Begin of equation: 0
*SET,%_FNCNAME%(0,0,4), 5, -999
*SET,%_FNCNAME%(2,0,4), 0.0
*SET,%_FNCNAME%(3,0,4), 0.0
*SET,%_FNCNAME%(4,0,4), 0.0
*SET,%_FNCNAME%(5,0,4), 0.0
*SET,%_FNCNAME%(6,0,4), 0.0
*SET,%_FNCNAME%(0,1,4), 1.0, 99, 0, 0, 0, 0, 0
*SET,%_FNCNAME%(0,2,4), 0
*SET,%_FNCNAME%(0,3,4), 0
! End of equation: 0
!-->
LSEL,S,,,3
SFL,ALL,HFLUX,%LASER%
allsel,all
/SOL
TUNIF,0
ANTYPE,4
!*
TRNOPT,FULL
LUMPM,0
!*
!*
OUTRES,ALL,ALL,
!*
TIME,1
AUTOTS,1
DELTIM,0.0125,0.0125,0.0125,1
KBC,0
!*
TSRES,ERASE
SOLVE |